Routine: PSOSUPRX

Package	Total	Call Graph
Outpatient Pharmacy	15	^PSOBING1 ($$LSTRFL,ECMESND)^PSOBPSU1 CAN^PSOCAN ICN^PSODPT EN^PSOHLUP ^PSOLSET ^PSOPRF $$TRIC^PSOREJP1 $$HDLG^PSOREJU1 $$FIND^PSOREJUT Q^PSORXL (,CKDIV,MAIL,PSOINST,RESET)^PSOSUPAT GETMW^PSOSUPOE EX^PSOSUTL NEXT^PSOUTIL
VA Fileman	5	NOW^%DTC ^DIC ^DIE ^DIK ^DIR
Pharmacy Data Management	1	(PSOL,PSOUL)^PSSLOCK
Registration	1	DEM^VADPT

Package

Total

Call Graph

^PSOBING1 ($$LSTRFL,ECMESND)^PSOBPSU1 CAN^PSOCAN ICN^PSODPT EN^PSOHLUP ^PSOLSET ^PSOPRF $$TRIC^PSOREJP1
$$HDLG^PSOREJU1 $$FIND^PSOREJUT Q^PSORXL (,CKDIV,MAIL,PSOINST,RESET)^PSOSUPAT GETMW^PSOSUPOE EX^PSOSUTL NEXT^PSOUTIL

VA Fileman

NOW^%DTC ^DIC ^DIE ^DIK ^DIR

Pharmacy Data Management

(PSOL,PSOUL)^PSSLOCK

Registration

DEM^VADPT

Package	Total	Caller Graph
Outpatient Pharmacy	2	PSO PNDRX PSOSUPAT

Package

Total

Caller Graph

Outpatient Pharmacy

PSO PNDRX PSOSUPAT

External References

Name	Field # of Occurrence
NOW^%DTC	LU
^DIC	LU+4, LIST
^DIE	BEG+1, QUES+3, NEXT+1
^DIK	BEG+1
^DIR	ST+3, LU+3, LU+6, QUES, QUES+4
^PSOBING1	BEG+16
$$LSTRFL^PSOBPSU1	QUES+10
ECMESND^PSOBPSU1	QUES+11
CAN^PSOCAN	DEAD
ICN^PSODPT	BEG+4
EN^PSOHLUP	LU+10
^PSOLSET	ST
^PSOPRF	PRF
$$TRIC^PSOREJP1	QUES+12
$$HDLG^PSOREJU1	QUES+13
$$FIND^PSOREJUT	QUES+13
Q^PSORXL	BEG+8
^PSOSUPAT	ST+3
CKDIV^PSOSUPAT	LU+11
MAIL^PSOSUPAT	QUES+2
PSOINST^PSOSUPAT	LU+3
RESET^PSOSUPAT	LU+12
GETMW^PSOSUPOE	QUES+1
EX^PSOSUTL	BEG+2
NEXT^PSOUTIL	NEXT
PSOL^PSSLOCK	LU+6
PSOUL^PSSLOCK	UNLK+2
DEM^VADPT	CHKDEAD

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: ST+1
Function Call: WRITE	Prompt: ! Line Location: LU+2
Function Call: WRITE	Prompt: ! Line Location: LU+4
Function Call: WRITE	Prompt: ! Line Location: LU+4
Function Call: WRITE	Prompt: !,$P($G(PSOMSG),"^",2),! Line Location: LU+7
Function Call: WRITE	Prompt: !?10,"PATIENT UNKNOWN" Line Location: CHKDEAD+0
Function Call: WRITE	Prompt: !,">>> Rx #",$P(^PSRX(+$P(^(0),"^"),0),"^")," ALREADY PRINTED FROM SUSPENSE.",!,?5,"USE THE REPRINT OPTION TO REPRINT LABEL.",! Line Location: BEG+0
Function Call: WRITE	Prompt: !,"Rx # "_$P(^PSRX(RXREC,0),"^")_" has expired!" Line Location: BEG+1
Function Call: WRITE	Prompt: "." Line Location: BEG+1
Function Call: WRITE	Prompt: !!,"LABEL QUEUED TO PRINT",! Line Location: BEG+9
Function Call: WRITE	Prompt: ! Line Location: QUES+0
Function Call: WRITE	Prompt: !!?5,"Nothing pulled from suspense!",! Line Location: QUES+0
Function Call: WRITE	Prompt: $C(7),!!?5,"Nothing pulled from suspense!",! Line Location: QUES+4
Function Call: WRITE	Prompt: ! Line Location: LIST+0
Routine Call	DIE Line Location: BEG+1 QUES+3 NEXT+1
Routine Call	DIC Line Location: LU+4 LIST
Routine Call	DIR Line Location: ST+3 LU+3 LU+6 QUES QUES+4

FileNo	Call Tags
^PSRX - [#52]	Classic Fileman Calls
^PS(52.5 - [#52.5]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PS(52.5 - [#52.5]	LU+11, CHKDEAD+2, BEG, BEG+3, BEG+5, BEG+6, BEG+7, QUES+1, QUES+2*, PRF
^PS(55 - [#55]	LU+10, CHKDEAD+2
^PSRX - [#52]	LU+4, BEG, BEG+1, BEG+4, QUES+1, QUES+3, PRF, WIND+4, WIND+5, WIND+6 , WIND+7, WIND+8

Name	Line Occurrences
BEG	LU+12
CHKDEAD	LU+12
DEAD	CHKDEAD+2
EXIT	ST+3
LU	LU+3, LU+4, LU+6, LU+11, LU+12
PRF	BEG+10
QUES	BEG+7
ST	ST, LU+3, LU+4
UNLK	LU+11, LU+12
WIND	BEG+8

Name	Field # of Occurrence
^("STA"	BEG+1
^(0	CHKDEAD+2, BEG, BEG+6

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	LU
ASKED	EXIT!
BBRX	ST+1~, LU+1!, BEG+16!
BBRX(1	BEG+15*
BINGRTE	BEG+16!, WIND+2, WIND+4, WIND+5, WIND+7, WIND+8
CBD	EXIT!
CNT	EXIT!
COM	EXIT!, DEAD*
DA	EXIT!, CHKDEAD+2, DEAD, BEG+1!, BEG+6, QUES+3, NEXT+1
DEAD	LU+12, EXIT!, CHKDEAD, CHKDEAD+1, DEAD*
DEL	EXIT!
DFN	EXIT!, CHKDEAD, CHKDEAD+2, PRF
DIC	LU+4!, LIST!
DIC("S"	LU+5, LIST
DIC(0	LU+4, LIST
DIE	BEG+1!, QUES+3, NEXT+1*!
DIK	BEG+1*!
DIR	ST+3!, LU+3!, LU+6!, QUES!, QUES+4!
DIR("?"	ST+2, LU+2, QUES+5, QUES+6
DIR("??"	LU+2*
DIR("A"	ST+1, LU+2, LU+6, QUES, QUES+4*
DIR("B"	QUES, QUES+4
DIR(0	ST+1, LU+2, LU+6, QUES, QUES+4*
DIRUT	ST+3, LU+3, EXIT!
>> DISGROUP	BEG+16
DR	EXIT!, BEG+1, QUES+3, NEXT+1*
DT	BEG+1
DTOUT	LU+4, EXIT!, QUES, QUES+3, LIST, NEXT+1
DUOUT	LU+4, EXIT!, NEXT+1
DUZ	CHKDEAD+2, BEG
HDSFN	EXIT!, BEG+6, QUES+7
HOLD	DEAD*!
HOLDDFN	EXIT!, PRF*!
JJ	EXIT!
JJJJ	WIND+1~, WIND+4*
MW	LU+2, EXIT!, QUES, QUES+2
NEXT	NEXT*, NEXT+1, NEXT+2!
OLD	EXIT!
OUT	LU+3*, EXIT!
PDUZ	EXIT!, CHKDEAD+2, BEG
>> POP	LU+3*
PPL	EXIT+1!, BEG+6, BEG+8, BEG+13*, BEG+15, WIND+3, WIND+4
PRF	LU+2!, EXIT+1!
PRF(	PRF*
PSDDDATE	LU+12, EXIT+2!, CHKDEAD+2*, DEAD
PSDNAME	LU+12, EXIT+2!, CHKDEAD*
PSINTRX	WIND+1~, WIND+4*, WIND+5, WIND+6, WIND+7, WIND+8
>> PSLION	ST+1*
>> PSOCLC	CHKDEAD+2*
PSODBQ	EXIT+1!, BEG+8*
PSODELE	LU+12!, EXIT!, QUES+4*!
PSODFN	EXIT!, CHKDEAD*
>> PSODIV	LU+11
PSOE	LU+2!, BEG+1*, BEG+3!
PSOGET	EXIT!, QUES+1*
PSOGETF	EXIT!, QUES+1
PSOGETFN	EXIT!, QUES+1
>> PSOLAP	ST+1
PSOLOUD	LU+10*!
PSOMSG	LU+6!, LU+7, LU+9!
PSONOPRT	BEG+8*, BEG+12!
>> PSOPAR	ST, QUES+3, PRF
PSOPLLRX	ST~, LU+6*!, UNLK+1, UNLK+2, UNLK+3!
PSOPRFLG	LU+11!, EXIT+2!, BEG+11*
PSOPROFL	LU+2!, EXIT+1!, BEG+11, PRF*
PSOPSO	WIND+1~, WIND+6*, WIND+7, WIND+8
PSOPULL	LU+12!, EXIT+1!, BEG+8*
PSOQFLAG	ST+1, LU+12!, EXIT+1!, BEG+7, BEG+9, BEG+10, BEG+16, QUES, QUES+2, QUES+3 , QUES+4, QUES+13
PSOSAV	LU+11*!
PSOSAVO	LU+11*!
>> PSOSITE	LU+11
PSOSPEC	LU+12!, EXIT+1!, BEG*, QUES+4
PSOSPINT	LU+4!, LU+5*
PSOTRIC	QUES+12~*, QUES+13
PSOWIN	LU+2!, EXIT+1!, QUES+3*
PSOWINEN	LU+2!, EXIT+1!, QUES+3*
PSOX	NEXT, NEXT+2!
PSOX("IRXN"	NEXT*
PSOX("RX3"	NEXT
PSPOP	LU+11*, EXIT+1!
REA	DEAD*!
RF	EXIT+1!
RFCNT	EXIT+1!
RFL	QUES+10~*, QUES+11, QUES+12, QUES+13
RRT	WIND+1~, WIND+3*, WIND+4
RRTT	WIND+1~, WIND+3*
RTE	LU+2!, EXIT+1!, QUES*
RTETEST	WIND+1~, WIND+5, WIND+7, WIND+8*
RX	EXIT+1!, BEG+9!, NEXT, NEXT+1
RXFL	LU+1!, EXIT+1!
RXFL(	BEG+5*, QUES+10
RXLTOP	EXIT!, BEG+8*
RXP	LU+1!
RXP1	LU+2!, EXIT+1!, BEG+6*, BEG+12!, PRF
RXPR	LU+1!, LU+2!, EXIT+1!, BEG+12!
RXPR(	BEG+6*, WIND+5
RXREC	LU+4, LU+6, EXIT+1!, CHKDEAD+2, DEAD, BEG+1, BEG+4, BEG+5, BEG+6, BEG+7 , BEG+8, BEG+13, QUES+1, QUES+3, QUES+10, QUES+11, QUES+12, QUES+13, PRF
RXRP	LU+1!, EXIT+2!
RXRP(	BEG+7*
RXRR	LU+1!, EXIT!
RXRR(	QUES+1*
SA	ST+3*, EXIT+1!
SFN	LU+4*, LU+11, EXIT+1!, BEG, BEG+1, BEG+3, BEG+5, BEG+6, BEG+7, QUES+1 , QUES+2, QUES+7, PRF
SSSS	WIND+1~, WIND+6*
STOP	EXIT+1!
SUSPT	ST+1*, EXIT+1!
SUSROUTE	ST+1~, LU+1!, BEG+15, QUES+2*
TM	LU*, EXIT!
TM1	LU*, EXIT!
VADM	EXIT+1!
VADM(1	CHKDEAD
VADM(6	CHKDEAD+1, CHKDEAD+2
X	LU+4, LU+5, LU+6!, EXIT+2!, LIST
XXXX	WIND+1~, WIND+3*
Y	ST+3, LU+3, LU+4!, LU+6!, LU+11, EXIT+2!, QUES, QUES+3, QUES+4, LIST
Y(0	LU+4, LU+10, LU+11*, CHKDEAD
Z	EXIT+2!
ZTSK	EXIT+1!
ZZZZ	EXIT+2!, CHKDEAD+2*

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSOSUPRX

Information

Source Information

Call Graph

Call Graph Total: 22

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
UNLK	;Unlock prescription
PRF
LIST
BEG
DEAD
ST
QUES
LU
EXIT
CHKDEAD
NEXT
WIND	;