Routine: PSOP2

Package	Total	Call Graph
Kernel	1	$$UP^XLFSTR
Outpatient Pharmacy	1	DIR^PSOP1
VA Fileman	1	^DIC

Package	Total	Caller Graph
Outpatient Pharmacy	2	PSOP PSOP1

Entry Points

Name	Comments	DBIA/ICR reference
CLSS
HD1	;W @IOF W !,?29,"PENDING ORDERS",!,PSOPLINE
DRUG	;Q:'$D(^PSDRUG(+$P(^PSRX(J,0),"^",6),0)) S DRG=$P(^(0),"^")
PEND	;list pending orders
NVA	;non-va meds
DATE

External References

Name	Field # of Occurrence
^DIC	PEND+8
DIR^PSOP1	PEND+3, PEND+10, PEND+11, PEND+13, NVA+6
$$UP^XLFSTR	DRUG+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Drug: ",$S($P(PSOPEND(EEEE),"^",2)="DD":$P($G(^PSDRUG(+PPDIS,0)),"^"),1:$P($G(^PS(50.7,+PPOI,0)),"^")_" "_$P($G(^PS(50.606,+$P($G(^(0)),"^",2),0)),"^")),! Line Location: PEND+6
Function Call: WRITE	Prompt: ! Condition for execution: PCOUNT>1 Line Location: PEND+11
Function Call: WRITE	Prompt: ?6,$G(^PS(52.41,PENDREX,"SIG",AAAA,0)) Line Location: PEND+11
Function Call: WRITE	Prompt: !,?29,"PENDING ORDERS",!,PSOPLINE Line Location: HD1+0
Function Call: WRITE	Prompt: @IOF Line Location: HD1+2
Function Call: WRITE	Prompt: !,"Patient: "_$P($G(^DPT(DFN,0)),"^"),?70,"Page: "_PAGE,!?21,$S($G(NVA):"Non-VA MEDS (Not Dispensed by VA)",1:"Pending Outpatient Orders"),!,PSOPLINE Line Location: HD1+2
Function Call: WRITE	Prompt: !!,PSOPLINE,!?(80-$L("Non-VA MEDS (Not Dispensed by VA)"))/2,"Non-VA MEDS (Not Dispensed by VA)",! Line Location: NVA+2
Function Call: WRITE	Prompt: @IOF Line Location: NVA+6
Function Call: WRITE	Prompt: !?2,"Order Check(s):" Line Location: NVA+23
Function Call: WRITE	Prompt: !?2,"Order Check(s):" Line Location: NVA+24
Function Call: WRITE	Prompt: !?2,"Order Check(s):" Line Location: NVA+25
Function Call: WRITE	Prompt: !?5,"Override Reason: " Line Location: NVA+27
Function Call: WRITE	Prompt: ?22,^PS(55,DFN,"NVA",PPP,"OCK",NVAP,"OVR",NVAPR,0),! Line Location: NVA+29
Function Call: WRITE	Prompt: !?2,"Statement/Explanation/Comments: " Line Location: NVA+32
Function Call: WRITE	Prompt: $P(^PS(55,DFN,"NVA",PPP,"DSC",NVAP,0),"^"),!?34 Line Location: NVA+34
Function Call: WRITE	Prompt: ! Line Location: NVA+35
Routine Call	DIC Line Location: PEND+8

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^VA(200 - [#200]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	HD1+2
^PS(50.606 - [#50.606]	PEND+6, NVA+8
^PS(50.7 - [#50.7]	PEND+6, NVA+8
^PS(52.41 - [#52.41]	PEND+1, PEND+2, PEND+5, PEND+11, PEND+12
^PS(55 - [#55]	NVA+1, NVA+3, NVA+23, NVA+25, NVA+27, NVA+29, NVA+32, NVA+34
^PSDRUG - [#50]	DRUG+1, CLSS, PEND+6, NVA+8
^PSRX - [#52]	DATE+1, DATE+2, DRUG+1, DRUG+4, DRUG+5, CLSS, CLSS+3, CLSS+4
^TMP($J	DATE+2, DRUG+5, CLSS+4*
^VA(200 - [#200]	NVA+21, NVA+30

Label References

Name	Line Occurrences
HD1	PEND+4, PEND+10, PEND+12, NVA+7, NVA+15, NVA+22, NVA+24, NVA+25, NVA+26, NVA+28 , NVA+31, NVA+33

Naked Globals

Name	Field # of Occurrence
^("STA"	DRUG+4, CLSS+3
^(0	DATE+1, DATE+2, DRUG+1, CLSS, PEND+2, PEND+5, PEND+6, NVA+8, NVA+25

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> AAAA	PEND+11*, PEND+12
>> CLS	CLSS+1
>> DFN	PEND+1, HD1+2, NVA+1, NVA+3, NVA+23, NVA+25, NVA+27, NVA+29, NVA+32, NVA+34
DIC	PEND+8!*
DIC(0	PEND+8*
>> DRG	DRUG+1, DRUG+3, DRUG+5, CLSS, CLSS+2, CLSS+4
>> DRS	DRUG+2
>> DTS	DATE
>> EDT	DATE+1
>> EEEE	PEND+4*, PEND+5, PEND+6, PEND+7, PEND+8
IOF	HD1+2, NVA+6
IOSL	PEND+10, PEND+11, NVA+6, NVA+7, NVA+15, NVA+22, NVA+24, NVA+25, NVA+26, NVA+28 , NVA+31, NVA+33
IOST	PEND+3, PEND+10, PEND+11, PEND+13, NVA+6, NVA+7, NVA+15, NVA+22, NVA+24, NVA+25 , NVA+26, NVA+28, NVA+31, NVA+33
>> J	DATE+1, DATE+2, DRUG+1, DRUG+4, DRUG+5, CLSS, CLSS+3, CLSS+4
NVA	HD1+2, NVA+3*, NVA+35!
NVAOR	NVA+3*, NVA+5, NVA+8, NVA+10, NVA+11, NVA+13, NVA+14, NVA+16, NVA+17, NVA+18 , NVA+19, NVA+20, NVA+21, NVA+35!
NVAP	NVA+25, NVA+27, NVA+29, NVA+34, NVA+35!
NVAPR	NVA+29*, NVA+35!
>> PAGE	HD1+1, HD1+2, HD1+3
>> PCNT	NVA+3*
>> PCOUNT	PEND+11*
>> PENDREX	PEND+5*, PEND+11, PEND+12
>> PLS	HD1+1, HD1+3, NVA+9
>> PPCOUNT	PEND+4, PEND+6, PEND+12*
>> PPDIS	PEND+5*, PEND+6
>> PPOI	PEND+5*, PEND+6
>> PPP	PEND+1, PEND+2, NVA+3, NVA+23, NVA+25, NVA+27, NVA+29, NVA+32, NVA+34
>> PPPCNT	PEND+1, PEND+2, PEND+3
>> PPPSTAT	PEND+1*
PQT	PEND+3, PEND+4, PEND+10, PEND+11, PEND+13, NVA+3!, NVA+6
>> PRV	NVA+25*, NVA+30
>> PSFR	DRUG+3, CLSS+2
>> PSODTCT	DRUG+4, DRUG+5, CLSS+3, CLSS+4
>> PSOPEND(	PEND+2*, PEND+4, PEND+5, PEND+6, PEND+7, PEND+8
>> PSOPLINE	HD1+2, NVA+2
>> PSTO	DRUG+3, CLSS+2
>> SDT	DATE+1
TRCL	CLSS+1, CLSS+2*, CLSS+3!, CLSS+4!
TRDR	DRUG+2, DRUG+3*, DRUG+4!, DRUG+5!
TRDT	DATE, DATE+1*, DATE+2!
X	DATE+2, PEND+8!
Y	PEND+8!, PEND+9

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSOP2

Information

Source Information

Call Graph

Call Graph Total: 3

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: