Routine: PSJLMUT2

Package	Total	Call Graph
VA Fileman	1	^DIR

Package	Total	Caller Graph
Inpatient Medications	1	PSJLMUT1

Entry Points

Name	Field # of Occurrence
^DIR	PAUSE+1

Name	Line Occurrences
Function Call: WRITE	Prompt: !,PSJULN,! Line Location: SHOR+10
Function Call: WRITE	Prompt: PSJRS Line Location: SHOR+11
Function Call: WRITE	Prompt: ! Line Location: SHOR+11
Function Call: WRITE	Prompt: ?14,"Rx #: ",$E(PSJRX,1,$L(PSJRX)-1) Line Location: SHOR+12
Function Call: WRITE	Prompt: $E(PSJRX,$L(PSJRX)) Line Location: SHOR+12
Function Call: WRITE	Prompt: ?39,PSJDN,! Line Location: SHOR+13
Function Call: WRITE	Prompt: ?39,$P(PSJD0,"^",4)," INTERACTION",! Line Location: SHOR+13
Function Call: WRITE	Prompt: $J("Status: ",20),$P(PSJD1,"^",2),?40,$J("Issued: ",20),$P(PSJD1,"^",9) Line Location: SHOR+14
Function Call: WRITE	Prompt: ?20,FSIG(I),! Line Location: SHOR+16
Function Call: WRITE	Prompt: $J("QTY: ",20)_$P(PSJD1,"^",5) Line Location: SHOR+17
Function Call: WRITE	Prompt: !,$J("Provider: ",20),$P(PSJD1,"^",8),?40,$J("Refills remaining: ",20),$P(PSJD1,"^",6) Line Location: SHOR+18
Function Call: WRITE	Prompt: !?40,$J("Last filled on: ",20),PSJLF Line Location: SHOR+19
Function Call: WRITE	Prompt: !?40,$J("Days Supply: ",20)_$P(PSJD1,"^",4) Line Location: SHOR+20
Function Call: WRITE	Prompt: !,PSJULN Line Location: SHOR+21
Function Call: WRITE	Prompt: ! Line Location: PAUSE+1
Function Call: WRITE	Prompt: ! Line Location: PAUSE+1
Routine Call	DIR Line Location: PAUSE+1

Name	Line Occurrences (* Changed, ! Killed)
^TMP($J	SHOR+5, FSIG+3

Name	Line Occurrences
FSIG	SHOR+15

Name	Field # of Occurrence
^(	FSIG+3
^(1	SHOR+5

Name	Field # of Occurrence
CNT	FSIG+2~, FSTART+1*, FSTART+2
DIR	PAUSE+1!
DIR("A"	PAUSE+1*
DIR(0	PAUSE+1*
FFF	FSIG+2~, FSTART+1*, FSTART+2
FLIM	FSIG+2~, FSTART+1, FSTART+3*
FSIG	SHOR+4~, SHOR+15, FSIG~
FSIG(	SHOR+16, FSTART+1, FSTART+5
FSIG(1	FSTART+6*
FSIG(2	FSTART+6!
FVAR	FSIG+2~, FSTART, FSTART+1, FSTART+3, FSTART+4*, FSTART+5
FVAR1	FSIG+2~, FSTART, FSTART+1, FSTART+2, FSTART+4
HSIG	FSIG+2~
HSIG(	FSIG+3*, FSTART+1, FSTART+2
I	SHOR+16, FSIG+2~, FSIG+3
II	FSIG+2~, FSTART, FSTART+1, FSTART+5
NNN	FSIG+2~, FSTART+1*
PSJD0	SHOR+4~, SHOR+5*, SHOR+6, SHOR+7, SHOR+8, SHOR+13
PSJD1	SHOR+4~, SHOR+5*, SHOR+9, SHOR+14, SHOR+17, SHOR+18, SHOR+20
PSJDN	SHOR+4~, SHOR+6, SHOR+7, SHOR+8*, SHOR+13
PSJI	SHOR~, SHOR+5, FSIG+3
PSJLF	SHOR+4~, SHOR+9*, SHOR+19
PSJRS	SHOR+4~, SHOR+6, SHOR+7, SHOR+8*, SHOR+11
PSJRX	SHOR+4~, SHOR+6, SHOR+7, SHOR+8*, SHOR+12
PSJT	SHOR~, SHOR+5, SHOR+6, SHOR+7, SHOR+8, SHOR+13, FSIG+3
PSJULN	SHOR+4~, SHOR+9*, SHOR+10, SHOR+21