Routine: PSIVORE1

Package	Total	Call Graph
Inpatient Medications	8	ENQ^PSIV ^PSIVHLP ^PSIVHYPL ^PSIVLABL ^PSIVLTR ($$CONVER,C,K,TL)^PSIVORE2 ENP3^PSIVWL $$LASTREN^PSJLMPRI
Kernel	2	^%ZTLOAD $$FMADD^XLFDT
Registration	1	FULL^VALM1
VA Fileman	1	(C,NOW)^%DTC

Package

Total

Call Graph

Inpatient Medications

ENQ^PSIV ^PSIVHLP ^PSIVHYPL ^PSIVLABL ^PSIVLTR ($$CONVER,C,K,TL)^PSIVORE2 ENP3^PSIVWL $$LASTREN^PSJLMPRI

Kernel

^%ZTLOAD $$FMADD^XLFDT

Registration

FULL^VALM1

VA Fileman

(C,NOW)^%DTC

Package	Total	Caller Graph
Inpatient Medications	5	PSIVCHK PSIVOPT1 PSIVORC2 PSJLIACT PSJOEA2

Package

Total

Caller Graph

Inpatient Medications

PSIVCHK PSIVOPT1 PSIVORC2 PSJLIACT PSJOEA2

Name	Comments	DBIA/ICR reference
B
SS	;
EC	;
P	;
S	;
B1	;
STR	;
ACT	; Prompt and process label action.
GSTRING	; Setup edit "^" string.

External References

Name	Field # of Occurrence
C^%DTC	EC+1, EC+2, SS+7
NOW^%DTC	S+11, P+5, SS+4, SS+9
^%ZTLOAD	SS+12
ENQ^PSIV	B1+2, SS+1
^PSIVHLP	B1+2
^PSIVHYPL	SS+10
^PSIVLABL	SS+10
^PSIVLTR	SS+9, SS+10
$$CONVER^PSIVORE2	P+4
C^PSIVORE2	B1+3
K^PSIVORE2	B, B1+2
TL^PSIVORE2	P+5
ENP3^PSIVWL	S+3, EC+4
$$LASTREN^PSJLMPRI	S+2
FULL^VALM1	P+2
$$FMADD^XLFDT	S+5

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: $E(X,4,5)_"/"_$E(X,6,7)_"/"_$E(X,2,3)_" "_$E(X#1_"000",2,5)_" : " Line Location: P+4
Function Call: WRITE	Prompt: ! Line Location: P+5
Function Call: WRITE	Prompt: !!,"Next delivery time is " Line Location: P+5
Function Call: WRITE	Prompt: !!,"Next delivery time is " Line Location: P+5
Function Call: WRITE	Prompt: ! Line Location: B1+1
Function Call: WRITE	Prompt: !!,"There ",$S(SNM>1:"are",1:"is")," already ",SNM," LABEL",$E("S",SNM>1)," suspended for this order." Line Location: B1+3
Function Call: WRITE	Prompt: !! Line Location: SS+1
Function Call: WRITE	Prompt: !,"Enter # labels, less than 100, to act on." Line Location: SS+2
Function Call: WRITE	Prompt: " No action taken ***" Line Location: SS+3
Function Call: WRITE	Prompt: $C(7),"NO Labels suspended, Wait 8 seconds and try again." Line Location: SS+4
Function Call: WRITE	Prompt: " ... ",PSIVLABN," Label",$E("s",PSIVLABN>1)," suspended !" Line Location: SS+9
Function Call: WRITE	Prompt: ! Line Location: SS+11

Name	Line Occurrences (* Changed, ! Killed)
^PS(55 - [#55]	B1+3, SS+4, SS+5, SS+6, SS+9*, SS+10
^PS(59.5 - [#59.5]	STR+2, EC+3, P+5, GSTRING+3, GSTRING+4

Name	Line Occurrences
B	SS+9, SS+10, SS+12
B1	P+5, B1+2, SS+3, SS+4
EC	EC+3
SS	SS+2
STR	EC+1

Name	Field # of Occurrence
^(	P+5
^(0	STR+2, SS+5*

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	S+11, P+5, SS+4, SS+9
>> ACTION	SS+9, SS+10
BEG	S+4~*, S+5
CD	S+3~, EC+4
>> D	S+6*, S+7
DAT	B1+3!
DAY	S+4~, S+5
DAY(	S+5*, S+6
>> DFN	S+2, B1+3, SS+4, SS+5, SS+6, SS+9, SS+10
DL	S+4~
DT	S+11
>> EDIT	GSTRING+4*
>> HELP	B1+2*
>> I	STR+2*
ION	SS+10
>> IONOFF	SS+10*
LBLPC	S+4~*, S+5
NEXTX	S+4~*, S+5
NXTLBL	S+4~, S+6, S+7, S+8
>> OD	S+3, S+8, S+9, S+11, EC+4
OLDX	S+4~, S+5
>> ON	S+2, B1+3, SS+4, SS+5, SS+6, SS+9, SS+10
OP2	S+2~, S+8*, B
>> P("IVRM"	GSTRING+3, GSTRING+4
>> P("OT"	GSTRING+3, GSTRING+4
>> P(16	SS+6, SS+9, SS+10, SS+11
>> P(2	S+3, S+8, S+9, S+11, EC+4, B*
>> P(3	S+3, EC+4
>> P(4	S+11, STR+2, SS+10
>> P16	SS+10, SS+11
>> PLAST	SS+5*
>> PNOW	S+11, STR+2, EC+1, P+5, SS+4, SS+9*
>> PSGCNT	S+11, P+3, B, B1+1, SS+1, SS+5
PSGSA	S+3~, S+4, S+11!, P+1, P+4, SS+5, SS+7, SS+8
PSI	STR+2!
PSI("E"	STR+2*, EC+1
PSI("S"	STR+2, EC+2, EC+3
>> PSIVA	SS+1*, SS+2, SS+4, SS+9
>> PSIVDOSE	SS+5*, SS+7, SS+8, SS+9
>> PSIVEC	EC+1*, EC+2, EC+3, EC+4
>> PSIVLABN	SS+2*, SS+9
>> PSIVNOL	SS+5, SS+9
>> PSIVOK	GSTRING+3*
>> PSIVPL	SS+10, SS+11
>> PSIVSITE	P+5, B1+1
>> PSIVSN	STR+2, EC+3, P+5, B1+3, SS+4, SS+9
>> PSJPRI	B1+1
>> PSJSYSU	S+1
RNDT	S+2~*, S+7, S+9, B
SNM	B1+3!
>> TRACK	SS+9, SS+10
U	STR+2, EC+3, P+5, B1+1, SS+5, SS+6, SS+9, SS+10
UP1	SS+5*, SS+7, SS+8, SS+9!
X	EC+1, EC+2, P+4, P+5, B1+1, B1+2, B1+3, SS+1, SS+2*, SS+3 , SS+5, SS+7, SS+9!, SS+11
>> X1	EC+1, EC+2, SS+7*
>> X2	EC+1, EC+2, SS+7*
XX1	SS+7*!
XX2	SS+7*!
>> Y	S+11, EC+1, EC+3, P+4, P+5, SS+4, SS+9, SS+11*
>> ZTDESC	SS+12*
>> ZTDTH	SS+11*
>> ZTIO	SS+11*
>> ZTRTN	SS+12*
>> ZTSAVE(	SS+11*

Customize PDF page

Package: Inpatient Medications

Routine: PSIVORE1

Information

Source Information

Call Graph

Call Graph Total: 12

Caller Graph

Caller Graph Total: 5

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: