Routine: PSOHLDS

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	^PSOHLDIS START^PSOHLDS1 SUS^PSOLBL4
Kernel	1	SETUP^XQALERT

Package	Total	Caller Graph
Outpatient Pharmacy	1	PSOHLSG

Entry Points

Name	Comments	DBIA/ICR reference
FACK1	;
ACK	;process MSA received from the dispense machine (client)
INIT	;initialize variables and build outgoing message
ALERT	;send alert to key holders
EXT	;
EXIT
UFILE
ACK2
FACK2	;
ACK1	;
UDFILE	;updates from vendor
ERRMSG

External References

Name	Field # of Occurrence
NOW^%DTC	INIT+8, FACK2+4
FILE^DICN	INIT+24
^DIE	UFILE+4, UDFILE+2, FACK1+6
$$GET1^DIQ	INIT+28
$$GETAPP^HLCS2	INIT+2
INIT^HLFNC2	INIT+5
GENERATE^HLMA	INIT+30
^PSOHLDIS	FACK1+6
START^PSOHLDS1	INIT+24
SUS^PSOLBL4	INIT+21
SETUP^XQALERT	ALERT+3

Used in HL7 Interface

HL7 Protocol Name	Call Tags
PSO EXT SERVER	ACK
PSO DISP CLIENT	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+32
^ORD(101 - [#101]	INIT+4
^PS(52.5 - [#52.5]	INIT+17, INIT+18
^PS(52.51 - [#52.51]	UFILE+2, UFILE+3, UFILE+4, ACK+14, UDFILE+1, FACK1+3, FACK1+5, FACK2+1, FACK2+2
^PS(59 - [#59]	INIT+15
^PSRX - [#52]	INIT+15, INIT+16, FACK2+1, FACK2+2, FACK2+3, FACK2+4, FACK2+5
^TMP("HLS"	INIT+25!, INIT+26*, EXIT+3!
^TMP("PSO"	INIT+3!, INIT+26!, EXIT+3!
^TMP("PSO1"	ACK+12*, EXT+1!
^TMP("PSO2"	ERRMSG+2*
^TMP("PSOMID"	INIT+12*, UFILE, EXIT+1!
^UTILITY($J	INIT+10, INIT+13, INIT+14, INIT+27
^XUSEC("PSOINTERFACE"	ALERT+2

Label References

Name	Line Occurrences
ACK1	ACK+16
ACK2	ACK+17
ALERT	INIT+32, INIT+33, ACK2+1
EXIT	INIT+4, INIT+5, INIT+32, INIT+33, INIT+34
EXT	ACK+6, ACK+15
FACK1	ACK1+1
FACK2	ACK2+1
UDFILE	FACK1+1, FACK2+1
UFILE	INIT+33, INIT+34

Naked Globals

Name	Field # of Occurrence
^(	UFILE
^(0	UFILE+4, FACK1+5, FACK2+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	INIT+8, EXIT+1!, FACK2+5
AA	ERRMSG+1*, EXT+1!
AACK	ACK+3*, ACK+12, EXT+1!
ACL	FACK2+2, FACK2+3, FACK2+4*, FACK2+5!
CMID	ACK+3*, ACK+12, EXT+1!, UDFILE+2, FACK1+6
CPY	INIT+15*, EXIT+1!
CS	INIT+7*, EXIT+1!
DA	INIT+22!, UFILE+4, EXIT+2!, UDFILE+1, FACK1+3*, FACK1+4, FACK1+5
DAW	INIT+11*, EXIT+1!
DD	INIT+22!, INIT+24!
>> DDNS	INIT+28*, INIT+29
DFLAG	INIT+1~
DFN	INIT+15*, INIT+23, INIT+32, EXIT+2!
DIC	INIT+22!*, INIT+24!
DIC("DR"	INIT+23*
DIC(0	INIT+22*
DIE	UFILE+4, EXIT+2!, EXT+3!, UDFILE+2, FACK1+6*
DIK	INIT+22!
DIN	INIT+11*, INIT+12, EXIT+1!
DIV	INIT+15*, INIT+23, EXIT+2!
DIV1	ACK+14, EXT+2!, UDFILE+1
DO	INIT+22!, INIT+24!
>> DPORT	INIT+28*, INIT+29
DR	UFILE+4, EXIT+2!, UDFILE+2, FACK1+6*
DRI	INIT+14*, EXIT+1!
DT	INIT+5
DTM	ACK+3*, ACK+12, EXT+1!
DTME	INIT+8, INIT+9, INIT+23, EXIT+2!
EC	INIT+7*, EXIT+1!
EID	ACK+5*, ACK+12, EXT+1!
EIDS	ACK+5*, ACK+12, EXT+1!
EIN	EXT+3!, UDFILE+1, FACK1+3, FACK1+6!, FACK2+1, FACK2+2
EMSG	ERRMSG, ERRMSG+1, ERRMSG+2, EXT+3!
ERRMSG	ACK+8*, EXT+2!, ACK2
ETN	ACK+3*, ACK+12, EXT+1!
FLD12	EXT+2!, ACK2*
FLD13	EXT+2!, ACK1+1, ACK2, UDFILE+2, FACK1+6
FLL	EXT+2!, FACK2+2*, FACK2+5
FLLN	EXT+2!, FACK2+2*, FACK2+5
FP	INIT+11*, INIT+12, INIT+21, INIT+23, EXIT+1!
FPN	INIT+11*, INIT+12, INIT+21, INIT+23, EXIT+1!
FS	INIT+6, EXIT+1!, ACK+5, 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+5, EXIT+2!
HL1("ECH"	INIT+6*, INIT+7
HL1("FS"	INIT+6
>> HLECH	INIT+6*
HLERR	INIT+31*, INIT+33, INIT+34, EXIT+2!
HLL	INIT+31!
HLMID	INIT+31*, INIT+32, INIT+33, INIT+34, UFILE+4, EXIT+1!
HLNEXT	ERRMSG+1, ACK+7, EXT+3!
HLNODE	ERRMSG+1, ACK+7, EXT+3!
HLNODE(	ACK+10
HLP	INIT+1~, INIT+30
HLP("CONTPTR"	INIT+29*
HLP("SUBSCRIBER"	INIT+29*
HLPDT	INIT+5*, EXIT+2!
HLQUIT	ERRMSG+1, ACK+7, EXT+3!
HLRESLT	INIT+1~, INIT+30, INIT+31
HLRPT	FACK1+5*, FACK1+6!
HLUSER	FACK1+5*, FACK1+6!
I	ACK+7, ACK+8, ACK+9, ACK+10, FACK2+3, FACK2+5!
IDGN	INIT+11*, EXIT+1!
II	INIT+10, INIT+12, INIT+13, INIT+14, UFILE, EXIT+1!
III	UFILE*, UFILE+1, EXIT+2!
ING	EXIT+1!
ING(	INIT+13*
IRX	EXT+2!, FACK2+2*, FACK2+3, FACK2+4, FACK2+5
IRXN	INIT+11*, INIT+12, INIT+15, INIT+16, INIT+17, INIT+19, INIT+20, INIT+21, INIT+22, EXIT+1!
>> J	ACK+7, ACK+10
JJ	INIT+13, UFILE+3, UFILE+4, EXIT+1!
MESS	INIT+33, INIT+34, UFILE+4, EXIT+1!
MSA	EXT+1!
MSA1	EXT+2!
MSACDE	ACK+8*, ACK+15, ACK+16, ACK+17, EXT+2!
MTN	ACK+4*, ACK+12, EXT+1!
ODR	INIT+10*, INIT+11, INIT+14, INIT+15, EXIT+1!
ORC	ACK+7~, ACK+9*, EXT+3!, ACK1+1, FACK1+1, FACK1+2, FACK1+3
PAS	EXIT+2!
PAS1	EXIT+2!
PAS2	EXIT+2!
PAS3	EXIT+2!
PFP	UFILE+1*, UFILE+4, EXIT+1!
PFPN	UFILE+1*, UFILE+4, EXIT+1!
PIEN	INIT+4*, INIT+5, INIT+30, EXIT+2!
PRSN	INIT+15*, INIT+23, EXIT+2!
PRX	UFILE+1*, UFILE+2, UFILE+3, UFILE+4, EXIT+1!
PSI	INIT+5*, EXIT+1!
PSLINK	INIT+1~, INIT+27*
PSODTM	INIT+8, INIT+9, EXIT+1!
PSOHLCL	INIT+1~
PSOHLINX	INIT+1~, INIT+2*
PSOHLNDA	INIT+17~, INIT+18, INIT+19, INIT+20
PSOHLSER	INIT+1~
PSOHLSPZ	INIT+17~*, INIT+18
PSOMSG	ACK+7!, EXT+3!
PSOMSG(	ACK+7, ACK+8, ACK+9, ACK+10
>> PSOSITE	INIT+15, INIT+28
RAN	ACK+4*, ACK+12, EXT+1!
RPRT	INIT+15*, INIT+21, INIT+23, EXIT+2!
RPT	EXT+1!
RS	INIT+7*, EXIT+1!
>> RX	FACK1+3*
>> RXFL(	INIT+20
RXN	FACK1+3, FACK2+2, FACK2+5!
>> RXPR(	INIT+19, INIT+20
>> RXRP(	INIT+20
SAN	ACK+4*, ACK+12, EXT+1!, UDFILE+2, FACK1+6
SCS	INIT+7*, EXIT+1!
SDI	INIT+14*, EXIT+1!
SMID	ACK+8*, ACK+14, EXT+2!, ACK2, UDFILE+1
SP1	ACK+14, EXT+2!, UDFILE+1
SP2	ACK+14*, EXT+2!
STA	INIT+33, INIT+34, UFILE+4, EXIT+1!
STPMTR	INIT+15*, INIT+16, INIT+23, EXIT+2!
>> SUB	FACK2+3*
UID	EXT+2!, ALERT+2*
VER	ACK+4*, ACK+6, ACK+12, EXT+1!
X	INIT+22*, EXIT+2!
XQA	ALERT+1!
XQA(	ALERT+2*
XQADATA	ALERT+1!
XQAFLAG	ALERT+1!
XQAID	ALERT+1!
>> XQAMSG	INIT+32, INIT+33, ACK2*
XQAOPT	ALERT+1!
XQAROU	ALERT+1!
XXX	EXIT+2!
Y	INIT+24!
>> ZTQUEUED	EXIT
>> ZTREQ	EXIT*

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSOHLDS

Information

Source Information

Call Graph

Call Graph Total: 11

Caller Graph

Caller Graph Total: 1

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: