Routine: SDPMHLS

Package	Total	Call Graph
Health Level Seven	3	$$HLDATE^HLFNC INIT^HLFNC2 GENERATE^HLMA
Kernel	2	^%ZTLOAD ($$DT,$$FMADD,$$FMTE,$$NOW)^XLFDT
Registration	2	MAKEIT^VAFHLU $$SITE^VASITE
Scheduling	2	ROLLUP^SCRPW303 GETDATA^SDPMUT1
VA Fileman	2	^%DT C^%DTC
MailMan	1	^XMD

Entry Points

Name	Comments	DBIA/ICR reference
BLDMSG(OUTARR,XMTARRY)	;Build OBR segment
EN	;Entry point
GETINFO	;Get performance monitor data
SENDMSG(XMTARRY)	;Send HL7 message
MSG	;Build bulletin and send
QUE	;Queue retroactive XMIT job
MAKEOBX	;Set type and count for total encounters to bld OBX
EXIT	;Done
BLDOBX	;Build OBX

External References

Name	Field # of Occurrence
^%DT	QUE+8
C^%DTC	GETINFO+14
^%ZTLOAD	QUE+23
$$HLDATE^HLFNC	BLDMSG+12, BLDMSG+14, BLDMSG+15
INIT^HLFNC2	BLDMSG+5, SENDMSG+9
GENERATE^HLMA	SENDMSG+18
ROLLUP^SCRPW303	EN+13
GETDATA^SDPMUT1	GETINFO+23
MAKEIT^VAFHLU	BLDMSG+17, BLDOBX+12
$$SITE^VASITE	BLDMSG+23
$$DT^XLFDT	GETINFO+13
$$FMADD^XLFDT	QUE+7, QUE+14, QUE+16, GETINFO+17, GETINFO+18
$$FMTE^XLFDT	MSG+7, MSG+8, MSG+9
$$NOW^XLFDT	QUE+7, GETINFO+7, MSG+9
^XMD	MSG+17

Label References

Name	Line Occurrences
$$SENDMSG	EN+20
BLDMSG	EN+17
BLDOBX	MAKEOBX+7, MAKEOBX+13, MAKEOBX+15, MAKEOBX+16, MAKEOBX+17, MAKEOBX+20, MAKEOBX+21
EXIT	EN+24
GETINFO	EN+15
MAKEOBX	BLDMSG+24, BLDMSG+31
MSG	EN+22

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%DT	QUE+5*, QUE+24!
%DT("A"	QUE+4*, QUE+24!
%DT(0	QUE+7*, QUE+24!
ARRY4HL7	SENDMSG+3~, SENDMSG+7*, SENDMSG+13, SENDMSG+14, SENDMSG+15, SENDMSG+21
CNT	BLDMSG+7~, BLDMSG+8, BLDMSG+18, BLDMSG+19, BLDOBX+13, BLDOBX+14*
COUNT	BLDMSG+4~, MAKEOBX+7, MAKEOBX+12, MAKEOBX+15, MAKEOBX+16, MAKEOBX+17, MAKEOBX+20, MAKEOBX+21*, BLDOBX+8
DIV	BLDMSG+7~, BLDMSG+26*, BLDMSG+28, BLDMSG+29, BLDMSG+30
DIVHL	BLDMSG+4~, BLDMSG+7~, BLDMSG+23, BLDMSG+30, BLDOBX+10
EDT	QUE+2, QUE+16, QUE+24!, GETINFO+9
ENDDATE	EN+5~, EN+11, BLDMSG+15, GETINFO+9, GETINFO+18*, GETINFO+21, MSG+8
HL	BLDMSG+4~, BLDMSG+5, SENDMSG+3~, SENDMSG+9
HL(""	BLDMSG+6, SENDMSG+10
HLECH	BLDMSG+4~, SENDMSG+3~
HLFS	BLDMSG+4~, SENDMSG+3~
HLP	SENDMSG+3~, SENDMSG+18
HLQ	BLDMSG+4~, SENDMSG+3~
HLRESLT	SENDMSG+3~, SENDMSG+18, SENDMSG+19*, SENDMSG+22
I	BLDMSG+7~
INFO	BLDMSG+7~
>> J	EN+20*
KILLARRY	SENDMSG+3~, SENDMSG+12, SENDMSG+16, SENDMSG+21
>> M4	MAKEOBX+9*, MAKEOBX+11, MAKEOBX+12
MAKE	BLDMSG+7~, BLDMSG+17, BLDOBX+3~, BLDOBX+12
MAKE(1	BLDMSG+9, BLDOBX+4
MAKE(11	BLDOBX+9*
MAKE(15	BLDOBX+10*
MAKE(2	BLDOBX+5*
MAKE(25	BLDMSG+13*
MAKE(27	BLDMSG+14, BLDMSG+15
MAKE(3	BLDOBX+6, BLDOBX+7
MAKE(4	BLDMSG+10, BLDMSG+11
MAKE(5	BLDOBX+8*
MAKE(7	BLDMSG+12*
MSGTEXT	MSG+5~
MSGTEXT(1	MSG+6*
MSGTEXT(2	MSG+7*
MSGTEXT(3	MSG+8, MSG+9
MSGTEXT(4	MSG+10*
>> OBID	MAKEOBX+7, MAKEOBX+10, MAKEOBX+15, MAKEOBX+16, MAKEOBX+17, MAKEOBX+20, MAKEOBX+21*, BLDOBX+6
OUTARR	EN+6~, EN+9*, EN+17, BLDMSG~, BLDMSG+21, BLDMSG+22, BLDMSG+26, BLDMSG+28, BLDMSG+29, GETINFO+23 , EXIT+1
PNODE	BLDMSG+4~, BLDMSG+22, BLDMSG+27~, BLDMSG+29, MAKEOBX+12, MAKEOBX+20
RDATE	EN+6~, BLDMSG+12, GETINFO+7*, MSG+7
SCRNARR	EN+6~, EN+7*, EN+13, GETINFO+21, GETINFO+23, EXIT+1
SNODE	BLDMSG+4~, BLDMSG+21, BLDMSG+27~, BLDMSG+28, MAKEOBX+7, MAKEOBX+15, MAKEOBX+16, MAKEOBX+17, MAKEOBX+20, MAKEOBX+21
SORTARR	EN+6~, EN+8*, EN+13, GETINFO+23, EXIT+1
STDATE	EN+5~, EN+11, BLDMSG+14, GETINFO+9, GETINFO+10, GETINFO+15*, GETINFO+17, GETINFO+21, MSG+8
STDT	QUE+2, QUE+12, QUE+14, QUE+24!, GETINFO+9
TYPE	BLDMSG+4~, MAKEOBX+7, MAKEOBX+11, MAKEOBX+15, MAKEOBX+16, MAKEOBX+17, MAKEOBX+20, MAKEOBX+21*, BLDOBX+7
U	MAKEOBX+7, MAKEOBX+12, MAKEOBX+15, MAKEOBX+16, MAKEOBX+17, MAKEOBX+20, MAKEOBX+21
VAFEVN	BLDMSG+7~
VAFOBR	BLDMSG+7~, BLDMSG+16!, BLDMSG+17, BLDMSG+18
VAFOBX	BLDMSG+7~, BLDOBX+3~, BLDOBX+11!, BLDOBX+12, BLDOBX+13
VAFSTR	BLDMSG+7~
X	QUE+2, QUE+14, QUE+16, QUE+24!, EN+6~, GETINFO+12~, GETINFO+15, GETINFO+17*, GETINFO+18
X1	GETINFO+12~, GETINFO+13*
X2	GETINFO+12~, GETINFO+13*
XCNT	BLDMSG+7~, BLDMSG+8, BLDMSG+19, BLDOBX+4, BLDOBX+14*
XMCHAN	MSG+5~, MSG+15*
XMDUZ	MSG+5~, MSG+16*
XMSUB	MSG+5~, MSG+12*
XMTARRY	EN+6~, EN+10, EN+17, EN+19, EN+20, BLDMSG~, BLDMSG+18, BLDOBX+13, SENDMSG~, SENDMSG+4 , SENDMSG+5*, SENDMSG+6, SENDMSG+13, SENDMSG+15, EXIT+1
XMTEXT	MSG+5~, MSG+13*
XMY	MSG+5~
XMY("G.SD PM	NOTIFICATION TIU" , MSG+14*
XMZ	MSG+5~
Y	QUE+2*, QUE+10, QUE+12, QUE+24!
>> ZTDESC	QUE+19*
>> ZTIO	QUE+18*
>> ZTRTN	QUE+20*
>> ZTSAVE("EDT"	QUE+22*
>> ZTSAVE("STDT"	QUE+21*
>> ZTSK	QUE+23

Customize PDF page

Package: Scheduling

Routine: SDPMHLS

Information

Source Information

Call Graph

Call Graph Total: 12

Entry Points

External References

Label References

Local Variables

Legend: