Routine: PSB3P68

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

Customize PDF page

Package: Barcode Medication Administration

Routine: PSB3P68

Information

Source Information

Call Graph

Call Graph Total: 6

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: