Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: PSB3P68

Package: Barcode Medication Administration

Routine: PSB3P68


Information

PSB3P68 ;BIRMINGHAM/GN - POST INSTALL FOR PSB3P68 ;2/23/12 4:38pm

Source Information

Source file <PSB3P68.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Kernel 3 (,$$S)^%ZTLOAD  ($$FMADD,$$FMDIFF,$$FMTE,$$NOW)^XLFDT  MES^XPDUTL  
MailMan 1 ^XMD  
Toolkit 1 ($$GET,EN)^XPAR  
VA FileMan 1 EN1^DIK  

Entry Points

Name Comments DBIA/ICR reference
BEGIN ;
QUEUE ;begin of queueing to background to run xref builder
JOB ; Entry point for taskman
GETLAST ;get last run info
INITSYS(NAM,VAL) ; Init the SYSTEM value
; Input: NAM = param name
; VAL = num of hours
INITDIV(NAM,VAL,UPD) ; Init DIVISION value
; Input: NAM = param name
; VAL = num of hours
; UPD = 1 to update, else list curr values only
MAIL(HTEXT) ; send the mail message
CHKSTAT() ;check if job is running
STATUS ;Display status of this job
NAMSPC() ;

External References

Name Field # of Occurrence
^%ZTLOAD QUEUE+10
$$S^%ZTLOAD JOB+40
EN1^DIK JOB+36
$$FMADD^XLFDT JOB+14
$$FMDIFF^XLFDT JOB+69
$$FMTE^XLFDT JOB+58, STATUS+16
$$NOW^XLFDT QUEUE+6, JOB+2, JOB+13, JOB+17, JOB+26, JOB+29, JOB+48, JOB+50
^XMD MAIL+5
$$GET^XPAR INITDIV+12, INITDIV+14, INITDIV+15
EN^XPAR INITSYS+4, INITDIV+14
MES^XPDUTL BEGIN+5, BEGIN+6, BEGIN+7, BEGIN+8, BEGIN+9, BEGIN+10, BEGIN+11, BEGIN+14, QUEUE+12, QUEUE+14
, QUEUE+15, QUEUE+16, QUEUE+17, INITDIV+6, INITDIV+7, INITDIV+8, INITDIV+15, INITDIV+16, INITDIV+17, INITDIV+18
, CHKSTAT+7, CHKSTAT+8, CHKSTAT+9, CHKSTAT+10, CHKSTAT+12, CHKSTAT+13, CHKSTAT+14, CHKSTAT+15

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,JOB,!,"Has errored and quit abruptly. Please restart Post Install",!
  • Line Location: STATUS+14
Function Call: WRITE
  • Prompt: !," at Programmers prompt '>' type 'D QUEUE^PSB3P68' and press Enter.",!!
  • Line Location: STATUS+15
Function Call: WRITE
  • Prompt: !!,JOB,!,"Status: ",STAT," ",$$FMTE^XLFDT(TIME)
  • Line Location: STATUS+16
Function Call: WRITE
  • Prompt: !,PCT,"% complete",!!
  • Line Location: STATUS+17

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PSB(53.79 - [#53.79] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DG(40.8 - [#40.8] INITDIV+10
^DIC(4 - [#4] INITDIV+15
^PSB(53.79 - [#53.79] JOB+10, JOB+34
^TMP( JOB+3*, JOB+4*, JOB+21*, JOB+22*, JOB+24*, JOB+54!, JOB+58*, JOB+59*, JOB+60*, JOB+61*
, JOB+63*, JOB+64*, JOB+65*, JOB+69*, JOB+70*, JOB+74!, MAIL+6!
^XTMP( QUEUE+8, QUEUE+9, JOB+1, JOB+2*, JOB+10*, JOB+15*, JOB+16*, JOB+17*, JOB+26*, JOB+29*
, JOB+30*, JOB+41*, JOB+42*, JOB+43*, JOB+44*, JOB+48*, JOB+50*, JOB+73, GETLAST+1, GETLAST+3
, GETLAST+4, GETLAST+5, GETLAST+6, GETLAST+7, CHKSTAT+3, CHKSTAT+5, STATUS+3, STATUS+6, STATUS+7, STATUS+8
, STATUS+9, STATUS+10, STATUS+11

Label References

Name Line Occurrences
$$CHKSTAT QUEUE+8
$$NAMSPC QUEUE+8, QUEUE+9, JOB+1, JOB+2, JOB+3, JOB+4, JOB+8, JOB+21, JOB+22, JOB+24
, MAIL+4, MAIL+6, CHKSTAT+2, STATUS+3, STATUS+6, STATUS+7, STATUS+8, STATUS+9, STATUS+10, STATUS+11
GETLAST JOB+19, JOB+56
INITDIV BEGIN+12, BEGIN+13
INITSYS BEGIN+4
MAIL JOB+5, JOB+25, JOB+72

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BEGTIME JOB+7~, JOB+13*, JOB+14, JOB+15, JOB+69, GETLAST+6*
DA QUEUE+1~, JOB+36*
DIK QUEUE+1~, JOB+35*
DIK(1 JOB+35*
DTOUT CHKSTAT+1~
DUOUT CHKSTAT+1~
DUZ MAIL+2
DV BEGIN+1~, INITDIV+10*, INITDIV+11
ENDTIME QUEUE+1~, JOB+58, JOB+69, GETLAST+7*
ENT BEGIN+1~, INITDIV+11*, INITDIV+12, INITDIV+14, INITDIV+15
FOUND INITDIV+5~*, INITDIV+13*, INITDIV+16, INITDIV+17
HTEXT MAIL~, MAIL+3
IEN JOB+7~, JOB+22, JOB+34*, JOB+36, JOB+42, JOB+44, JOB+65, GETLAST+1*, GETLAST+2*
JOB STATUS+2~, STATUS+9*, STATUS+14, STATUS+16
LIN JOB+52~, JOB+53*, JOB+58*, JOB+59*, JOB+60*, JOB+61*, JOB+63*, JOB+64*, JOB+65*, JOB+69*
, JOB+70*
NAM BEGIN+1~, BEGIN+3*, BEGIN+4, BEGIN+12, BEGIN+13, INITSYS~, INITSYS+4, INITDIV~, INITDIV+14, INITDIV+15
NAMSPC JOB+7~, JOB+8*, JOB+10, JOB+15, JOB+16, JOB+17, JOB+26, JOB+29, JOB+30, JOB+41
, JOB+42, JOB+43, JOB+44, JOB+48, JOB+50, JOB+54, JOB+58, JOB+59, JOB+60, JOB+61
, JOB+63, JOB+64, JOB+65, JOB+69, JOB+70, JOB+73, JOB+74, GETLAST+1, GETLAST+3, GETLAST+4
, GETLAST+5, GETLAST+6, GETLAST+7, CHKSTAT+2*, CHKSTAT+3, CHKSTAT+5, CHKSTAT+8, CHKSTAT+13
PCT JOB+7~, JOB+23*, JOB+24, JOB+66*, JOB+68*, JOB+70, STATUS+2~, STATUS+12*, STATUS+17
PURGDT JOB+7~, JOB+14*, JOB+15
QUIT QUEUE+1~, CHKSTAT+1~, CHKSTAT+4*, CHKSTAT+16
RECS JOB+7~, JOB+23, JOB+37*, JOB+39, JOB+41, JOB+43, JOB+61, JOB+66, GETLAST+4*, STATUS+2~
, STATUS+10*, STATUS+12
RUNNING STATUS+2~, STATUS+4*, STATUS+5*, STATUS+13
STAT JOB+7~, JOB+20, JOB+58, JOB+62, JOB+67, GETLAST+3*, CHKSTAT+3*, CHKSTAT+11, CHKSTAT+13, STATUS+2~
, STATUS+7*, STATUS+13, STATUS+16
T10 BEGIN+1~, BEGIN+2*, BEGIN+10, INITDIV+15
T20 BEGIN+1~, BEGIN+2*, BEGIN+10, INITDIV+15
T5 BEGIN+1~, BEGIN+2*, INITDIV+16
TIME STATUS+2~, STATUS+8*, STATUS+16
TLRECS JOB+7~, JOB+23, JOB+30, JOB+60, JOB+66, GETLAST+5*, STATUS+11*, STATUS+12
TLRESC STATUS+2~
U JOB+2, JOB+10, JOB+15, JOB+29, JOB+48, JOB+50, GETLAST+3, GETLAST+7, INITDIV+15, STATUS+7
, STATUS+8, STATUS+9
UPD INITDIV~, INITDIV+6, INITDIV+7, INITDIV+14
VAL BEGIN+1~, BEGIN+3*, BEGIN+4, BEGIN+12, BEGIN+13, INITSYS~, INITSYS+4, INITDIV~, INITDIV+14
XMDUZ MAIL+1~, MAIL+2*
XMSUB MAIL+1~, MAIL+3*
XMTEXT MAIL+1~, MAIL+4*
XMY MAIL+1~
XMY( MAIL+2*
Y CHKSTAT+1~
ZTDESC QUEUE+1~, QUEUE+5*, QUEUE+11*, QUEUE+12, JOB+5, JOB+9*, JOB+15, JOB+25, JOB+58, JOB+72
ZTDTH QUEUE+1~, QUEUE+6*
ZTIO QUEUE+1~, QUEUE+6*
ZTQUEUED QUEUE+1~
ZTRTN QUEUE+1~, QUEUE+4*
ZTSAVE QUEUE+1~
ZTSK QUEUE+1~, QUEUE+13, QUEUE+14, JOB+16
ZTSTOP JOB+7~, JOB+33*, JOB+34, JOB+40*, JOB+47
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All