Routine: PSOTPCAN

Package	Total	Call Graph
VA Fileman	3	C^%DTC ^DIE ^DIR
Kernel	2	$$DT^XLFDT $$UP^XLFSTR

Package

Total

Call Graph

VA Fileman

C^%DTC ^DIE ^DIR

Kernel

$$DT^XLFDT $$UP^XLFSTR

Package	Total	Caller Graph
Outpatient Pharmacy	17	PSOAUTOC PSOBBC PSOCAN3 PSOFUNC PSOHLDC PSOHLNEW PSOORED1 PSOORFIN PSOORNE5 PSOORRNW PSOORUTL PSOPKIV1 PSORN52C PSORXEDT PSOTPRX1 PSOVER PSOVERC
Scheduling	1	SDPBP

Package

Total

Caller Graph

Outpatient Pharmacy

PSOAUTOC  PSOBBC  PSOCAN3  PSOFUNC  PSOHLDC  PSOHLNEW  PSOORED1  PSOORFIN
PSOORNE5  PSOORRNW  PSOORUTL  PSOPKIV1  PSORN52C  PSORXEDT  PSOTPRX1  PSOVER
PSOVERC

Scheduling

SDPBP

Entry Points

Name	Comments	DBIA/ICR reference
EXFLAG(PSOTPPX)	;Exit TPB RX option, reset TPG flag if necessary,
SCH	;DBIA to return TPB patients to Scheduling
RXPAT	;Sets Rx patient status to null
VOPNX	;
MARK	;Mark Rx as TPB Rx if applicable
MARKV	;Mark from Verify action
PDIR(PSOTPEX)	;
VOPNR	;
SET(PSOTPPST)	;Pass in DFN on a hard set of INACTIVATION OF BENEFIT DATE
CAN(PSOTPRCX)	;
VOPN	;
PCAP(PSOPAPPT)	;Find nearest Primary Care appointment
NOREN	;
DSPL(PSOTPWRN)	;

Name	Field # of Occurrence
C^%DTC	CAN+13, EXFLAG+8
^DIE	CAN+19, EXFLAG+21
^DIR	PDIR+7, VOPNX+8, DSPL+8, DSPL+14
$$DT^XLFDT	EXFLAG+2
$$UP^XLFSTR	MARK+8, MARKV+8, RXPAT+3, SET+2, VOPNX+5, DSPL+6, DSPL+12, EXFLAG+18

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!?10,$C(7),$P($G(^DPT(PSOTPEX,0)),"^")_" ("_$E(PSOTPEXS,1,3)_"-"_$E(PSOTPEXS,4,5)_"-"_$E(PSOTPEXS,6,9)_")" Line Location: PDIR+5
Function Call: WRITE	Prompt: !?10,"Patient is eligible for the Transitional Pharmacy Benefit!!" Line Location: PDIR+6
Function Call: WRITE	Prompt: !,$G(PSOTPPE5(PSOTPPE8)) Line Location: VOPNX+7
Function Call: WRITE	Prompt: !!,"This order has an Rx Patient Status of 'NON-VA'!",! Line Location: DSPL+8
Routine Call	DIE Line Location: CAN+19 EXFLAG+21
Routine Call	DIR Line Location: PDIR+7 VOPNX+8 DSPL+8 DSPL+14

FileNo	Call Tags
^PS(52.91 - [#52.91]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	PDIR+4, PDIR+5, SCH+6, SCH+7
^PS(52.41 - [#52.41]	VOPNR+2, VOPNR+5, VOPNR+6, NOREN+1, DSPL+3, DSPL+4, DSPL+5, DSPL+11
^PS(52.91 - [#52.91]	CAN+7, CAN+8, MARK+11, MARK+12, MARKV+11, MARKV+12, SET+2, EXFLAG+4, EXFLAG+5, EXFLAG+6 , SCH+3, SCH+4
^PS(53 - [#53]	MARK+8, MARKV+8, RXPAT+3, SET+2, VOPNX+5, DSPL+6, DSPL+12, EXFLAG+18
^PS(55 - [#55]	CAN+14, RXPAT+3, SET+2, VOPNR+6, DSPL+11, EXFLAG+10
^PSRX - [#52]	CAN+4, CAN+6, CAN+10, CAN+15, CAN+16, CAN+18, MARK+3, MARK+6, MARK+14, MARKV+3 , MARKV+6, MARKV+13, VOPN+2, VOPN+5, VOPNR+5, DSPL+4, DSPL+5, EXFLAG+11, EXFLAG+12, EXFLAG+13 , EXFLAG+14, EXFLAG+16, EXFLAG+20*
^TMP($J	SCH+2!, SCH+7*
^VA(200 - [#200]	MARK+9, MARK+10, MARKV+9, MARKV+10, VOPNX+3, VOPNX+4, EXFLAG+19

Name	Line Occurrences
NOREN	VOPNR+5
VOPNX	NOREN+2

Name	Field # of Occurrence
^(	SCH+3
^("TPB"	EXFLAG+19
^(0	CAN+8, MARK+12, MARKV+12, SET+2, EXFLAG+16
^(2	CAN+18

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DA	CAN+11~, CAN+19!, RXPAT+3, EXFLAG+7~, EXFLAG+21!
DIE	CAN+11~, CAN+19!, EXFLAG+7~, EXFLAG+21!
DIR	PDIR+7!, VOPNX+8!, DSPL+1~, DSPL+8!, DSPL+14!
DIR("A"	PDIR+7, VOPNX+8, DSPL+8, DSPL+14
DIR(0	PDIR+7, VOPNX+8, DSPL+8, DSPL+14
DR	CAN+11~, CAN+19!, EXFLAG+7~, EXFLAG+21!
DT	CAN+8, CAN+13, CAN+18, CAN+19, MARK+12, MARKV+12, RXPAT+2, SET+2, EXFLAG+2*, EXFLAG+5 , EXFLAG+8, EXFLAG+13, SCH+5
>> PSONVLP	MARKV+2, MARKV+3, MARKV+6, MARKV+13
PSOPAPPT	PCAP~
PSOSCT	SCH+1~, SCH+3*, SCH+4, SCH+6, SCH+7
PSOSCTD	SCH+1~, SCH+4*, SCH+5
PSOTC1	CAN+11~, CAN+14*
PSOTC2	CAN+11~, CAN+14*, CAN+15, CAN+16, CAN+18
PSOTC3	CAN+11~, CAN+13*, CAN+14
PSOTCXFL	CAN+11~, CAN+12, CAN+14, CAN+18, CAN+19
>> PSOTPBFG	MARK+4, MARKV+4
PSOTPCSS	CAN+11~, CAN+16*, CAN+17
PSOTPEX	PDIR~, PDIR+1, PDIR+4, PDIR+5
PSOTPEXS	PDIR+2~, PDIR+4*, PDIR+5
>> PSOTPEXT	PDIR+3, PDIR+7
PSOTPODE	MARK+1~, MARK+6*, MARK+7, MARK+8, MARK+9, MARK+10, MARK+11, MARK+12
PSOTPPE3	VOPN+3~, VOPN+5, VOPNX+2, VOPNX+5, VOPNR+3~, VOPNR+5, VOPNR+6*
PSOTPPE4	VOPN+3~, VOPN+5, VOPNX+1, VOPNX+3, VOPNX+4, VOPNR+3~, NOREN+1
PSOTPPE5	VOPN+3~, VOPNR+3~
PSOTPPE5(	VOPNX+1, VOPNX+2, VOPNX+3, VOPNX+4, VOPNX+5*, VOPNX+7
PSOTPPE6	VOPN+3~, VOPN+4, VOPNX+1, VOPNX+2, VOPNX+3, VOPNX+4, VOPNX+5, VOPNR+3~, VOPNR+4*
PSOTPPE7	VOPN+3~, VOPNX+5*, VOPNR+3~
PSOTPPE8	VOPN+3~, VOPNX+7*, VOPNR+3~
>> PSOTPPE9	VOPNX+6
>> PSOTPPEN	VOPN+1, VOPN+2, VOPN+5, VOPNR+1, VOPNR+2, VOPNR+5, VOPNR+6, NOREN+1
>> PSOTPPEX	VOPNX+1, VOPNX+2, VOPNX+3, VOPNX+4, VOPNX+5*, VOPNX+6
PSOTPPST	SET~, SET+2
PSOTPPX	EXFLAG~, EXFLAG+3, EXFLAG+4, EXFLAG+5, EXFLAG+6, EXFLAG+10, EXFLAG+11, EXFLAG+21
PSOTPPX1	EXFLAG+7~, EXFLAG+8*, EXFLAG+10
PSOTPPX2	EXFLAG+7~, EXFLAG+10*
PSOTPPX3	EXFLAG+7~, EXFLAG+10*, EXFLAG+11, EXFLAG+12, EXFLAG+13, EXFLAG+14, EXFLAG+16, EXFLAG+20
PSOTPPX4	EXFLAG+7~, EXFLAG+14*, EXFLAG+15
PSOTPPX5	EXFLAG+7~, EXFLAG+16*, EXFLAG+17, EXFLAG+18
PSOTPPX6	EXFLAG+7~, EXFLAG+16*, EXFLAG+17, EXFLAG+19
PSOTPPX7	EXFLAG+7~, EXFLAG+18*
PSOTPPX9	EXFLAG+7~, EXFLAG+9, EXFLAG+20, EXFLAG+21
PSOTPRC	CAN+3~, CAN+4*, CAN+5, CAN+7, CAN+8, CAN+10, CAN+14, CAN+15, CAN+19
PSOTPRCX	CAN~, CAN+2, CAN+4, CAN+6, CAN+10
PSOTPV1	MARKV+1~, MARKV+6*, MARKV+7, MARKV+8, MARKV+9, MARKV+10, MARKV+11, MARKV+12
PSOTPV2	MARKV+1~, MARKV+8*
PSOTPWR1	DSPL+1~, DSPL+5, DSPL+6, DSPL+11, DSPL+12
PSOTPWR2	DSPL+1~, DSPL+6, DSPL+12
PSOTPWR3	DSPL+1~, DSPL+6, DSPL+7, DSPL+12, DSPL+13
PSOTPWRN	DSPL~, DSPL+2, DSPL+3, DSPL+4, DSPL+5, DSPL+11
>> PSOX("IRXN"	MARK+2, MARK+3, MARK+6, MARK+14
PSOZTRX	MARK+1~, MARK+8*
PSOZXTRX	SET+1~, SET+2*
PSOZZTRX	RXPAT+1~, RXPAT+3*
>> VALMSG	VOPNX+6*
X	CAN+11~, CAN+13, RXPAT+2, EXFLAG+7~, EXFLAG+8
X1	CAN+11~, CAN+13, EXFLAG+7~, EXFLAG+8
X2	CAN+11~, CAN+13, EXFLAG+7~, EXFLAG+8
Y	CAN+11~, PDIR+7, EXFLAG+7~

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSOTPCAN

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Caller Graph Total: 18

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: