Routine: PSSHLU

Package	Total	Call Graph
Kernel	1	MSG^XQOR

Package

Total

Call Graph

MSG^XQOR

Package	Total	Caller Graph
Pharmacy Data Management	2	PSSHL1 PSSHLSCH

Package

Total

Caller Graph

Name	Comments	DBIA/ICR reference
MF(HLEVN)	; call DHCP HL7 -or- protocol, to pass Master File transactions ; HLEVN = number of segments in message
IVFLAG	;
CALL(HLEVN)	; call DHCP HL7 package -or- protocol, to pass Orders ; HLEVN = number of segments in message
SCH(HLEVN)
USAGE(POI)	;
SEGMENT(LIMIT)	;
INIT	; set up HL7 application variables

Name	Field # of Occurrence
MSG^XQOR	CALL+4, MF+4, SCH+2

Name	Line Occurrences
Function Call: WRITE	Prompt: !!?7,"THE HL7 INITIALIZATION FAILED",!! Line Location: INIT+1

Name	Line Occurrences (* Changed, ! Killed)
^DIC(4 - [#4]	INIT+3
^PS(50.7 - [#50.7]	USAGE+2, USAGE+3
^PS(52.6 - [#52.6]	USAGE+8, USAGE+10
^PS(52.7 - [#52.7]	USAGE+12, USAGE+14
^PSDRUG - [#50]	USAGE+4, USAGE+5
^PSDRUG("A526"	USAGE+7
^PSDRUG("A527"	USAGE+11
^TMP("HLS"	INIT+3, SEGMENT+7, SEGMENT+8*
^XMB(1 - [#4.3]	INIT+3

Name	Line Occurrences
IVFLAG	USAGE+2

Name	Field # of Occurrence
^("I"	USAGE+4

Name	Field # of Occurrence
DT	USAGE+4, USAGE+8, USAGE+12
>> FIELD(	SEGMENT+2, SEGMENT+3, SEGMENT+4, SEGMENT+5, SEGMENT+6
HLEVN	CALL~, MF~, SCH~
I	USAGE+1~, USAGE+3, USAGE+5, IVFLAG+1
>> J	SEGMENT+1, SEGMENT+2, SEGMENT+3, SEGMENT+4, SEGMENT+5, SEGMENT+6, SEGMENT+8
LIMIT	SEGMENT~, SEGMENT+1
>> MSG	CALL+3, CALL+4, MF+3, MF+4, SCH+1*, SCH+2
POI	USAGE~, USAGE+2, USAGE+3
>> PSJCLEAR	INIT+4*
>> PSJI	INIT+2, INIT+3, SEGMENT+7, SEGMENT+8
PSSDDINX	USAGE+1~, USAGE+3*, USAGE+4, USAGE+5, USAGE+7, USAGE+11
PSSHINST	INIT+3*!
PSSOAD	USAGE+6~, USAGE+7*, USAGE+8, USAGE+10
PSSOSD	USAGE+6~, USAGE+11*, USAGE+12, USAGE+14
SEGLENGT	SEGMENT+1~, SEGMENT+3*, SEGMENT+4, SEGMENT+6
>> SEGMENT(	SEGMENT+1, SEGMENT+2, SEGMENT+3, SEGMENT+4, SEGMENT+5, SEGMENT+6*, SEGMENT+8
>> SEGMENT(0	SEGMENT+7
SUBSEG	SEGMENT+1~, SEGMENT+2, SEGMENT+3, SEGMENT+4, SEGMENT+5, SEGMENT+6*
USAGE	USAGE+1~, USAGE+5, IVFLAG+1, IVFLAG+2
USAGE(	USAGE+1, USAGE+5, IVFLAG+1
USAGE("A"	USAGE+10*
USAGE("B"	USAGE+14*
USAGE("I"	USAGE+9, USAGE+13
USAGE("V"	USAGE+9, USAGE+13

Information