Routine: PSIVLABR

Package	Total	Call Graph
Inpatient Medications	4	$$ENDTC^PSGMI $$CONVER1^PSIVORE2 ^PSIVSTAT ENIV^PSJAC
Kernel	1	PSET^%ZISP
Pharmacy Data Management	1	$$HAZ^PSSUTIL
VA FileMan	1	(C,NOW)^%DTC

Package	Total	Caller Graph
Inpatient Medications	1	PSIVLBRP

Entry Points

Name	Comments	DBIA/ICR reference
DEM	;Get demographics and see if label is example only
SETP
ENX	;Print example label
START
Q
RE	;
SOL
MEDRT	;Find Medication Route
INF
P
PMR	; Print Med Route on label
SOL1
MESS	;PSJ5184 -make MESS a local array so all messages display for all additives.
HAZ(TYP)	; Printing hazardous to handle/dispose warnings *364 ; TYP=1 ADDITIVES \| TYPE=2 SOLUTIONS
CONVER	;Expand dose to date.dose and set in X
BARCODE

External References

Name	Field # of Occurrence
C^%DTC	CONVER+3
NOW^%DTC	DEM+7, DEM+27
PSET^%ZISP	BARCODE
$$ENDTC^PSGMI	DEM+7
$$CONVER1^PSIVORE2	CONVER+1
^PSIVSTAT	START+5
ENIV^PSJAC	DEM+7
$$HAZ^PSSUTIL	HAZ+5

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: DEM+24
Function Call: WRITE	Prompt: ! Line Location: START+2
Function Call: WRITE	Prompt: ! Line Location: P+4
Function Call: WRITE	Prompt: $E(X,1,PSIVRM) Line Location: P+8
Function Call: WRITE	Prompt: ! Line Location: P+10
Function Call: WRITE	Prompt: ! Line Location: PMR+6
Function Call: WRITE	Prompt: $E(X,1,PSIVRM) Line Location: PMR+11
Function Call: WRITE	Prompt: ! Line Location: PMR+13
Function Call: WRITE	Prompt: @IOBARON Line Location: BARCODE+2
Function Call: WRITE	Prompt: PSJBCID Line Location: BARCODE+3
Function Call: WRITE	Prompt: @IOBAROFF Line Location: BARCODE+4
Function Call: WRITE	Prompt: ! Line Location: BARCODE+5
Function Call: WRITE	Prompt: PSJBCID Line Location: BARCODE+8

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^%ZIS(2 - [#3.2]	DEM+2
^PS(	HAZ+5
^PS(51.2 - [#51.2]	DEM+20, MEDRT+3
^PS(52.6 - [#52.6]	RE+13, RE+16, MESS+1
^PS(52.7 - [#52.7]	SOL+2, SOL1
^PS(55 - [#55]	DEM+4, DEM+12, DEM+18, DEM+27*, SETP, RE+5, RE+7, RE+13, RE+16, SOL , SOL+3, MEDRT+2, INF+1, SOL1, HAZ+5
^PS(59.5 - [#59.5]	INF+6
^SC - [#44]	DEM+5, DEM+6

Label References

Name	Line Occurrences
BARCODE	RE+4
CONVER	SOL+5
ENX	DEM+8
HAZ	RE+14, RE+17, SOL+1
MEDRT	SOL+4
MESS	RE+14, RE+17
P	DEM+22, RE+8, RE+12, RE+14, RE+17, SOL+1, SOL+2, SOL+3, SOL+4, SOL+5 , INF, INF+1, INF+2, INF+3, INF+5, INF+6, INF+8, HAZ+7
PMR	DEM+21, MEDRT+4
Q	DEM+12
RE	DEM+16, START
SETP	DEM+12, ENX+1
SOL	RE+15
SOL1	SOL+1
START	DEM+28

Naked Globals

Name	Field # of Occurrence
^(	DEM+2, RE+13, RE+16, SOL
^(0	RE+13, RE+16, SOL, SOL1
^(1	DEM+2
^(3	INF+1
^(4	INF+6
^(9	DEM+27*

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	DEM+7, DEM+27
BAG	Q!
CX	Q!
>> DFN	DEM+4, DEM+12, DEM+18, DEM+27, SETP, RE+5, RE+7, RE+13, RE+16, SOL , SOL+3, MEDRT+2, INF+1, SOL1, HAZ+5
DIEN	HAZ+2~, HAZ+5*
DT	RE+5, RE+7
FIL	HAZ+2~, HAZ+3*, HAZ+5
HAZ	HAZ+2~, HAZ+5*, HAZ+6
I	DEM+1~, DEM+2, P+5, P+7, P+9, PMR+7, PMR+10, PMR+12, BARCODE+7, BARCODE+9*
>> IOBAROFF	BARCODE+4
>> IOBARON	BARCODE+2
IOST(0	DEM+2
LINE	DEM+16, DEM+24, START, START+2, Q!, P, P+1, P+2, PMR+2, PMR+3 , PMR+4
MESS	Q!, INF+5
MESS(	INF+5, MESS+1*
>> ON	DEM+4, DEM+12, DEM+18, DEM+27, SETP, RE+5, RE+7, RE+13, SOL+3, MEDRT+2 , INF+1, HAZ+5
>> P(	SETP*
>> P(11	INF+3
>> P(15	CONVER+1, CONVER+3
>> P(23	SOL+3
>> P(4	DEM+19, SOL+3, SOL+4
>> P(8	INF
>> P(9	INF+2
P16	DEM+12*, Q!
PDATE	Q!, CONVER+2, CONVER+3, CONVER+4
PDOSE	Q!, CONVER+2*, CONVER+3, CONVER+4
PSIMESS	Q!, INF+5*
PSIV	Q!, RE+13, RE+16, SOL, SOL+2, INF+6, SOL1, HAZ+5
PSIV1	DEM+11~, DEM+16, DEM+19, START*, Q!, RE+4, SOL+4, SOL+5, CONVER+1, CONVER+2 , CONVER+3
PSIV2	DEM+16*, DEM+23, Q!
>> PSIVBAG	INF+8
PSIVCLAB	DEM+1~, DEM+6*, DEM+8
PSIVCLDT	DEM+4~, DEM+5*, DEM+8
PSIVCLIN	DEM+4~, DEM+5, DEM+6, DEM+8, RE+6
PSIVCT	DEM+12!, DEM+27, START+5, Q!
PSIVDOSE	Q!, SOL+5*, CONVER+1, CONVER+2, CONVER+3
>> PSIVEXAM	DEM+8
PSIVFLAG	DEM+16, DEM+28!, ENX+1, START+1, Q!, RE+13, RE+15
>> PSIVNOL	DEM+12, DEM+16, DEM+23, DEM+27
>> PSIVNOW	DEM+7*
PSIVRM	DEM+12, ENX+1, Q!, RE+6, P+8, P+11, PMR+11, PMR+14
>> PSIVRP	DEM+17, DEM+18, DEM+20, MEDRT+1, MEDRT+2, MEDRT+3
>> PSIVRT	DEM+17, DEM+20, DEM+21, MEDRT+1, MEDRT+3, MEDRT+4
PSIVSH	DEM+28!
>> PSIVSITE	DEM+12, DEM+15, DEM+19, DEM+24, ENX+1, START+2, RE+12, SOL+4, P+1, P+4 , PMR+3, PMR+6
>> PSIVSN	INF+6
PSIVWD	DEM+8*, Q!, RE+5, RE+6, RE+7
>> PSJBCID	BARCODE+3, BARCODE+8
>> PSJIDNO	RE+16, SOL, SOL1
PSJIO	DEM+1~, DEM+3*, DEM+13, DEM+24, DEM+25, START+2, START+3, START+4, RE+3, P+3 , P+10, PMR+5, PMR+13, BARCODE+1, BARCODE+6
PSJIO(	DEM+2*, P+5, P+7, P+9, PMR+7, PMR+10, PMR+12, BARCODE+7, BARCODE+9
PSJIO("EL"	DEM+25, START+3
PSJIO("FE"	START+4
PSJIO("FI"	DEM+13
PSJIO("SL"	RE+3
>> PSJRPHD	DEM+15
PSJTRNC	RE+6~*, RE+7
TSUB	HAZ+2~, HAZ+4*, HAZ+5
TYP	HAZ~, HAZ+3, HAZ+4
U	DEM+8, DEM+12, DEM+15, DEM+18, DEM+19, DEM+20, DEM+24, DEM+27, SETP, ENX+1 , START+2, RE+5, RE+7, RE+12, RE+13, RE+16, SOL+2, SOL+3, SOL+4, MEDRT+2 , MEDRT+3, INF+6, SOL1, MESS+1
>> VADM(1	RE+12
>> VADM(2	DEM+7*, RE+5, RE+7
>> VAIN(4	DEM+8, RE+6
>> VAIN(5	RE+12
VAR	HAZ+2~, HAZ+5*
>> X	DEM+21, DEM+22, SETP, RE+5, RE+6, RE+7, RE+12, RE+13, RE+16, SOL+2* , SOL+3, SOL+4, SOL+5, MEDRT+4, INF, INF+1, INF+2, INF+3, INF+5, INF+6 , INF+8, P, P+8, P+11, PMR+2, PMR+11, PMR+14, SOL1, HAZ+6, HAZ+7 , CONVER+1, CONVER+2, CONVER+3, CONVER+4
X0	DEM+1~, DEM+2*
>> X1	CONVER+3*
>> X2	CONVER+3*
XX1	Q!, CONVER+3*
XX2	Q!, CONVER+3*
>> Y	DEM+27, SETP, RE+13, RE+16, INF+6*, MESS+1
>> YY	SOL*
ZZ	P+4, P+6!, PMR+6, PMR+8!

Customize PDF page

Package: Inpatient Medications

Routine: PSIVLABR

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: