Routine: PSIVST2

Package	Total	Caller Graph
Inpatient Medications	1	PSIVSTAT

Entry Points

Name	Comments	DBIA/ICR reference
SUB3	;Set up the patient,provider,and ward subfiles of the drug.
CT1	;
DRUG	;Get the order drugs.
ENCT	;Need DFN, PSIVS, ON, PSIVNOL,W42, PSIVC AND PSIVD
W2	;Set up ward destroyed,recycled,cancelled node.
W1	;Set up ward dispensed node.
DATE	;Set up date node.
OV	;Update or set drug node.
WARD
CT	;Set up 0 node, get drug node if not already there.

Name	Line Occurrences (* Changed, ! Killed)
^DIC(42 - [#42]	W1+1
^DPT - [#2]	W1+1
^PS(	OV+1
^PS(50.8 - [#50.8]	DATE+1, W1+2, W1+3, W2+1, CT+1, CT+2, OV+1, OV+3, OV+4, CT1+1* , CT1+4, WARD, WARD+1, WARD+2, WARD+4*
^PS(55 - [#55]	ENCT+1, DRUG+1
^PSDRUG - [#50]	OV+4

Name	Field # of Occurrence
^(	DATE+1, W1+1, W1+2, W2+1*, DRUG+1, CT+1, CT1+1
^(0	DATE+1, W1+2, W1+3, CT+1, OV+1, CT1+1, CT1+4, WARD, WARD+1, WARD+2

Name	Field # of Occurrence
A	DRUG+2!, WARD+1, WARD+2, WARD+4
DA	CT+1*, CT+2, OV+1, OV+3, OV+4, SUB3+2!, CT1+1, CT1+4, WARD, WARD+1 , WARD+2, WARD+4
>> DFN	ENCT+1, W1+1, DRUG+1, SUB3+1
>> DPC	OV+1*, OV+2
FI	DRUG+1*, DRUG+2!, CT+1, OV+1, OV+2, OV+4
>> I	DRUG+1*
>> IV	ENCT+1*, DATE+1, W1+2, W1+3, W2+1, CT+1, CT+2, OV+1, OV+3, OV+4 , CT1+1, CT1+4, WARD, WARD+1, WARD+2, WARD+4
>> LO	WARD+2, WARD+4
NODE	W2+1*, DRUG+2!
>> ON	ENCT+1, DRUG+1
P16	ENCT+1*, DRUG+2!, SUB3+1
P4	ENCT+1*, W1+2, DRUG+2!, WARD+1, WARD+2, WARD+4
PCE	DRUG+2!, CT1+2, CT1+3, CT1+4
PDR	DRUG+1*, DRUG+2!, CT+1, OV+1, OV+2, OV+4, CT1+4, WARD+4
PIECE	DRUG+2!, WARD+3, WARD+4
>> PNL	ENCT+1*, W1+3, W2+1, OV+2, CT1+4, WARD+4
>> PSIV	SUB3+1*, CT1+1, CT1+2, CT1+3, CT1+4, WARD, WARD+1, WARD+2, WARD+4
>> PSIVC	W1+3, W2+1, OV+1, OV+2, CT1+2, CT1+3, WARD+3, WARD+4
>> PSIVD	DATE+1, W1+2, W1+3, W2+1, CT+1, CT+2, OV+1, OV+3, OV+4, CT1+1 , CT1+4, WARD, WARD+1, WARD+2, WARD+4
>> PSIVNOL	ENCT+1
>> PSIVS	ENCT+1
U	ENCT+1, DATE+1, W1+1, W1+2, W1+3, W2+1, CT+1, CT+2, OV+1, OV+2 , OV+4, CT1+1, CT1+4, WARD+1, WARD+4
W42	W1+1*, W1+2, W1+3, W2+1, DRUG+2!, SUB3+1, CT1+4
WPC	W1+2*, W1+3, W2+1, DRUG+2!
>> X	ENCT+1, OV+1, OV+2, OV+4, SUB3+1*, CT1+1, CT1+4, WARD, WARD+1, WARD+2 , WARD+4
>> Y	OV+1, OV+2, OV+3
>> Z	WARD+1*