Routine: PSORESK

Package	Total	Call Graph
Outpatient Pharmacy	10	REVERSE^PSOBPSU1 ICN^PSODPT EN^PSOHDR EN^PSOHLSN1 EN^PSOHLUP ^PSOLSET LOCK^PSOORCPY (ACT,CP,STAT)^PSORESK1 LOGRTS^PSORTSUT INVT^PSORXDL
VA FileMan	5	(C,NOW)^%DTC ^DIE ^DIK EN^DIQ1 ^DIR
Controlled Substances	1	PSDRTS^PSDOPT0
Pharmacy Data Management	1	($$L,PSOL,PSOUL,UL)^PSSLOCK
Registration	1	$$SITE^VASITE

Package	Total	Caller Graph
Kernel	1	^DIC(19
Outpatient Pharmacy	1	PSO RETURNED STOCK

Entry Points

Name	Comments	DBIA/ICR reference
AC
BC
BC1	;
REF
PAR
EX	;
MSG
BCI
RXP
UL	;
NPF

External References

Name	Field # of Occurrence
C^%DTC	NPF+2, NPF+3, NPF+6
NOW^%DTC	BC1+44, PAR+27
^DIE	BC1+44, PAR+42, PAR+49, NPF+7
^DIK	BC1+45, PAR+55
EN^DIQ1	BC+3
^DIR	BC, BC1+10, BC1+19, BC1+34, REF+2, PAR+9, PAR+24
PSDRTS^PSDOPT0	BC1+26, PAR+14, PAR+16, PAR+17
REVERSE^PSOBPSU1	BC1+46, PAR+31
ICN^PSODPT	BC1+2
EN^PSOHDR	BC1+47, PAR+56
EN^PSOHLSN1	BC1+48, PAR+56
EN^PSOHLUP	BC1+5
^PSOLSET	AC
LOCK^PSOORCPY	BC1+3
ACT^PSORESK1	BC1+45, PAR+52
CP^PSORESK1	BC1+23, PAR+12
STAT^PSORESK1	BC1+6
LOGRTS^PSORTSUT	BC1+42, PAR+34
INVT^PSORXDL	BC1+24, PAR+13
$$L^PSSLOCK	BC1+3
PSOL^PSSLOCK	BC1+4
PSOUL^PSSLOCK	UL+1
UL^PSSLOCK	BC1+4, UL+2
$$SITE^VASITE	BC+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Outpatient Pharmacy Site Parameters are required!" Line Location: AC+0
Function Call: WRITE	Prompt: !! Line Location: BC+0
Function Call: WRITE	Prompt: !,$C(7),$C(7)," INVALID STATION NUMBER !!",$C(7),$C(7),! Line Location: BC+2
Function Call: WRITE	Prompt: !,$C(7),$C(7),$C(7)," NON-EXISTENT Rx" Line Location: BC+4
Function Call: WRITE	Prompt: !,$C(7),$C(7),$C(7)," IMPROPER BARCODE FORMAT" Line Location: BC+5
Function Call: WRITE	Prompt: !,$C(7),$C(7),"Rx # "_$P(^PSRX(RXP,0),"^")_" was NOT released !" Line Location: BC1+14
Function Call: WRITE	Prompt: ! Line Location: BC1+16
Function Call: WRITE	Prompt: !!?5,"Prescription Not Returned to Stock!",! Line Location: BC1+24
Function Call: WRITE	Prompt: !?5,"Comments are required, 10-75 characters.",! Line Location: BC1+34
Function Call: WRITE	Prompt: $C(7),!!,"Last Fill Already Returned to Stock !",! Line Location: PAR+2
Function Call: WRITE	Prompt: !!,$C(7),$C(7),$S(XTYPE:"Refill",1:"PARTIAL")_" #"_TYPE_" was NOT released !",! Line Location: PAR+3
Function Call: WRITE	Prompt: ! Line Location: PAR+4
Function Call: WRITE	Prompt: ! Line Location: PAR+6
Function Call: WRITE	Prompt: !!?5,"Prescription Not Returned to Stock!",! Line Location: PAR+13
Function Call: WRITE	Prompt: !?5,"Comments are required, 10-75 characters.",! Line Location: PAR+24
Function Call: WRITE	Prompt: ! Line Location: PAR+42
Function Call: WRITE	Prompt: " - Not Returned!" Line Location: PAR+46
Function Call: WRITE	Prompt: !!,"Rx # "_$P(^PSRX(RXP,0),"^")_$S(XTYPE:" REFILL",1:" PARTIAL")_" #"_TYPE_" Returned to Stock" Line Location: PAR+55
Function Call: WRITE	Prompt: !!,"The PSDMGR key is required to return a CONTROLLED SUBSTANCE Rx to stock and",!,"update corresponding vault balances." Line Location: MSG+0
Routine Call	DIE Line Location: BC1+44 PAR+42 PAR+49 NPF+7
Routine Call	DIR Line Location: BC BC1+10 BC1+19 BC1+34 REF+2 PAR+9 PAR+24

FileMan Files Accessed Via FileMan Db Call

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)
^DPT - [#2]	BC1+17, PAR+7
^PS(52.5 - [#52.5]	BC1+45, PAR+55
^PS(55 - [#55]	BC1+5
^PSDRUG - [#50]	BC1+17, BC1+24, BC1+37, BC1+39, PAR+7, PAR+13, PAR+27, PAR+29
^PSRX - [#52]	BC+4, BC+5, BC1+1, BC1+5, BC1+6, BC1+7, BC1+8, BC1+12, BC1+13, BC1+14 , BC1+15, BC1+16, BC1+17, BC1+23, BC1+26, BC1+51, REF, REF+3, PAR, PAR+2 , PAR+3, PAR+5, PAR+6, PAR+7, PAR+12, PAR+16, PAR+17, PAR+27, PAR+37, PAR+38 , PAR+45, PAR+55, RXP, NPF, NPF+1, NPF+2, NPF+5, NPF+6
^PSRX("AR"	BC1+15, BC1+40!, PAR+5, PAR+30!
^PSRX("B"	RXP
^UTILITY($J	AC+1!
^XTMP("PSA"	BC1+49, BC1+50, PAR+53, PAR+54

Label References

Name	Line Occurrences
BC	BC+1, BC+2, BC+4, BC+5, BC1+3, BC1+4, BC1+6, BC1+8, BC1+12, BC1+14 , BC1+19, BC1+21, REF, PAR+1, PAR+2, PAR+3, PAR+9, PAR+12, PAR+13, PAR+18 , PAR+45, PAR+57
BC1	BC+1, BC+5
BCI	BC+1
EX	BC, BC1+21, PAR+1, PAR+2, PAR+18
MSG	BC1+26, PAR+16, PAR+17
NPF	PAR+52
PAR	BC1+11
REF	BC1+7
RXP	RXP
UL	BC1+6, BC1+8, BC1+13, BC1+14, BC1+19, BC1+21, REF, PAR+1, PAR+2, PAR+3 , PAR+9, PAR+12, PAR+13, PAR+18, PAR+49, PAR+57

Naked Globals

Name	Field # of Occurrence
^("STA"	BC1+6
^(0	BC1+7, BC1+17, BC1+49, PAR+7, PAR+16, PAR+17, PAR+53

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	BC1+44, EX+1!
COM	BC1+35, PAR+26, EX+1!
COPAYFLG	BC1+7*, BC1+23, PAR+12, EX+1!
DA	BC+3!, BC1+44!, BC1+45, PAR+41, PAR+47, PAR+55, EX+1!, NPF+7*
DA(1	PAR+41, PAR+47
DIC	BC+3*, EX+2!
DIE	BC1+44!, PAR+41, PAR+47, EX+1!, NPF+7!
DIK	BC1+45, PAR+55, EX+2!
DIQ	BC+3*!
DIQ(0	BC+3*
DIR	BC!, BC1+10!, BC1+19!, BC1+31!, BC1+35!, REF+2!, PAR+4!, PAR+9!, PAR+21!, PAR+24! , EX+1!
DIR("?"	BC, BC1+10, BC1+32, REF+2, PAR+22*
DIR("A"	BC, BC1+9, BC1+16, BC1+17, BC1+18, BC1+32, REF+1, PAR+6, PAR+7, PAR+8 , PAR+22*
DIR("B"	BC1+9, BC1+16, BC1+33, REF+1, PAR+6, PAR+23
DIR(0	BC, BC1+9, BC1+19, BC1+32, REF+1, PAR+6, PAR+22*
DIRUT	BC, BC1+19, BC1+30, BC1+31!, BC1+34, PAR+20, PAR+21!, PAR+24, EX+1!
DR	BC+3!, BC1+44!, PAR+41, PAR+48, EX+1!, NPF+7*
DT	BC1+49, BC1+50, PAR+53, PAR+54
DTOUT	BC1+8, BC1+31!, REF, PAR+4!, PAR+9, PAR+21!
DUOUT	BC1+8, BC1+31!, REF, PAR+4!, PAR+9, PAR+21!
I	EX+1!
PSDCS	EX+1!, MSG
PSDRS	EX+1!, MSG
PSDS	BC1+26!, PAR+16!, PAR+17!
PSOCPN	EX+1!
PSOCPRX	EX+1!
PSODEF	AC+1!, BC!, BC1+33, BC1+35, PAR+23, PAR+26
PSODEFLG	BC!, BC1+24!, PAR+13!, EX+1!
PSODISPP	PAR+56!*
PSOINVTX	BC!, BC1+24!, BC1+38, PAR+13!, PAR+28, EX+1!
PSOLOCRL	BC1+15, BC1+40, PAR+5!, PAR+30, EX+1!
PSOLOUD	BC1+5*!
PSOMSG	BC1+4!, EX+1!
>> PSOPAR	AC
PSOPCECT	AC+1, BC1+21, PAR+1, PAR+2, EX+1!
PSOPFS	BC1+23~, PAR+12~, EX+2!
PSOPLCK	BC1+3*!, BC1+4!, EX+1!
PSORESAR	BC+3!
PSORESAR(4	BC+3
PSORESST	BC+2!, BC+3!*
PSORESSX	BC+3*!
PSORRDFN	BC1+1*, BC1+2, BC1+3, BC1+4, EX+1!, UL+2
>> PSOSITE	BC1+50, PAR+54
PSOWHERE	BC!, BC1+15, BC1+18, BC1+24, BC1+38, BC1+40, PAR+5!, PAR+8, PAR+13, PAR+28 , PAR+30, EX+1!
PSOY	NPF~, NPF+2*, NPF+3
QDRUG	BC1+7*, BC1+24, BC1+37, BC1+39, BC1+50, PAR+13, PAR+27, PAR+29, PAR+54, EX+1!
QTY	BC1+7, BC1+39, BC1+50, PAR+27, PAR+29, PAR+54, EX+1!
RDUZ	EX+1!
REC	EX+1!
RESK	AC+1, BC1+21, PAR+1, PAR+2, EX+1!
RETSK	BC1+27, PAR+18, EX+1!, MSG*
RXP	BC+1, BC+4, BC+5, BC1+1, BC1+4, BC1+5, BC1+6, BC1+7, BC1+8, BC1+12 , BC1+13, BC1+14, BC1+15, BC1+16, BC1+17, BC1+23, BC1+26, BC1+40, BC1+42, BC1+44 , BC1+45, BC1+46, BC1+47, BC1+48, BC1+51, REF, REF+3, PAR, PAR+2, PAR+3 , PAR+5, PAR+6, PAR+7, PAR+12, PAR+16, PAR+17, PAR+27, PAR+30, PAR+31, PAR+34 , PAR+37, PAR+38, PAR+41, PAR+45, PAR+47, PAR+55, PAR+56, EX+1!, BCI, RXP* , UL+1, NPF, NPF+1, NPF+2, NPF+5, NPF+6, NPF+7
>> SVRELDT	PAR+37, PAR+38, PAR+48
TYPE	PAR*, PAR+1, PAR+2, PAR+3, PAR+5, PAR+6, PAR+12, PAR+16, PAR+17, PAR+27 , PAR+30, PAR+31, PAR+34, PAR+37, PAR+38, PAR+41, PAR+45, PAR+47, PAR+55, EX+1! , NPF, NPF+1, NPF+2, NPF+4
U	BC1+49, PAR+53
X	BC+1, BC+2, BC+3, BC+4, BC1+31!, BC1+35!, PAR+21!, PAR+26!, EX+1!, RXP , NPF+2, NPF+3, NPF+6*, NPF+7
X1	EX+1!, NPF+1, NPF+2, NPF+5*
X2	EX+1!, NPF+1, NPF+2, NPF+5*
XDT	EX+1!
XTYPE	BC!, BC1+11, REF+3, PAR*, PAR+2, PAR+3, PAR+5, PAR+6, PAR+12, PAR+16 , PAR+27, PAR+31, PAR+34, PAR+37, PAR+38, PAR+41, PAR+45, PAR+47, PAR+48, PAR+52 , PAR+55, PAR+56, EX+1!
Y	BC1+8*, BC1+11, BC1+19, BC1+31!, BC1+35!, BC1+44, REF+3, PAR+9, PAR+21!, PAR+26! , EX+1!
YY	PAR*, EX+1!

Marked Items

Name	Field # of Occurrence
$T(PSDRTS^PSDOPT0	BC1+26, PAR+14

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSORESK

Information

Source Information

Call Graph

Call Graph Total: 18

Caller Graph

Legends:

Package Component Superscript legend

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:

Marked Items