Routine: PSOHLSG

Package	Total	Call Graph
VA Fileman	4	NOW^%DTC FILE^DICN ^DIE $$GET1^DIQ
Health Level Seven	3	$$GETAPP^HLCS2 INIT^HLFNC2 GENERATE^HLMA
Outpatient Pharmacy	3	^PSOHLDS START^PSOHLSG1 (LAB,SUS)^PSOLBL4
Kernel	1	SETUP^XQALERT

Entry Points

Name	Comments	DBIA/ICR reference
ACK	;process MSA received from the dispense machine (client)
INIT	;initialize variables and build outgoing message
ALERT	;turn off transmission and send alert to key holders
EXT	;K ALL VARIABLES AND QUIT
EXIT
UFILE
ACK2
FACK2	;
ACK1	;
FACK1	;
ERRMSG

External References

Name	Field # of Occurrence
NOW^%DTC	INIT+10
FILE^DICN	INIT+27
^DIE	UFILE+4, FACK1+2, FACK2+2
$$GET1^DIQ	INIT+2
$$GETAPP^HLCS2	INIT+5
INIT^HLFNC2	INIT+8
GENERATE^HLMA	INIT+33
^PSOHLDS	INIT+3
START^PSOHLSG1	INIT+28
LAB^PSOLBL4	FACK1+3
SUS^PSOLBL4	INIT+23
SETUP^XQALERT	ALERT+4

Used in HL7 Interface

HL7 Protocol Name	Call Tags
PSO HLSERV	ACK
PSO HLSERVER1	ACK

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^PS(52.51 - [#52.51]	Classic Fileman Calls
^PS(59 - [#59]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	INIT+35
^ORD(101 - [#101]	INIT+7
^PS(52.5 - [#52.5]	INIT+19, INIT+20
^PS(52.51 - [#52.51]	UFILE+2, UFILE+3, UFILE+4, ACK+13, FACK1+1, FACK1+3, FACK2+1
^PS(59 - [#59]	INIT+17, ALERT+1*
^PSRX - [#52]	INIT+17, INIT+18
^TMP("HLS"	INIT+29!, INIT+30*, EXIT+3!
^TMP("PSO"	INIT+6!, INIT+30, EXIT+2!
^TMP("PSO1"	ACK+10*, ACK+11, EXT+1!
^TMP("PSO2"	ERRMSG+2*
^TMP("PSOMID"	INIT+14*, UFILE, EXIT+1!
^UTILITY($J	INIT+1, INIT+12, INIT+15, INIT+16, INIT+31, INIT+32
^XUSEC("PSOINTERFACE"	ALERT+3

Label References

Name	Line Occurrences
ACK1	ACK+15
ACK2	ACK+16
ALERT	INIT+35, INIT+36, ACK2+1
EXIT	INIT+7, INIT+8, INIT+35, INIT+36, INIT+37
EXT	ACK+6, ACK+14
FACK1	ACK1+1
FACK2	ACK2+1
UFILE	INIT+36, INIT+37

Naked Globals

Name	Field # of Occurrence
^(	UFILE
^(0	UFILE+4, FACK1+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	INIT+10, EXIT+1!
AA	ERRMSG+1, ACK+8, EXT+1!
AACK	ACK+3*, ACK+10, EXT+1!
CMID	ACK+3*, ACK+10, ACK+11, EXT+1!, FACK1+2, FACK2+2
CPY	INIT+17*, EXIT+1!
CS	INIT+9*, EXIT+1!
DA	INIT+24!, UFILE+4, EXIT+2!, FACK1+1, FACK2+1*
DAW	INIT+13*, EXIT+1!
DD	INIT+24!, INIT+27!
DFLAG	INIT+4~
DFN	INIT+17*, INIT+26, INIT+35, EXIT+2!
DIC	INIT+24!, INIT+25*, INIT+27!
DIC("DR"	INIT+26*
DIC(0	INIT+25*
DIE	UFILE+4, EXIT+2!, EXT+3!, FACK1+2, FACK2+2*
DIN	INIT+13*, INIT+14, EXIT+1!
DIV	INIT+17*, INIT+26, EXIT+2!
DIV1	ACK+13, EXT+2!, FACK1+1, FACK2+1*
DO	INIT+24!, INIT+27!
DR	UFILE+4, EXIT+2!, FACK1+2, FACK2+2*
DRI	INIT+16*, EXIT+1!
DT	INIT+8
DTM	ACK+3*, ACK+10, EXT+1!
DTME	INIT+10, INIT+11, INIT+26, EXIT+2!
EC	INIT+9*, EXIT+1!
EID	ACK+5*, ACK+10, EXT+1!
EIDS	ACK+5*, ACK+10, EXT+1!
EMSG	ERRMSG, ERRMSG+1, ERRMSG+2, EXT+3!
ERRMSG	ACK+11*, EXT+2!, ACK2
ETN	ACK+3*, ACK+10, EXT+1!
FLD12	EXT+2!, ACK2*, FACK2+2
FLD13	EXT+2!, ACK1+1, ACK2, FACK1+2, FACK2+2
FLL	EXT+2!, FACK1+3*
FLLN	EXT+2!, FACK1+3*
FP	INIT+13*, INIT+14, INIT+23, INIT+26, EXIT+1!
FPN	INIT+13*, INIT+14, INIT+23, INIT+26, EXIT+1!
FS	INIT+9, EXIT+1!, ACK+5, ACK+11, EXT+1!
HL	EXT+2!
HL("APAT"	ACK+2*, ACK+3
HL("DTM"	ACK+3
HL("EID"	ACK+5
HL("EIDS"	ACK+5
HL("ETN"	ACK+3
HL("FS"	ACK+5
HL("MID"	ACK+3
HL("MTN"	ACK+4
HL("RAN"	ACK+4
HL("SAN"	ACK+4
HL("VER"	ACK+4
HL1	INIT+8, EXIT+2!
HL1("ECH"	INIT+9*
HL1("FS"	INIT+9
HLERR	INIT+34*, INIT+36, INIT+37, EXIT+2!
HLL	INIT+34!
HLL("LINKS"	INIT+32*
HLMID	INIT+34*, INIT+35, INIT+36, INIT+37, UFILE+4, EXIT+1!
HLNEXT	ERRMSG+1, ACK+8, EXT+3!
HLNODE	ERRMSG+1, ACK+8, EXT+3!
HLP	INIT+4~, INIT+33
HLP("CONTPTR"	INIT+33*
HLPDT	INIT+8*, EXIT+2!
HLQUIT	ERRMSG+1, ACK+8, EXT+3!
HLRESLT	INIT+4~, INIT+33, INIT+34
IDGN	INIT+13*, EXIT+1!
II	INIT+12, INIT+14, INIT+15, INIT+16, UFILE, EXIT+1!
III	UFILE*, UFILE+1, EXIT+2!
ING	EXIT+1!
ING(	INIT+15*
IRX	EXT+2!, FACK1+3*
IRXN	INIT+13*, INIT+14, INIT+17, INIT+18, INIT+19, INIT+21, INIT+22, INIT+23, INIT+25, EXIT+1!
JJ	INIT+15, UFILE+3, UFILE+4, EXIT+1!
MESS	INIT+36, INIT+37, UFILE+4, EXIT+1!
MSA	ACK+7, ACK+8, ACK+10, EXT+1!
MSA1	ACK+11*, EXT+2!
MSACDE	ACK+11*, ACK+14, ACK+15, ACK+16, EXT+2!
MTN	ACK+4*, ACK+10, EXT+1!
ODR	INIT+12*, INIT+13, INIT+16, INIT+17, EXIT+1!
PAS	EXIT+2!
PFP	UFILE+1*, UFILE+4, EXIT+1!
PFPN	UFILE+1*, UFILE+4, EXIT+1!
PIEN	INIT+7*, INIT+8, INIT+33, EXIT+2!
PRSN	INIT+17*, INIT+26, EXIT+2!
PRX	UFILE+1*, UFILE+2, UFILE+3, UFILE+4, EXIT+1!
PSI	INIT+8*, EXIT+1!
PSLINK	INIT+4~, INIT+31*, INIT+32
>> PSODISP	INIT+2*, INIT+3
PSODTM	INIT+10, INIT+11, EXIT+1!
PSOHLINX	INIT+4~, INIT+5*
PSOHLNDA	INIT+19~, INIT+20, INIT+21, INIT+22
PSOHLSPZ	INIT+19~*, INIT+20
>> PSOSITE	INIT+2, INIT+17, ALERT+1
RAN	ACK+4*, ACK+10, EXT+1!
RPRT	INIT+17*, INIT+23, INIT+26, EXIT+2!
RPT	EXT+1!, FACK1+3*
RS	INIT+9*, EXIT+1!
>> RXFL(	INIT+22
>> RXPR(	INIT+21, INIT+22
>> RXRP(	INIT+22
SAN	ACK+4*, ACK+10, EXT+1!, FACK1+2, FACK2+2
SCS	INIT+9*, EXIT+1!
SDI	INIT+16*, EXIT+1!
SMID	ACK+11*, ACK+13, EXT+2!, ACK2, FACK1+1, FACK2+1
SP1	ACK+13, EXT+2!, FACK1+1, FACK1+3, FACK2+1*
SP2	ACK+13*, EXT+2!, FACK1+3
STA	INIT+36, INIT+37, UFILE+4, EXIT+1!
STPMTR	INIT+17*, INIT+18, INIT+26, EXIT+2!
UID	EXT+2!, ALERT+3*
VER	ACK+4*, ACK+6, ACK+10, EXT+1!
X	INIT+25*, EXIT+2!
XQA	ALERT+2!
XQA(	ALERT+3*
XQADATA	ALERT+2!
XQAFLAG	ALERT+2!
XQAID	ALERT+2!
>> XQAMSG	INIT+35, INIT+36, ACK2*
XQAOPT	ALERT+2!
XQAROU	ALERT+2!
XXX	EXIT+2!
Y	INIT+27!
>> ZTQUEUED	EXIT
>> ZTREQ	EXIT*

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSOHLSG

Information

Source Information

Call Graph

Call Graph Total: 11

Entry Points

External References

Used in HL7 Interface

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: