Routine: PSJHIS

Call Graph

Package	Total	Call Graph
Inpatient Medications	7	$$ENDTC^PSGMI EN2^PSGVW GT531^PSIVORFA GT55^PSIVORFB ENNH^PSIVORV2 ENBOTH^PSJAC ENTRY^PSJHEAD
Kernel	3	(,HOME)^%ZIS ^%ZISC ^%ZTLOAD
VA Fileman	2	NOW^%DTC ^DIR

Package	Total	Caller Graph
Inpatient Medications	2	PSGOEL PSIVVW1

Name	Comments	DBIA/ICR reference
PAUSE	; Hold screen.
ENHEAD	; Header for Inpatient History log.
DEQ	; Entry from queue.
K	; Kill and exit.
ENHIS(DFN,PSJHON,PSJHT)	; History log from beginning.
RELATE	; Get related order.
DISPLAY	; Display order.

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: ENHIS+1
Function Call: WRITE	Prompt: !,"NO DEVICE SELECTED OR REPORT PRINTED" Line Location: ENHIS+1
Function Call: WRITE	Prompt: W Condition for execution: 'PSJPTR&($Y) @IOF I '$L(PSJOLD_PSJNEW) Line Location: DEQ+3
Function Call: WRITE	Prompt: !!,?27,"No History Log to Report." Line Location: DEQ+3
Routine Call	%ZIS Line Location: ENHIS+4
Routine Call	DIR Line Location: PAUSE+1
Routine Call	%ZIS Line Location: ENHIS+1

Name	Line Occurrences (* Changed, ! Killed)
^PS(53.1 - [#53.1]	DISPLAY+2, RELATE+3
^PS(55 - [#55]	RELATE+1, RELATE+2

Name	Field # of Occurrence
^(0	RELATE+1, RELATE+3
^(2	RELATE+2

Name	Field # of Occurrence
>> %	DEQ+2
%ZIS	ENHIS+1!*
DFN	ENHIS~, DEQ+2, K+1!, DISPLAY+2, RELATE+1, RELATE+2
DIR	DEQ+1~, PAUSE+1!
DIR(0	PAUSE+1*
DONE	DEQ+1~, DEQ+5, PAUSE+1*
DTOUT	DEQ+1~, PAUSE+1
DUOUT	DEQ+1~, PAUSE+1
HDT	DEQ+1~, DEQ+2*
IO	DEQ+2
IO("Q"	ENHIS+1!, ENHIS+2!
IOF	DEQ+3, K+2
ION	ENHIS+2
IOP	ENHIS+1!
IOST	DEQ+2
ON	DEQ+1~, DEQ+2, DEQ+4, DEQ+5*, DISPLAY+1, DISPLAY+2, DISPLAY+3, RELATE+1, RELATE+2, RELATE+3
ON55	DEQ+1~, DISPLAY+1*
P	DEQ+1~
PG	DEQ+1~, DEQ+2*
>> POP	ENHIS+1
PPAGE	DEQ+1~, ENHEAD+1*
PSGORD	DEQ+1~, DISPLAY+3*
>> PSGP	DEQ+2*, ENHEAD+1
PSIVAC	DEQ+1~, DEQ+2*
PSJACNWP	DEQ+1~, DEQ+2*
PSJHON	ENHIS~, DEQ+2, DEQ+4, K+1!
PSJHT	ENHIS~, K+1!, DISPLAY+2
PSJLM	DISPLAY+3~
PSJNEW	DEQ+1~, DEQ+3, DEQ+5, RELATE+1, RELATE+2, RELATE+3*, ENHEAD+1~
>> PSJOLD	DEQ+3, DEQ+4, RELATE+1, RELATE+2, RELATE+3
>> PSJORD	DISPLAY+1*
PSJPTR	DEQ+1~, DEQ+2*, DEQ+3, DEQ+5, K+2
U	DISPLAY+2, RELATE+1, RELATE+2, RELATE+3
UL80	DEQ+1~, DEQ+2*
>> X	ENHIS+2*
>> ZTDESC	ENHIS+2*
ZTDTH	ENHIS+2!
>> ZTIO	ENHIS+2*
>> ZTQUEUED	K+2
>> ZTREQ	K+2*
>> ZTRTN	ENHIS+2*
ZTSAVE	ENHIS+2!
ZTSAVE(	ENHIS+2*
ZTSK	ENHIS+2!, ENHIS+3