Routine: PSOSUPOE

Package	Total	Call Graph
Outpatient Pharmacy	7	($$LSTRFL,ECMESND)^PSOBPSU1 $$STATUS^PSOBPSUT $$TRIC^PSOREJP1 $$HDLG^PSOREJU1 $$FIND^PSOREJUT MAILS^PSOSUPAT EX^PSOSUTL
VA Fileman	4	^DIE ^DIK $$GET1^DIQ ^DIR
Pharmacy Data Management	1	(PSOL,PSOUL)^PSSLOCK
Registration	1	FULL^VALM1

Package	Total	Caller Graph
Outpatient Pharmacy	4	PSORX1 PSORXL PSOSUPRX PSOTPRX1

Entry Points

Name	Comments	DBIA/ICR reference
RESET	;
PPLADD	;
END
SELONE	;Pull one Rx through Listman
EHOLD	;
BBADD	;
BEG	;
CKDIV	;
ULRX	;
GETMW	;
ADD	;Add Rx to SPSORX array
TRIC(PSOTRX)	;
WIND	;
SEL
SELQ
DIR	;
BEGQ

External References

Name	Field # of Occurrence
^DIE	BEGQ+5, RESET+9, RESET+10
^DIK	BEGQ+5
$$GET1^DIQ	SELONE+8, EHOLD+2, EHOLD+4
^DIR	SEL+2, SELQ+1, SELQ+2, SELQ+3, DIR+1, CKDIV+2, EHOLD+7
$$LSTRFL^PSOBPSU1	BEGQ+19, TRIC+1
ECMESND^PSOBPSU1	BEGQ+20
$$STATUS^PSOBPSUT	TRIC+3
$$TRIC^PSOREJP1	TRIC+2
$$HDLG^PSOREJU1	BEGQ+22
$$FIND^PSOREJUT	BEGQ+21
MAILS^PSOSUPAT	BEGQ+14
EX^PSOSUTL	BEGQ+6
PSOL^PSSLOCK	BEGQ+1
PSOUL^PSSLOCK	ULRX+2
FULL^VALM1	SELQ, EHOLD+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Rx# ",$P(^PSRX(RXREC,0),"^")," is not on Suspense!" Line Location: BEGQ+2
Function Call: WRITE	Prompt: !,">>> Rx #",$P(^PSRX(+$P(^(0),"^"),0),"^")," ALREADY PRINTED FROM SUSPENSE.",!,?5,"USE THE REPRINT OPTION TO REPRINT LABEL." Line Location: BEGQ+4
Function Call: WRITE	Prompt: !,"Rx # "_$P(^PSRX(RXREC,0),"^")_" has expired!" Line Location: BEGQ+5
Function Call: WRITE	Prompt: !!,"A reprint has already been requested for Rx # ",$P($G(^PSRX(RXREC,0)),"^") Line Location: BEGQ+7
Function Call: WRITE	Prompt: !!,"A partial has already been requested for Rx # ",$P($G(^PSRX(RXREC,0)),"^") Line Location: BEGQ+8
Function Call: WRITE	Prompt: ! Line Location: DIR+1
Function Call: WRITE	Prompt: !!?10,"Rx # ",$P(^PSRX(RXREC,0),"^")," is not a valid choice (Different Division)" Line Location: CKDIV+1
Function Call: WRITE	Prompt: $C(7),$C(7) Line Location: SELONE+1
Function Call: WRITE	Prompt: !,"This is an ePharmacy billable fill which is Suspended until "_$$GET1^DIQ(52.5,ESIEN,10)_", based" Line Location: EHOLD+4
Function Call: WRITE	Prompt: !,"on the 3/4 Days rule.",! Line Location: EHOLD+5
Routine Call	DIE Line Location: BEGQ+5 RESET+9 RESET+10
Routine Call	DIR Line Location: SEL+2 SELQ+1 SELQ+2 SELQ+3 DIR+1 CKDIV+2 EHOLD+7

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PS(52.5 - [#52.5]	BEGQ+3, BEGQ+4, BEGQ+9, BEGQ+10, BEGQ+11, BEGQ+12, BEGQ+14, PPLADD+4, PPLADD+6, SELONE+7 , RESET+3, RESET+4, RESET+6, GETMW+3
^PSRX - [#52]	BEGQ, BEGQ+1, BEGQ+2, BEGQ+4, BEGQ+5, BEGQ+7, BEGQ+8, BEGQ+12, BEGQ+14, WIND+3 , WIND+4, WIND+5, WIND+6, CKDIV+1, CKDIV+2, SELONE+5, SELONE+10, SELONE+12, RESET+8, RESET+11* , GETMW+4, GETMW+5, GETMW+6, GETMW+7

Label References

Name	Line Occurrences
BEG	SELQ+7
BEGQ	SELONE+12
CKDIV	BEGQ+9
DIR	BEGQ+1, BEGQ+2, BEGQ+3, BEGQ+4, BEGQ+5, BEGQ+7, BEGQ+8, BEGQ+9
EHOLD	SELONE+8
END	SELQ+1, SELQ+2, SELQ+3
GETMW	BEGQ+12
SELQ	SELONE+10
TRIC	PPLADD+7
ULRX	BEGQ+2, BEGQ+3, BEGQ+4, BEGQ+5, BEGQ+7, BEGQ+8, BEGQ+9, BEGQ+24

Naked Globals

Name	Field # of Occurrence
^("STA"	BEGQ+5
^(0	BEGQ+4, BEGQ+10

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
AAA	BEGQ+6~
ACTION	BEGQ+19~, BEGQ+22*
>> BBRX(	BBADD+3, BBADD+4, BBADD+5
>> BBRX(1	BBADD+2*
DA	BEGQ+5!, RESET+1~, RESET+9, RESET+10*
DA(1	RESET+9*
DIE	BEGQ+5!, RESET+9!, RESET+10*!
DIK	BEGQ+5*!
DIR	SEL+2!, SELQ+1!, SELQ+2!, SELQ+3!, DIR+1!, CKDIV+2!, EHOLD+6!, EHOLD+7!
DIR("?"	SELQ+4, SELQ+5
DIR("A"	SEL+2, SELQ+1, SELQ+2, SELQ+3, DIR+1, CKDIV+2, EHOLD+6*
DIR("B"	SELQ+1, SELQ+3, CKDIV+2*
DIR(0	SEL+2, SELQ+1, SELQ+2, SELQ+3, DIR+1, CKDIV+2, EHOLD+6*
>> DIRUT	CKDIV+2, EHOLD+7
>> DR	BEGQ+5, RESET+9, RESET+10*
DT	BEGQ+5
DTOUT	SEL+2!, SELQ+1, SELQ+2
DUOUT	SEL+2!, SELQ+1, SELQ+2
DUZ	BEGQ+4
EACTION	TRIC+4*, PPLADD+1~, PPLADD+8
EHOLDQ	SELONE+7~, SELONE+8, SELONE+9!, EHOLD+6, EHOLD+7
ERXIEN	SELONE+7~*, SELONE+9!, EHOLD+1, EHOLD+2
ESIEN	SELONE+7~*, SELONE+8, SELONE+9!, EHOLD+4
ESTAT	TRIC+3*, TRIC+4, PPLADD+1~
GETCNT	GETMW+1~, GETMW+6*
GETPAR	GETMW+1~, GETMW+3*, GETMW+4
GETRX	GETMW+1~, GETMW+6*, GETMW+7
JJJJ	WIND+1~
LSFN	PPLADD+1~, PPLADD+4*, PPLADD+5, PPLADD+6
MW	SEL+1~, BEGQ+14*, SELONE+2~
ORD	SEL+1~, SELONE+2~
ORN	SEL+1~, SELONE+4, SELONE+5, SELONE+6, SELONE+7, SELONE+10, SELONE+11
>> PBINGRTE	WIND+2, WIND+3, WIND+5, WIND+6
PDUZ	SEL+1~, BEGQ+4*, SELONE+2~
>> PPL	PPLADD+2, PPLADD+9, PPLADD+10*
PSCOU	BEGQ+6~
PSINTRX	WIND+1~, WIND+2*, WIND+3, WIND+4, WIND+5, WIND+6
PSLST	SEL+1~, SEL+3*, SELQ+7, SELONE+2~
>> PSOBEDT	SELONE+1
>> PSOCNT	SEL, SEL+2
>> PSODFN	BEGQ+11
>> PSODIV	BEGQ+9
PSOEXPI	BEGQ+6~
PSOGET	SEL+1~, BEGQ+12, BEGQ+13, BEGQ+24!, GETMW+4, GETMW+5, GETMW+7
PSOGETF	SEL+1~, BEGQ+13, BEGQ+24!, GETMW+2, GETMW+4, GETMW+7*
PSOGETFN	SEL+1~, BEGQ+13, GETMW+2, GETMW+4, GETMW+7*
>> PSOLST(	SELQ+7, BEG+1, SELONE+4, SELONE+5, SELONE+6, SELONE+7, SELONE+10, SELONE+11
PSOMSG	BEGQ+1!, BEGQ+2!
>> PSOPAR	SELQ+2
PSOPRT	BEGQ+6~
PSOPSO	WIND+1~, WIND+4*, WIND+5, WIND+6
>> PSORX("PSOL"	PPLADD+11, PPLADD+12, PPLADD+13, PPLADD+14*
>> PSOSITE	BEGQ+9
PSOSQ	SEL+1~, SELQ+9, BEGQ+15*, SELONE+2~, SELONE+12
PSOSQMTH	SEL+1~, SELQ+2*, BEGQ+14, SELONE+2~
PSOSQRTE	SEL+1~, SELQ+2*, BEGQ+14, SELONE+2~
>> PSOSYS	CKDIV+1, CKDIV+2
PSOTRF	TRIC+1*, TRIC+2, TRIC+3, PPLADD+1~
PSOTRIC	TRIC+2*, TRIC+4, PPLADD+1~, PPLADD+8
PSOTRX	TRIC~, TRIC+1, TRIC+2, TRIC+3, PPLADD+1~
PSOX1	SEL+1~, ADD+2, BBADD+1~, BBADD+3, SELONE+2~
PSOX2	SEL+1~, ADD+2, ADD+3, ADD+4, BBADD+1~, BBADD+3, BBADD+4, BBADD+5, SELONE+2~
PSPOP	SEL+1~, BEGQ+9, CKDIV+1, CKDIV+2*, SELONE+2~
PULLONE	SELQ+6, END, SELONE+2~, SELONE+3, SELONE+10
QQQ	BEGQ+6~
RFCNT	BEGQ+14~
RFL	BEGQ+19~*, BEGQ+20, BEGQ+21, BEGQ+22
RR	BEGQ+14~
RRT	WIND+1~
RRTT	WIND+1~
RSDA	RESET+1~, RESET+2*, RESET+3, RESET+5, RESET+8, RESET+9, RESET+10, RESET+11
RTETEST	WIND+1~, WIND+3, WIND+5, WIND+6*
RXFILL	RESET+1~, RESET+5*, RESET+7, RESET+9, RESET+10
RXFILLN	RESET+1~, RESET+5*, RESET+8, RESET+9
>> RXFL(	BEGQ+11*, BEGQ+19
RXLTOP	SEL+1~, BEGQ+11*, SELONE+2~
RXMP	RESET+1~, RESET+5*, RESET+8, RESET+11
RXMW	RESET+1~, RESET+5*, RESET+6
>> RXPR(	BEGQ+8, BEGQ+10*, BEGQ+18, WIND+3
RXPSRX	RESET+1~, RESET+5*, RESET+8, RESET+9, RESET+10
RXR	RESET+1~
RXREC	SEL+1~, BEG+1, BEGQ, BEGQ+1, BEGQ+2, BEGQ+3, BEGQ+5, BEGQ+7, BEGQ+8, BEGQ+10 , BEGQ+11, BEGQ+12, BEGQ+13, BEGQ+14, BEGQ+18, BEGQ+19, BEGQ+20, BEGQ+21, BEGQ+22, WIND+2 , WIND+3, ADD+1, ADD+3, ADD+4, BBADD+2, BBADD+4, BBADD+5, CKDIV+1, CKDIV+2, SELONE+2~ , SELONE+11, SELONE+12, GETMW+4, GETMW+5, GETMW+6, GETMW+7, ULRX+1, ULRX+2
>> RXRP(	BEGQ+7, BEGQ+10*
>> RXRS(	BEGQ+11, BEGQ+12, BEGQ+13*, PPLADD+3, SELONE+6, RESET+2, RESET+5
RXSP	RESET+1~, RESET+3*, RESET+4, RESET+6
SFN	SEL+1~, BEGQ+3*, BEGQ+4, BEGQ+5, BEGQ+9, BEGQ+10, BEGQ+11, BEGQ+12, BEGQ+14, SELONE+2~ , GETMW+3
SORD	SEL+1~, SELQ+7*, SELONE+2~
SORN	SEL+1~, SELQ+7*, BEG+1, SELONE+2~
>> SPSORX("PSOL"	ADD+1, ADD+2, ADD+3, ADD+4*
SPSOX1	PPLADD+1~, PPLADD+12*
SPSOX2	PPLADD+1~, PPLADD+12*, PPLADD+13, PPLADD+14
SSSS	WIND+1~, WIND+4*
SZZ	PPLADD+1~, PPLADD+3*, PPLADD+4, PPLADD+7, PPLADD+9, PPLADD+10, PPLADD+11, PPLADD+13, PPLADD+14
>> VALMBCK	SEL, SEL+2, SELQ+8, END, SELONE+1, SELONE+4, SELONE+5, SELONE+6, SELONE+13, EHOLD+8
VALMCNT	SEL+1~, SELONE+2~
>> VALMSG	SEL, SEL+2, SELQ+9, END, SELONE+1, SELONE+5, SELONE+6, SELONE+10, SELONE+12, EHOLD+8
VVV	BEGQ+6~
XXXX	WIND+1~
>> Y	SEL+2, SEL+3, SELQ+1, SELQ+2, SELQ+3, CKDIV+2, EHOLD+7

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSOSUPOE

Information

Source Information

Call Graph

Call Graph Total: 13

Caller Graph

Caller Graph Total: 4

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: