Routine: PSJPR0

Information

PSJPR0 ;BIR/CML3,PR-INPATIENT MEDS PROFILE - GATHER ORDERS ;2/3/92 15:43 [ 12/16/97 2:07 PM ]

Source file <PSJPR0.m>

Package	Total	Call Graph
Inpatient Medications	3	$$ENDTC^PSGMI ENUNM^PSGOU CHK^PSIVACT
VA FileMan	1	(C,NOW)^%DTC

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"...a few moments, please..." Line Location: PSJPR0+4

Name	Line Occurrences (* Changed, ! Killed)
^PS(	IV+1
^PS(52.6 - [#52.6]	IV+1
^PS(53.1 - [#53.1]	PSJPR0+8
^PS(55 - [#55]	PSJPR0+5, PSJPR0+6, PSJPR0+7, OCHK+1, ECHK+1, DS
^PSDRUG - [#50]	SET
^UTILITY("PSG"	PSJPR0+3!, IV+1, SET

Name	Field # of Occurrence
^(	PSJPR0+7
^(0	PSJPR0+7, PSJPR0+8, OCHK+1, ECHK+1, IV+1, DS, SET
^(1	PSJPR0+8
^(4	OCHK+1, ECHK+1

Name	Field # of Occurrence
>> %	PSJPR0+3
>> C	PSJPR0+5, PSJPR0+7, PSJPR0+8, OCHK+1, ECHK+1*, IV+1, SET
>> DFN	PSJPR0+7, IV+1
>> DRG	PSJPR0+8, DS, SET
DT	PSJPR0+3*
>> HDT	PSJPR0+3*
>> IV	PSJPR0+7*
>> O	PSJPR0+5, PSJPR0+6, PSJPR0+8*, OCHK+1, ECHK+1, DS, SET
>> ON	PSJPR0+7*, IV+1
PS	PSJPR0+7!
>> PSGDT	PSJPR0+3*, PSJPR0+7, OCHK+1, ECHK+1
>> PSGID	PSJPR0+3*
>> PSGODT	PSJPR0+3*, OCHK+1, ECHK+1
>> PSGOL	PSJPR0+7, OCHK+1, ECHK+1
>> PSGP	PSJPR0+5, PSJPR0+6, PSJPR0+8, OCHK+1, ECHK+1, DS
>> PSGPAD	PSJPR0+5, PSJPR0+6
>> PSJSYSU	OCHK+1
>> SD	PSJPR0+5, PSJPR0+6, PSJPR0+8*, OCHK+1, ECHK+1
>> ST	PSJPR0+5, PSJPR0+6, PSJPR0+7, PSJPR0+8, IV+1, SET
>> X	PSJPR0+3
>> X1	PSJPR0+3*
>> X2	PSJPR0+3*