Routine: PSOCAN4

Package	Total	Call Graph
Outpatient Pharmacy	12	^PSOBUILD (CHK,EXP)^PSOCAN (COM,INVALD,SHOW,SPEED1)^PSOCAN1 REINS^PSOCAN2 (CAN1,KCAN)^PSOCAN3 NOOR^PSOCAN4 EN^PSOHLSN LOCK^PSOORCPY RV^PSOORFL BLD^PSOORUT1 (CER,DCV)^PSOPKIV1 ENQ^PSORXDL
VA Fileman	3	^DIC ^DIK ^DIR
Order Entry Results Reporting	1	($$NA,NA)^ORX1
Pharmacy Data Management	1	($$L,PSOL,PSOUL,UL)^PSSLOCK
Registration	1	(FULL,PAUSE)^VALM1

Package	Total	Caller Graph
Outpatient Pharmacy	11	PSOCAN1 PSOCAN2 PSOCAN3 PSOCAN4 PSODGDG1 PSODGDGI PSOORFI6 PSOREJU1 PSORENW0 PSORXDL PSOVER2

Entry Points

Name	Comments	DBIA/ICR reference
REQ	;prompt for requesting provider
OK	;S ORD=SAVORD,ORN=SAVORN ;IHS/MSC/PLS - 11/27/06
REF	;CONT. FROM REF^PSOCAN2; PSO7259
ULP
NOORX
RX
RQTEST	;
PEN	;discontinue pending orders
DEL	;deletes non-verified Rxs
EX
NOOR	;ask nature of order
ACT
MEDDIS	;
SEL
NOORXP

External References

Name	Field # of Occurrence
^DIC	REQ+6
^DIK	PEN+6
^DIR	SEL+4, NOOR+10, DEL+2, DEL+5
$$NA^ORX1	NOOR+5
NA^ORX1	NOOR+2
^PSOBUILD	SEL+11
CHK^PSOCAN	RX+8
EXP^PSOCAN	RX+9
COM^PSOCAN1	SEL+7
INVALD^PSOCAN1	SEL+12
SHOW^PSOCAN1	RX+12
SPEED1^PSOCAN1	RX+10
REINS^PSOCAN2	ACT
CAN1^PSOCAN3	ACT+1
KCAN^PSOCAN3	SEL+5
NOOR^PSOCAN4	DEL+4
EN^PSOHLSN	PEN+8
LOCK^PSOORCPY	SEL+3
RV^PSOORFL	SEL+11
BLD^PSOORUT1	SEL+11
CER^PSOPKIV1	RX+6
DCV^PSOPKIV1	DEL+7
ENQ^PSORXDL	DEL+8
$$L^PSSLOCK	SEL+3
PSOL^PSSLOCK	RX+1, PEN+3
PSOUL^PSSLOCK	RX+11, RX+14, PEN+6, PEN+9
UL^PSSLOCK	ULP
FULL^VALM1	SEL+7, SEL+8, NOOR+1, DEL+1
PAUSE^VALM1	RX+1, MEDDIS+4, MEDDIS+5

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: $C(7),!!,$P($G(PSOMSG),"^",2),!,"Rx "_$P(^PSRX($P(PSOLST(ORN),"^",2),0),"^"),! Line Location: RX+2
Function Call: WRITE	Prompt: $C(7),!!,$P($G(PSOMSG),"^",2)_" (Pending order)",! Line Location: PEN+4
Function Call: WRITE	Prompt: ! Line Location: REQ+5
Function Call: WRITE	Prompt: "Drug: "_$P($G(^PSDRUG(+$P(^PS(52.41,ORD,0),"^",9),0)),"^") Line Location: MEDDIS+4
Function Call: WRITE	Prompt: "Orderable Item: "_$P($G(^PS(50.7,PSOFMMD,0)),"^")_" "_$P($G(^PS(50.606,+$P($G(^PS(50.7,PSOFMMD,0)),"^",2),0)),"^") Line Location: MEDDIS+5
Routine Call	DIC Line Location: REQ+6
Routine Call	DIR Line Location: SEL+4 NOOR+10 DEL+2 DEL+5

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PS(50.606 - [#50.606]	MEDDIS+5
^PS(50.7 - [#50.7]	MEDDIS+5
^PS(52.41 - [#52.41]	PEN+6, PEN+7!*, PEN+8, REQ+1, RQTEST+4, MEDDIS+3, MEDDIS+4, MEDDIS+5
^PS(52.5 - [#52.5]	REF+2, REF+3, REF+4
^PSDRUG - [#50]	MEDDIS+4
^PSRX - [#52]	RX+2, RX+3, RX+4, RX+5, RX+6, RX+8, RX+9, RX+10, ACT, DEL+2 , RQTEST+3
^VA(200 - [#200]	NOOR+5, NOOR+9, REQ+3
^XUSEC("PSORPH"	SEL, RX

Label References

Name	Line Occurrences
@(	SEL+8
ACT	RX+13
DEL	RX+7
EX	DEL+2, DEL+3
MEDDIS	PEN+3
NOORXP	NOOR+2
OK	PEN+3
REQ	NOORXP
RQTEST	SEL+6
ULP	SEL+4, SEL+12

Naked Globals

Name	Field # of Occurrence
^("PS"	REQ+3
^("STA"	RX+5, RX+8
^(0	MEDDIS+5
^(2	RX+9

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
COM	SEL+12!
DA	RX+6~, RX+9, RX+10, RX+12, ACT, PEN+6!, DEL+6, REF+2
>> DEAD	RX+8
>> DFN	RX+8*
DFNHLD	SEL+2*, SEL+12!
DIC	REQ+5!*, REQ+6!
DIC("A"	REQ+5*
DIC("B"	REQ+5*
DIC("S"	REQ+5*
DIC(0	REQ+5*
DIK	PEN+6*!
DIR	SEL+4!, SEL+5!, SEL+11!, NOOR+2!, NOOR+10!, DEL+2!, DEL+5!
DIR("A"	SEL+4, NOOR+8, DEL+2, DEL+5
DIR("B"	NOOR+8, DEL+2, DEL+5*
DIR(0	SEL+4, NOOR+9, DEL+2, DEL+5
DIRUT	SEL+4!, SEL+5!, SEL+7, SEL+11!, NOOR+2!, NOOR+7, NOOR+10, NOORX, DEL+2!, DEL+3 , DEL+4, DEL+5, REQ+6
>> DODR	NOOR+8
DSMSG	SEL+11!
DT	RX+9, REQ+3
DTOUT	SEL+4!, SEL+5!, SEL+11!, NOOR+2!, NOOR+10!, REQ+6
DUOUT	SEL+4!, SEL+11!, DEL+2!, REQ+6
DUZ	SEL, RX, NOOR+5, NOOR+9
>> EN	RX+4*, RX+8
IEN	SEL+11!
>> IFN	REF+3
>> II	ACT*
INCOM	SEL+7, SEL+12!, PEN+8, DEL+7~*
LST	SEL+4*, SEL+5, SEL+8, SEL+11!, RQTEST+2
ORD	SEL+8, SEL+11!, PEN+2~, PEN+3, PEN+6, PEN+7, PEN+8, PEN+9, REQ+1, MEDDIS+2 , MEDDIS+3, MEDDIS+4, MEDDIS+5
ORN	SEL+8*, SEL+11!, RX+1, RX+2, RX+3, RX+4, RX+11, RX+14, PEN+3, DEL+2 , DEL+6
ORSV	SEL+11!
PKI	RX+6~
PKI1	RX+6~, DEL+7
PKIE	RX+6~
PKIR	RX+6~
PMIN	RQTEST+1~, RQTEST+2*
PMINFLAG	RQTEST+1~, RQTEST+2, RQTEST+3, RQTEST+4*, RQTEST+5
PMINZ	RQTEST+1~, RQTEST+2*, RQTEST+3, RQTEST+4
PSCAN	RX+4!, RX+11
PSCAN(	RX+12, RX+13, ACT
PSDEL	DEL+6!
PSINV	SEL+12!
PSINV(	RX+8*
PSOACT	SEL+11!
>> PSOCANRA	SEL+6*, NOORXP
>> PSOCANRC	REQ+6*
PSOCANRD	REQ+1, REQ+2, REQ+3, REQ+4!, REQ+5, RQTEST+3, RQTEST+4*
>> PSOCANRN	REQ+6*
>> PSOCANRP	REQ+1
>> PSOCANRZ	NOORXP, REQ+6, RQTEST+5
>> PSOCNT	SEL+1, SEL+4
PSOCO	SEL+11!
PSOCU	SEL+11!
>> PSODFN	SEL+2, SEL+3, SEL+12, ULP, RX+8, ACT*
PSODIR	SEL+11!
PSOFDR	SEL+4!
PSOFMMD	MEDDIS+1~, MEDDIS+5*
>> PSOLST(	SEL+8, RX+1, RX+2, RX+3, RX+4, RX+11, RX+14, PEN+3, DEL+2, DEL+6 , RQTEST+3, RQTEST+4
PSOMSG	SEL+11!, RX+1!, RX+2, PEN+3!, PEN+4
PSONO	SEL+11!
>> PSONODEL	REF+2, REF+5*
PSONOOR	SEL+11!, RX+7, PEN+8, NOOR+5, NOOR+6, NOOR+7!, NOOR+10
PSONOORA	RX+7*!
PSOOELSE	SEL+5!*, SEL+10, SEL+12!
PSOPLCK	SEL+3*!, SEL+4!
PSORENW	SEL+11!
PSORNW	SEL+11!
>> PSORX("INTERVENE"	DEL+6!
PSOSIEN	REF+1~, REF+2, REF+3, REF+4
>> PSOZVER	DEL+6*
>> REA	RX+12, ACT
REF	SEL+11!
REFL	SEL+11!
RPH	SEL+11!
>> RX	RX+10, RX+12, RX+13*, ACT
RXCNT	SEL+4, SEL+11!, RX+12
>> RXSP	RX+4*
SAVORD	SEL+11!
SAVORN	SEL+11!
SPEED	SEL+5*, SEL+7!, SEL+11!, NOORX, DEL+3
ST	SEL+11!
>> VALMBCK	SEL, SEL+1, SEL+3, SEL+4, SEL+7, SEL+9, SEL+10, NOORX, DEL+2, DEL+4
VALMCNT	SEL+1~
>> VALMSG	SEL, SEL+1, SEL+3, DEL+4, DEL+5*
>> X	RX+4*
>> Y	SEL+4, RX+4*, RX+5, RX+6, RX+8, NOOR+10, DEL+2, DEL+7, REQ+6
>> Y(0	RX+4*, RX+8
YY	RX+8*, RX+9, RX+11!
YY(0	RX+8*, RX+10

Marked Items

Name	Field # of Occurrence
$T(NA^ORX1	NOOR+2

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSOCAN4

Information

Source Information

Call Graph

Call Graph Total: 18

Caller Graph

Caller Graph Total: 11

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items