Routine: PSIVLBDL

Information

PSIVLBDL ;BIR/PR,CML3-DELETE LBLS FROM SUSPENSE ;02 FEB 94 / 1:54 PM

Package	Total	Call Graph
Inpatient Medications	5	ENIVKV^PSGSETU ENGETP^PSIV ^PSIVHLP1 ENP3^PSIVRNL ^PSIVXU
VA Fileman	1	NOW^%DTC

Package	Total	Caller Graph
Inpatient Medications	1	PSJI SUSLBDEL

Name	Line Occurrences
Function Call: WRITE	Prompt: !?3,"...one moment, please..." Line Location: PSIVLBDL+4
Function Call: WRITE	Prompt: !!,"There are no labels on suspense for this patient." Line Location: START+1
Function Call: WRITE	Prompt: !,"Select Order Number: " Line Location: DELINE+1
Function Call: WRITE	Prompt: !,"or press return to view more " Line Location: DELINE+1
Function Call: READ	Timeout: DTIME Variable: X Line Location: DELINE+2
Function Call: READ	Prompt: "Press return to continue " Formatting: ! Timeout: DTIME Variable: Y Line Location: DELINE+3
Function Call: WRITE	Prompt: DELINE Condition for execution: '$D(X) $C(7)," ??" G:'$D(X) Line Location: DELINE+4
Function Call: WRITE	Prompt: !,"Deleted." Line Location: DELINE+4
Function Call: WRITE	Prompt: @IOF Condition for execution: $Y Line Location: HDR+1
Function Call: WRITE	Prompt: !!,"Patient Name ",VADM(1)," (",$S(VAIN(4):$P(VAIN(4),U,2),1:"Outpatient IV"),")",!,"Order Number",?30,"Order",?IOM-11,"Suspended",! Line Location: HDR+1
Function Call: WRITE	Prompt: "-" Line Location: HDR+1
Function Call: WRITE	Prompt: !,ON,$J(+Y_" label"_$S(+Y>1:"s",1:"")_" "_$P(Y,"^",2),IOM-1-$X),! Line Location: PRNT+1

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	PRNT
^PS(55 - [#55]	START+1, SUSLP1+1, LP, LP+1, PRNT, KILL+1!, KILL+2!, KILL+3!, SET+1, EXPCHK+2!

Name	Field # of Occurrence
^(0	EXPCHK+2

Name	Field # of Occurrence
%	DONE+1!, EXPCHK+2
A	DONE+1!
B1	DONE+1!, KILL+1*
B2	DONE+1!, KILL+1*
BB	DONE+1!
DFN	PSIVLBDL+4, START+1, DONE+1!, SUSLP1+1, LP, LP+1, PRNT, KILL+1, KILL+2, KILL+3 , SET+1, EXPCHK+2
DIC	DONE+1!
DTIME	DELINE+2, DELINE+3
FL	DONE+1!
HELP	DONE+1!, DELINE+3*
IOF	HDR+1
IOM	HDR+1, PRNT+1
IOSL	SUSLP1+1
J	DONE+1!
K	DONE+1!
KK	DONE+1!, KILL+3*
ON	DONE+1!, SUSLP1+1, DELINE+1, DELINE+2, LP, LP+1, PRNT, PRNT+1, KILL+1, KILL+2* , EXPCHK+2*
P	DONE+1!
P(	LP*
PSGDT	DONE+1!
PSIV	DONE+1!, PRNT+2*
PSIVAC	PSIVLBDL+4*, DONE+1!
PSIVCT	DONE+1!
>> PSIVD	KILL+3*
PSIVDT	DONE+1!, LP+1*, PRNT
PSIVRD	DONE+1!
>> PSIVSN	START+1, SUSLP1+1, LP+1, PRNT, KILL+1, KILL+2, KILL+3, SET+1, EXPCHK+2
>> Q	ONC+2*
SSNF	PRNT+2*!
TN	DONE+1!
U	HDR+1, EXPCHK+2
>> VADM(1	HDR+1
VAERR	DONE+1!
>> VAIN(4	HDR+1
X	START+2, DONE+1!, SUSLP1+1, SUSLP1+2, DELINE+2, DELINE+3, DELINE+4, HDR+1, LP, KILL+1 , KILL+2, KILL+4, ONC+2, SET+1!, EXPCHK+2*
X1	DONE+1!, ONC+2*, SET+1, SET+2, SET+3
X2	DONE+1!
XQUIT	PSIVLBDL+3!
Y	DONE+1!, DELINE+3, LP, PRNT, PRNT+1, KILL+1, ONC+1!, SET+2*, SET+3
Y(	KILL+1, SET+2, SET+3
Y(1	ONC+1*
Z	DONE+1!