Routine: PSIVSET

Package	Total	Call Graph
Inpatient Medications	4	ENIVKV^PSGSETU ENCHK^PSIVSET $$CODES^PSIVUTL (,SET)^PSIVXU
VA Fileman	4	NOW^%DTC ^DIC YN^DICN ^DIE
Kernel	2	^%ZIS ^%ZISC

Package

Total

Call Graph

ENIVKV^PSGSETU ENCHK^PSIVSET $$CODES^PSIVUTL (,SET)^PSIVXU

NOW^%DTC ^DIC YN^DICN ^DIE

^%ZIS ^%ZISC

Package	Total	Caller Graph
Inpatient Medications	6	PSIVCAL PSIVORFB PSIVSET PSIVXU PSJI DEVICE PSJI SITE PARAMETERS

Package

Total

Caller Graph

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"You have not selected a valid IV ROOM" Line Location: Q+1
Function Call: WRITE	Prompt: !!,"Current IV LABEL device is: ",ION Line Location: Q+3
Function Call: WRITE	Prompt: !!,"Current IV REPORT device is: ",ION Line Location: Q+5
Function Call: WRITE	Prompt: !!,$C(7),"This IV room is missing parameters." Line Location: ENCHK+1
Function Call: WRITE	Prompt: !!,$C(7),"Manufacturing Time(s) missing for " Line Location: ENCHK+3
Function Call: WRITE	Prompt: X Line Location: ENCHK+3
Function Call: READ	Prompt: !! Timeout: %=2!(%=-1) Variable: "Would you like to edit this IV room" S %=1 D YN^DICN Q Line Location: AGA+1
Function Call: WRITE	Prompt: !!,"You are signed on under the ",$P(^PS(59.5,PSIVSN,0),"^")," IV ROOM" Line Location: AGA+2
Function Call: WRITE	Prompt: ! Line Location: ENLD+1
Function Call: WRITE	Prompt: ! Line Location: ENPD+1
Function Call: WRITE	Prompt: !!,$C(7),"You must select a device." Line Location: DEVX+0
Routine Call	DIE Line Location: MULT+3 AGA+1 SITEPARM+4 SITEPARM+5
Routine Call	DIC Line Location: MULT+1 MULT+2 SITEPARM+3 SITEPARM+5
Routine Call	%ZIS Line Location: Q+3 Q+5 ENLD+1 ENPD+1

FileNo	Call Tags
^PS(59.5 - [#59.5]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^PS(59.5 - [#59.5]	ENOR+1, ENOR+2, Q+3, Q+5, ENCHK+1, ENCHK+2, ENCHK+3, AGA+2, ENLD+1, ENPD+1

Name	Field # of Occurrence
^(0	ENLD+1, ENPD+1
^(5	ENCHK+1*

Name	Field # of Occurrence
%	PSIVSET+5, ENOR+2, ENOR+3, MULT+1, Q+1, Q+2, Q1!, AGA+1, AGA+2!
%X	AGA+3!
%Y	AGA+3!
%ZIS	Q+3, Q+5, Q1!, ENLD+1, ENLD+2!, ENPD+1, ENPD+2!
%ZIS("A"	ENLD+1, ENPD+1
%ZIS("B"	ENLD+1, ENPD+1
C	AGA+3!
CHK	SITEPARM+2~
D	AGA+3!
D0	AGA+3!
D1	AGA+3!
DA	MULT+3, AGA+1, AGA+3!, SITEPARM+2~, SITEPARM+4, SITEPARM+5
DIC	MULT+1!, MULT+2, MULT+3!, AGA+3!, SITEPARM+2~, SITEPARM+3, SITEPARM+4, SITEPARM+5
DIC("A"	MULT+2*
DIC("S"	MULT+1*
DIC(0	MULT+1, MULT+2, SITEPARM+3, SITEPARM+5
DIE	MULT+3, AGA+1, AGA+3!, SITEPARM+2~, SITEPARM+4, SITEPARM+5
DIOV	SITEPARM+2~
DLAYGO	MULT+2, SITEPARM+2~, SITEPARM+5
DR	MULT+3, AGA+1, AGA+3!, SITEPARM+2~, SITEPARM+4, SITEPARM+5
DTOUT	SITEPARM+2~
ION	Q+3, Q+5, Q+8, ENLD+1, ENLD+2, ENPD+1, ENPD+2
IOP	Q+3, Q+5, Q1!, ENLD+1!, ENLD+2!, ENPD+1!, ENPD+2!
>> POP	ENLD+1, ENPD+1
PSGDT	SITEPARM+2~
PSIV	ENCHK+1, ENCHK+3, AGA+1, AGA+3!
PSIVCT	ENOR+1, ENOR+2, ENOR+3, MULT+1, MULT+2, MULT+3, Q1!
>> PSIVPL	Q+3, Q+8, ENLD+2*
>> PSIVPR	Q+5, Q+8, ENPD+2*
>> PSIVSITE	ENCHK+2*
>> PSIVSN	ENOR+1, ENOR+2, MULT+1, MULT+3, Q+1, Q+2, Q+3, Q+5, ENCHK+1, ENCHK+2 , ENCHK+3, AGA+1, AGA+2, ENLD+1, ENPD+1
TYP	ENCHK+3*, AGA+3!
U	Q+3, Q+5, ENCHK+1, ENCHK+2, ENLD+1, ENPD+1
X	ENOR+1, ENOR+2, ENCHK+3, AGA+3!
>> XQUIT	ENOR+3, MULT+1, MULT+2, Q+2, SITEPARM+1, SITEPARM+5
Y	PSIVSET+5*, MULT+1, MULT+2, MULT+3, AGA+3!, SITEPARM+3, SITEPARM+4, SITEPARM+5
Z	AGA+3!, SITEPARM+2~

Information