Routine: PSOCSRL

Package	Total	Call Graph
Outpatient Pharmacy	8	REL^PSOBING1 ($$MANREL,IBSEND)^PSOBPSUT CS^PSOCMOPB CP^PSOCP EN^PSOHLSN1 EN^PSOHLUP ^PSOLSET IBSSR^PSOUTL
VA Fileman	3	NOW^%DTC ^DIE ^DIR
Integrated Billing	1	$$SERV^IBARX1

Package

Total

Call Graph

Outpatient Pharmacy

REL^PSOBING1 ($$MANREL,IBSEND)^PSOBPSUT CS^PSOCMOPB CP^PSOCP EN^PSOHLSN1 EN^PSOHLUP ^PSOLSET IBSSR^PSOUTL

VA Fileman

NOW^%DTC ^DIE ^DIR

Integrated Billing

$$SERV^IBARX1

Package	Total	Caller Graph
Controlled Substances	1	PSDOPT1

Package

Total

Caller Graph

Controlled Substances

PSDOPT1

Name	Comments	DBIA/ICR reference
UPDATE
QTY
EX
ORI	;orig
ASK	;confirm
EN(RXP,XTYPE,PSRH)	;
REF	;release ref or par

External References

Name	Field # of Occurrence
NOW^%DTC	ORI+15, QTY+12
^DIE	ORI+16, QTY+15
^DIR	ASK+2
$$SERV^IBARX1	EN+6
REL^PSOBING1	ASK+8
$$MANREL^PSOBPSUT	ORI+11, QTY+9
IBSEND^PSOBPSUT	ORI+21, QTY+19
CS^PSOCMOPB	EN+5
CP^PSOCP	UPDATE+1, QTY+22
EN^PSOHLSN1	ORI+17, QTY+16
EN^PSOHLUP	EN+11
^PSOLSET	EN+3
IBSSR^PSOUTL	EN+6

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: $C(7),!!,?5,"Site Parameters must be defined to use the Release option!",! Line Location: EN+3
Function Call: WRITE	Prompt: !! Line Location: EN+8
Function Call: WRITE	Prompt: !?7,$C(7),$C(7),$C(7)," NON-EXISTENT PRESCRIPTION" Line Location: EN+10
Function Call: WRITE	Prompt: !?7,$C(7),$C(7)," PRESCRIPTION IS A DELETED PERSCRIPTION NUMBER" Line Location: EN+12
Function Call: WRITE	Prompt: !!?7,$C(7),$C(7),"ORIGINAL PRESCRIPTION WAS LAST RELEASED ON "_Y,! Line Location: ORI+1
Function Call: WRITE	Prompt: !,"Original Fill returned to stock on "_$E(RESK,4,5)_"/"_$E(RESK,6,7)_"/"_$E(RESK,2,3),! Line Location: ORI+2
Function Call: WRITE	Prompt: $C(7),!!?7,$S($P(XTYPE,"^")=1:"RE",$P(XTYPE,"^")="P":"PARTIAL ",1:"ORIGINAL")_"FILL ON SUSPENSE !",!,$C(7) Line Location: UPDATE+0
Function Call: WRITE	Prompt: !?7,"PRESCRIPTION NUMBER "_$P(^PSRX(RXP,0),"^")_" RELEASED" Line Location: UPDATE+2
Routine Call	DIE Line Location: ORI+16 QTY+15
Routine Call	DIR Line Location: ASK+2

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

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	ORI+1
^PS(52.5 - [#52.5]	ORI+5, QTY+2
^PS(55 - [#55]	EN+11
^PS(59 - [#59]	EN+6
^PS(59.7 - [#59.7]	EN+8
^PSDRUG - [#50]	ORI+13, QTY+11
^PSRX - [#52]	EN+10, EN+11, EN+12, EN+13, ORI+1, ORI+2, ORI+3, ORI+4, ORI+7, ORI+14 , REF+1*, UPDATE+1, UPDATE+2, QTY, QTY+1, QTY+2, QTY+3, QTY+5, QTY+11, QTY+21 , QTY+22, QTY+23, ASK+2, ASK+5, ASK+6, ASK+7
^PSRX("ACP"	QTY+21!
^XUSEC("PSORPH"	EN+9

Name	Line Occurrences
ASK	ORI+8, QTY+6
EX	EN+2, EN+6, EN+10, EN+12, EN+13, ORI+1, ORI+2, ORI+4, ORI+22, QTY+1
QTY	REF+1
REF	EN+14
UPDATE	ORI+4, QTY+2

Name	Field # of Occurrence
^("STA"	EN+13
^(0	ORI+7, QTY+3
^(2	ORI+2, ORI+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	ORI+15, EX!, QTY+14
BINGDIV	ASK+5*, ASK+8!
BINGNAM	ASK+5, ASK+6, ASK+7*, ASK+8!
BINGRO	ASK+5*, ASK+8!
BINGRPR	ASK+6, ASK+7, ASK+8!
BNGPDV	ASK+6*, ASK+8!
BNGRDV	ASK+7*, ASK+8!
DA	ORI+15, ORI+16!, EX!, QTY+13, QTY+15!
DA(1	QTY+13*
DIC	EX!
DIE	ORI+15, ORI+16!, EX!, QTY+12, QTY+15!
DIR	EX+1!, ASK+1!, ASK+2!
DIR("A"	ASK+1, ASK+2
DIR("B"	ASK+1*
DIR(0	ASK+1*
DIRUT	EX!, ASK+3
>> DISGROUP	ASK+8
DR	ORI+15, ORI+16!, EX!, QTY+14, QTY+15!
DTOUT	EX+1!
DUOUT	EX+1!
IFN	REF+1!, EX!, QTY+3!, QTY+11*, QTY+22, QTY+23, QTY+24, QTY+25!
ISUF	ORI+1!, ORI+4, ORI+5, REF+1!, EX!, UPDATE, QTY+1!, QTY+2, QTY+22
J	EX!
LBL	ORI+7, ORI+16!, EX+1!, QTY+5
LBLP	ORI+1!, ORI+4, ORI+7, ORI+8, ORI+11!, REF+1!, EX+1!, QTY!, QTY+1!, QTY+5 , QTY+6, QTY+9!
NCPDP	EN+1~
OUT	EX!
PSIN	EN+8*, ORI+4, EX!, QTY+1
PSOCPN	ORI+3, EX!, QTY
PSOCPRX	EX!, UPDATE+1, QTY+22
>> PSOCSUB	EN+4*
PSODISPP	QTY+16!*
PSOIBFL	EN+6, EX!
PSOIBLP	EX!
PSOIBSS	EN+6*, EX!
PSOIBST	EX!
>> PSOPAR	EN+2, EN+3
>> PSOSITE	EN+6
PSOUT	ORI+4, ORI+8, EX+1!, QTY+1, QTY+6, ASK+3*
PSRH	EN~, EN+9, ORI+15, EX!, QTY+14
QDRUG	ORI+3, ORI+13, EX!, QTY, QTY+11
QTY	ORI+3, ORI+13, EX!, QTY+11
REC	EX!
RESK	ORI+2*, EX!
RX2	EX!
RXFD	ORI+4, ORI+5, EX!, QTY+2
RXP	EN~, EN+5, EN+10, EN+11, EN+12, EN+13, ORI+1, ORI+2, ORI+3, ORI+4 , ORI+5, ORI+7, ORI+11, ORI+14, ORI+15, ORI+17, ORI+21, REF+1, EX!, UPDATE+1 , UPDATE+2, QTY, QTY+1, QTY+2, QTY+3, QTY+5, QTY+9, QTY+11, QTY+12, QTY+13 , QTY+16, QTY+19, QTY+21, QTY+22, QTY+23, ASK+2, ASK+5, ASK+6, ASK+7
SUPN	ORI+5, EX!, QTY+2
X	EX!
XFLAG	EN+5!
XTYPE	EN~, EN+14, REF+1, EX!, UPDATE, QTY+1, QTY+2, QTY+3, QTY+5, QTY+9 , QTY+11, QTY+12, QTY+13, QTY+14, QTY+16, QTY+19, QTY+21, QTY+22, QTY+23, QTY+24 , ASK+1, ASK+5, ASK+6, ASK+7
Y	EN+6, ORI+1, EX!, ASK+3, ASK+5, ASK+6, ASK+7
>> YY	QTY+22*

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSOCSRL

Information

Source Information

Call Graph

Call Graph Total: 12

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: