Routine: PSOBGMG3

Package	Total	Call Graph
VA Fileman	3	DD^%DT ^DIC ^DIR

Package	Total	Caller Graph
Outpatient Pharmacy	2	PSO BINGO STATUS PSOORUT3

Entry Points

External References

Name	Field # of Occurrence
DD^%DT	OLDT+1
^DIC	STATUS1+2
^DIR	ENPG+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Being Processed: "_OLDT,!,?3,"Division: "_$P(^PS(59,DIV,0),"^"),?42,"Time In: "_TIN,?60,"Time Out: ",!,?3,"Rx #: "_RX Line Location: PRSE+8
Function Call: WRITE	Prompt: !,?3,RX1 Condition for execution: $G(RX1) Line Location: PRSE+8
Function Call: WRITE	Prompt: !!,"Ready For Pickup: ",!,?3,"Division: "_$P(^PS(59,DIV,0),"^"),?42,"Time In: "_TIN,?60,"Time Out: "_TOUT,!,?3,"Rx #: "_RX Line Location: PRSE+10
Function Call: WRITE	Prompt: !,?3,RX1 Condition for execution: $G(RX1) Line Location: PRSE+10
Function Call: WRITE	Prompt: !!,"Picked Up: ",!,?3,"Division: "_$P(^PS(59,DIV,0),"^"),?42,"Time In: "_TIN,?60,"Time Out: "_TOUT,!,?3,"Rx #: "_RX Line Location: PRSE+13
Function Call: WRITE	Prompt: !,?3,RX1 Condition for execution: $G(RX1) Line Location: PRSE+13
Function Call: WRITE	Prompt: !!,"Pending: ",!,?3,"Orderable Item: "_$P(^PS(50.7,OI,0),"^"),?52,"Provider: "_$P(^VA(200,PROV,0),"^") Line Location: PRSE1+7
Function Call: WRITE	Prompt: !,?3,"Entered By: "_$P(^VA(200,EBY,0),"^"),?52,"Time In: "_LOGDT Line Location: PRSE1+8
Function Call: WRITE	Prompt: !,?3,"Drug: "_$S($G(DRG):$P(^PSDRUG(DRG,0),"^"),1:""),?52,"Routing: "_$S($G(MW)="M":"MAIL",1:"WINDOW") Line Location: PRSE1+9
Function Call: WRITE	Prompt: @IOF Line Location: ENPG+2
Routine Call	DIC Line Location: STATUS1+2
Routine Call	DIR Line Location: ENPG+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	PRSE+6
^DPT - [#2]	PEND
^PS(50.7 - [#50.7]	PRSE1+7
^PS(52.11 - [#52.11]	BING+1, BING+2, OLDT+1, PRSE+2, PRSE+4, PRSE+5
^PS(52.41 - [#52.41]	PEND, PEND+1, PEND+3, PRSE1+1, PRSE1+2
^PS(59 - [#59]	PRSE+8, PRSE+10, PRSE+13
^PSDRUG - [#50]	PRSE1+9
^PSRX - [#52]	PRSE+2
^VA(200 - [#200]	PRSE1+7, PRSE1+8

Label References

Name	Line Occurrences
ENPG	PRSE+9, PRSE+11, PRSE+14, PRSE1+10
EX	STATUS1+2
OLDT	PEND+2
PRSE	PEND+2
PRSE1	PEND+3
STATUS1	PEND+5

Naked Globals

Name	Field # of Occurrence
^(0	PRSE+2, PRSE+4, PRSE1+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
CNT	STATUS1+1, BING+2, PEND+4!, EX!
CNT1	STATUS1+1, PEND+1, PEND+4!, EX!
DA	STATUS1~, PEND+2, PEND+3, EX!, OLDT+1, PRSE+2, PRSE+4, PRSE+5, STEX!, PRSE1+1 , PRSE1+2, STEX1!
DG	EX!, PRSE+4*, PRSE+5, STEX!
DIC	STATUS1~, STATUS1+2!*, EX!, STEX!, STEX1!
DIC("A"	STATUS1+2*
DIC("S"	STATUS1+2*
DIC(0	STATUS1+2*
DIK	STATUS1~, EX!, STEX!, STEX1!
DIR	ENPG!, ENPG+2!
DIR(0	ENPG*
DIRUT	ENPG!, ENPG+2!
DIS	EX!, PRSE+4*, PRSE+8, PRSE+10, PRSE+13, STEX!
DIV	EX!, PRSE+4*, PRSE+8, PRSE+10, PRSE+13, STEX!
DLAYGO	STATUS1+2!
DRG	EX!, PRSE1+2*, PRSE1+9, STEX1!
DT	OLDT+1, PRSE+7, PRSE1+5
DTME	STATUS1+1, EX!, PRSE+4, PRSE+6*, STEX!
DTOUT	STATUS1+2, ENPG!, ENPG+2!
DUOUT	STATUS1+2, ENPG!, ENPG+2!
EBY	EX!, PRSE1+2*, PRSE1+8, STEX1!
EXT	STATUS1+1, PEND+2, PEND+3, EX!, PRSE+9, PRSE+11, PRSE+14, PRSE1+10, ENPG+1
IOF	PRSE+7, PRSE1+5, ENPG+2
IOSL	PRSE+9, PRSE+11, PRSE+14, PRSE1+10
LOGDT	EX!, PRSE1+2, PRSE1+3, PRSE1+8, STEX1!
LP	PEND+2, PEND+3, PEND+4!, EX!
MW	EX!, PRSE1+2*, PRSE1+9, STEX1!
NAM	STATUS1+2*, BING+1, PEND, PEND+4!, EX!, PRSE+7, PRSE1+5
NDA	STATUS1~, BING+2, PEND+1, PEND+4!, EX!
NDA(	BING+2*, PEND+2
NDA1	STATUS1~, PEND+4!, EX!
NDA1(	PEND+1*, PEND+3
NDAINS	PEND+1*, PEND+4!
NNAM	BING+1, BING+2, PEND, PEND+1, PEND+4!, EX!
NNUM	STATUS1+2*, BING+2, PEND, EX!, PRSE+5
ODTP	EX!, PRSE1+2*, STEX1!
OI	PEND+4!, EX!, PRSE1+2*, PRSE1+7
OLDT	STATUS1+1, PEND+4!, EX!, OLDT+1, PRSE+8
PAS	STATUS1~, PEND+4!, EX!, PRSE+7, PRSE+15*, PRSE1+5
PAS1	STATUS1~, PEND+4!, EX!, PRSE1+5, STEX1+1*
PKP	EX!, PRSE+5*, PRSE+10, STEX!
PKPD	PRSE+5*, PRSE+10, PRSE+13, STEX!
PN	EX!, PRSE1+2*, STEX1!
PROV	EX!, PRSE1+2*, PRSE1+7, STEX1!
>> PSOHA	PEND+5
RX	STATUS1~, STATUS1+1, PRSE+1, PRSE+3*, PRSE+8, PRSE+10, PRSE+13
RX1	STATUS1~, PRSE+1, PRSE+3, PRSE+8, PRSE+10, PRSE+13
RXNUM	STATUS1~, STATUS1+1, PRSE+1, PRSE+3*
TIN	EX!, PRSE+4, PRSE+6, PRSE+8, PRSE+10, PRSE+13, STEX!
TOUT	EX!, PRSE+4, PRSE+6, PRSE+10, PRSE+13, STEX!
XX	STATUS1~, EX!, PRSE+2*, STEX!, STEX1!
XX1	PRSE+2*, PRSE+3, STEX!, STEX1!
Y	STATUS1~, STATUS1+2, EX!, OLDT+1, PRSE+6, STEX!, PRSE1+3*, STEX1!, ENPG+1
Y(0	STATUS1+2

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSOBGMG3

Information

Source Information

Call Graph

Call Graph Total: 3

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
STATUS	;
STATUS1
OLDT	;
BING	;do not remove this entry point SAB
ENPG
STEX1
PEND
EX
STEX
PRSE1	;PENDING
PRSE	;