Home Package List Routine Alphabetical List Global Alphabetical List FileMan Files List FileMan Sub-Files List Package Component Lists Package-Namespace Mapping

Info | Source | Call Graph | Entry Points | External References | Global Variables Directly Accessed | Label References | Naked Globals | Local Variables | All

Print Page as PDF

Routine: PSIVDCR

Package: Inpatient Medications

Routine: PSIVDCR

Information

PSIVDCR ;BIR/PR-BUILD DRUG COST RPT. ;16 DEC 97 / 1:39 PM

Source Information

Source file <PSIVDCR.m>

Call Graph

Call Graph Total: 3

Package	Total	Call Graph
Kernel	2	^%ZIS ^%ZTLOAD
Inpatient Medications	1	^PSIVDCR1

Entry Points

Name	Comments	DBIA/ICR reference
RM1	;1 IV room
SUB	;Set the sub routine call variable
K	;
51	;VA code continued
1	;All drugs or high/low cost
61	;IV type continued
3	;1 drug
2	;Non-formulary drugs
5	;VA drug class code
4	;IV category
B2	;
6	;IV type A,P,H,C,S NOTE: This report cannot include patient data.
NQ	;No queue so go print.
B	;Build utility by the (W)ard or (P)atient subfile of the drug subfile.
RMALL	;All IV rooms
B1	;

External References

Name	Field # of Occurrence
^%ZIS	RMALL+4
^%ZTLOAD	RMALL+4
^PSIVDCR1	NQ+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(42 - [#42]	B+7
^DPT - [#2]	B+7
^PS(50.2 - [#50.2]	4+1
^PS(50.8 - [#50.8]	RM1+1, RMALL+1, 1+1, 2+1, 3+1, 4+1, 5+2, 6+1, 61+1, B+4 , B+7, B1+1
^PSDRUG - [#50]	51+1, 51+3
^UTILITY($J	SUB+1!, B+6, B1+4

Label References

Name	Line Occurrences
51	5+2
61	6+1
@(	RM1+1, RMALL+1
B	1+1, 2+1, 3+1, 4+1, 51+1, 51+3, 61+1
B1	B+7
B2	B1+4
K	RMALL+4, NQ+1

Naked Globals

Name	Field # of Occurrence
^(	RM1+1, RMALL+1, 1+1, 2+1, 3+1, 4+1, 5+2, 6+1, 61+1, B+7
^("PSIV"	SUB+1!
^(0	B+6, B+7, B1+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	K+2!
%I	K+2!
%ZIS	RMALL+4*, K+2!
B1	B+4, B+5, B+6, K+2!
B2	B+4, B+5, B+6, K+2!
B3	B+4, B+5, B+6, K+2!
B4	B+4, B+5, B+6, K+2!
BRIEF	K+2!
C	K+2!
C1	B1+1, B1+2, B2+1, K+2!
C2	B1+1, B1+2, B2+1, K+2!
C3	B1+1, B1+2, B2+1, K+2!
C4	B1+1*, B2+1, K+2!
D5	4+1, 5+2, 51+1, 51+3, K+2!
DA	1+1, 2+1, 3+1, 4+1, 5+2, 6+1, 61+1, B+4, B+7, B1+1 , K+2!
DA(1	61+1*, K+2!
DAT	RM1+1, RMALL+1, 1+1, 2+1, 3+1, 4+1, 5+2, 6+1, 61+1, B+4 , B+7, B1+1, K+2!
DRUG	B+4*, B+6, B1+4, K+2!
G	RMALL+3, B+4, B1+1*, K+2!
G1	61+1*, B+5, B1+2, K+2!
>> G4	B1+2*
I15	K+2!
I2	SUB+1, 3+1, 4+1, 51+1, 51+2, 51+3, 6+1, K+2!
I4	RM1+1, RMALL+1, K+2!
I6	RMALL+3, RMALL+4, K+2!
I7	RM1+1, RMALL+1, K+2!
I8	RM1+1, RMALL+1, K+2!
>> IOP	RMALL+4*
J	2+1, 3+1, 4+1, 5+2, B+6, B1+4, B2+1*, K+2!
MT	51+1*, K+2!
NA	RM1+1, RMALL+1, 2+1, 3+1, 4+1, 5+2, K+2!
P	B+7*, B1+1, K+2!
PD	B+7*, B1+4, K+2!
PQ	B+7, B1+1, B1+4, K+2!
S	SUB+1*, RM1+1, RMALL+1, K+2!
SMO	K+2!
TW	61+1*, B1+2, K+2!
TYPE	SUB+1!, 6+1*, 61+1, B+5, B1+2, K+2!
U	51+1, 51+3, B+4, B+5, B+6, B+7, B1+1, B1+2, B1+4, B2+1
U1	B+4, B+5, B+6, B1+1, B1+2, B1+4, K+2!
U2	B+4, B+5, B1+1, B1+2, B1+4, K+2!
U3	B+4, B+5, B+6, B1+1, B1+2, B1+4, K+2!
U4	B+4, B+5, B+6, B1+1, B1+2, B1+4, K+2!
UM	B+4*, B+6, K+2!
UNCOST	B+4*, B+6, B1+1, B1+2, B1+4, K+2!
US	K+2!
V	RM1+1, RMALL+1, 1+1, 2+1, 3+1, 4+1, 5+2, 6+1, 61+1, B+4 , B+6, B+7, B1+1, B1+4, K+2!
VA	SUB+1!, K+2!
W	B+7*, B1+1, B1+2, K+2!
WD	B+7*, B1+4, K+2!
X	K+2!
>> ZTDESC	RMALL+3*
>> ZTDTH	RMALL+3*
>> ZTIO	RMALL+3*
>> ZTQUEUED	K+1
>> ZTREQ	K+1*
>> ZTRTN	RMALL+3*
>> ZTSAVE(	RMALL+3*

Info | Source | Call Graph | Entry Points | External References | Global Variables Directly Accessed | Label References | Naked Globals | Local Variables | All