Routine: PSOORNE6

Package	Total	Call Graph
Outpatient Pharmacy	12	CAN^PSOCAN INS^PSODIR EN^PSOFSIG SIGONE^PSOHELP EN^PSOHLSN1 DCORD^PSONEW2 DOSE^PSOORED4 (8,9)^PSOORNEW 2^PSOORNW1 PROV^PSOUTIL WORDWRAP^PSOUTLA2 KV^PSOVER1
Registration	1	FULL^VALM1
Text Integration Utility	1	MAIN^TIUEDIT
VA Fileman	1	^DIR

Package

Total

Call Graph

CAN^PSOCAN INS^PSODIR EN^PSOFSIG SIGONE^PSOHELP EN^PSOHLSN1 DCORD^PSONEW2 DOSE^PSOORED4 (8,9)^PSOORNEW
2^PSOORNW1 PROV^PSOUTIL WORDWRAP^PSOUTLA2 KV^PSOVER1

Registration

FULL^VALM1

Text Integration Utility

MAIN^TIUEDIT

VA Fileman

^DIR

Package	Total	Caller Graph
Outpatient Pharmacy	5	PSOORFI4 PSOORNE2 PSOORNE3 PSOORNE4 PSOORNE5

Package

Total

Caller Graph

Outpatient Pharmacy

PSOORFI4 PSOORNE2 PSOORNE3 PSOORNE4 PSOORNE5

Entry Points

Name	Comments	DBIA/ICR reference
DISP	;
INST1	;formats instruction from front door
ACP1	;
PC	;displays provider comments
PC1	;displays provider comments
DOSE	;displays new SIG with dosing
K3	;
K2	;
K1	;
SIG	;called from psoorne3
ORCHK	;
INST	;formats instruction from front door
QTY	;I PSONEW("QTY")'=+PSONEW("QTY") W !,"Quantity must be ALL numeric!",! D 9^PSOORNEW Q:$G(PSONEW("DFLG"))=1 G QTY

External References

Name	Field # of Occurrence
^DIR	QTY+6
CAN^PSOCAN	ACP1+2
INS^PSODIR	ORCHK+10
EN^PSOFSIG	ORCHK+9, ORCHK+10
SIGONE^PSOHELP	SIG+3
EN^PSOHLSN1	ACP1+4, ACP1+5
DCORD^PSONEW2	ACP1+2
DOSE^PSOORED4	ORCHK+7
8^PSOORNEW	QTY+8
9^PSOORNEW	QTY+1, QTY+8
2^PSOORNW1	ORCHK+4
PROV^PSOUTIL	QTY+9
WORDWRAP^PSOUTLA2	INST+6, PC+6, INST1+6, PC1+6
KV^PSOVER1	QTY+4, QTY+6, QTY+7
MAIN^TIUEDIT	ACP1+6
FULL^VALM1	ACP1+6, ORCHK+2, ORCHK+4

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: ORCHK+2
Function Call: WRITE	Prompt: !,PSODOSE("MSG",I) Line Location: ORCHK+14
Function Call: WRITE	Prompt: !,$P(FLD,"^")_" is required data" Line Location: ORCHK+18
Function Call: WRITE	Prompt: !,"Quantity must be ALL numeric!",! Line Location: QTY+0
Function Call: WRITE	Prompt: !,"Quantity must be ALL numeric!",! Line Location: QTY+1
Routine Call	DIR Line Location: QTY+6

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	DISP+8
^PSRX - [#52]	SIG+2, SIG+3, SIG+5, ACP1+5, ACP1+8, INST+1, INST+2, INST+4, INST+5, PC+1 , PC+2, PC+4, PC+5, INST1+1, INST1+2, INST1+4, INST1+5, PC1+1, PC1+2, PC1+4 , PC1+5, DISP+2, DISP+3, DISP+4, DISP+5, DISP+6, DISP+10
^PSRX("B"	ACP1+8
^TMP("PSOAO"	INST+3, INST+6, PC+3, PC+6, DISP+1, DISP+2, DISP+4, DISP+6, DISP+7, DISP+9
^TMP("PSOPO"	SIG+4, SIG+7, DOSE+2, INST1+3, INST1+6, PC1+3*, PC1+6
^TMP("PSORXN"	ACP1+3, ACP1+4, ACP1+7!
^VA(200 - [#200]	DISP+1, DISP+2, DISP+4, DISP+6, DISP+7

Name	Line Occurrences
@(	ORCHK+18
DOSE	SIG+1
QTY	QTY+1, QTY+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> ACP	ORCHK+3*
ACTREF	K3+2!
ACTREN	K3+2!
>> BBRN	ACP1+8*
>> BBRN1	ACP1+8*
>> BINGCRT	ACP1+8*
>> BINGRTE	ACP1+8*
CC	K3+1!
CRIT	K3+1!
CT	K3+1!
DA	ACP1+1!*, ACP1+2!
DAYS	K3+1!
DDER	K3+1!
DEA	K3+1!
DIC	QTY+10!
DIR	K1+1!, K2+1!
DIR("?"	QTY+5*
DIR("A"	QTY+4*
DIR("B"	QTY+4*
DIR(0	QTY+4*
DIRUT	K1+1!, K2+1!, ORCHK+3, QTY+6
DRET	K1+1!, K2+1!, ACP1+7!
DSMSG	K3+1!
DTOUT	K2+1!
DUOUT	K1+1!, K2+1!
FDORC	ORCHK+7*!
>> FLD	ORCHK+17*, ORCHK+18
HDR	K3+1!
I	SIG+5, SIG+6, DOSE+1, DOSE+2, DOSE+3!, ORCHK+11, ORCHK+12, ORCHK+13!, ORCHK+14*
IEN	SIG+4, SIG+7, DOSE+2, K3+1!, INST+3, INST+6, PC+3, PC+6, INST1+3, INST1+6 , PC1+3, PC1+6, DISP+1, DISP+2, DISP+4, DISP+6, DISP+7, DISP+9, DISP+10
INCOM	K3+2!
INS1	SIG+3, K2+1!, K3+2!
MIG	SIG+5, SIG+6, SIG+7, SIG+8!, DOSE+3!, INST+5, INST+6, INST+7!, PC+5, PC+6 , PC+7!, INST1+5, INST1+6, INST1+7!, PC1+5*, PC1+6, PC1+7!
MSG	ACP1+1!*, ACP1+2!
>> NEWDOSE	ORCHK+9*
ORD	K3+1!
ORN	K3+1!
ORSV	K3+1!
PHI	K1+1!, K2+1!, INST+1, INST1+1
PHI(	INST+2, INST1+2
>> POERR("DFLG"	ORCHK+6, ORCHK+11!, ORCHK+12, ORCHK+13
PRC	K1+1!, K2+1!, PC+1, PC1+1
PRC(	PC+2, PC1+2
PSCAN	ACP1+2!
PSCAN(	ACP1+2*
PSLST	K3+1!
PSOAC	K3+1!
PSOACT	K3+1!
>> PSOCOPY	SIG+1, DISP+1
>> PSODFN	ACP1+6
>> PSODIR("DFLG"	ORCHK+6, ORCHK+8, QTY+9
PSODOSE	ORCHK+11!, ORCHK+13!
PSODOSE("MSG"	ORCHK+12*, ORCHK+14
>> PSODRUG("MAXDOSE"	QTY+2, QTY+3
>> PSODRUG("NAME"	ORCHK+3, ORCHK+4
PSOFDR	K1+1!, K2+1!, K3+2!, ACP1+1
PSOFLAG	K3+1!
PSOMIS	ORCHK+5*, ORCHK+6, ORCHK+7, ORCHK+11!
>> PSONEW	ORCHK+7, ORCHK+9, ORCHK+10, QTY+9
>> PSONEW(	ORCHK+17, ORCHK+18
>> PSONEW("DAYS	SUPPLY" , QTY+2
>> PSONEW("DFLG"	ORCHK+1, ORCHK+19, QTY+1, QTY+2, QTY+6, QTY+8, QTY+9, QTY+10*
>> PSONEW("DOSE"	ORCHK+5, ORCHK+8, ORCHK+12
>> PSONEW("ENT"	ORCHK+9
>> PSONEW("FLD"	ORCHK+17!*
>> PSONEW("NRX #	" , ACP1+8
>> PSONEW("OIRXN"	ACP1+1
>> PSONEW("ORX #	" , ACP1+2
>> PSONEW("PROVIDER"	QTY+9
>> PSONEW("QFLG"	ORCHK+1, ORCHK+6, ORCHK+11!, ORCHK+12*, ORCHK+16, QTY+2
>> PSONEW("QTY"	QTY+1, QTY+2
>> PSONEW("SCHEDULE"	ORCHK+5, ORCHK+8
PSONOOR	K1+1!, K3+2!
PSONOTE	ACP1+6!
PSOOELSE	K2+1!
>> PSOPF	DISP+10*
>> PSOQFLG	ORCHK+3
PSORXED	K1+1!, K2+1!
PSORXED("IRXN"	SIG+2, SIG+3, SIG+5
>> PSOSIGFL	SIG+1
REA	ACP1+1!*, ACP1+2!
REF	K1+1!, K2+1!, K3+1!
REFL	K3+1!
RFCNT	K3+1!
RIFN	K3+2!
RN	DISP+7*, DISP+9!
RPH	K3+1!
RTE	K1+1!, K2+1!, ACP1+7!
RTN	ORCHK+18~*!
RX	K3+2!
RX0	K3+2!, DISP+7
RX2	K3+2!, DISP+1, DISP+8, DISP+9
RX3	K3+2!
RXDA	K3+2!
>> RXN	INST+1, INST+2, INST+4, INST+5, PC+1, PC+2, PC+4, PC+5, INST1+1, INST1+2 , INST1+4, INST1+5, PC1+1, PC1+2, PC1+4, PC1+5, DISP+2, DISP+3, DISP+4, DISP+5 , DISP+6, DISP+10
RXN1	ACP1+4*, ACP1+5, ACP1+7!
RXOR	K3+2!
RXREF	K3+2!
RXXN	ACP1+2!, ACP1+3*, ACP1+4, ACP1+5, ACP1+7!
SEG1	K3+2!
SER	K3+2!
SG	SIG+4, SIG+7, SIG+8!, DOSE+2*, INST+7!, PC+7!, INST1+7!, PC1+7!
SIG	SIG+3*, SIG+4, K1+1!, K2+1!
SIG(	SIG+6*, DOSE+1, DOSE+2
SIG(0	SIG+1, ORCHK+9
SIGOK	SIG+8, DOSE+3, K1+1!, K2+1!, K3+2!, ORCHK+9*
ST	K3+1!
STA	K3+2!
T	INST+1, INST+2, INST+4, INST+5, INST+7!, PC+1, PC+2, PC+4, PC+5, PC+7! , INST1+1, INST1+2, INST1+4, INST1+5, INST1+7!, PC1+1, PC1+2, PC1+4, PC1+5, PC1+7!
>> TIUDA	ACP1+6
TY	INST+7!, PC+7!, INST1+7!, PC1+7!
UPMI	K3+2!
>> VALMBCK	ORCHK+17*
>> VALMCNT	DISP+10*
>> VALMSG	ORCHK+4, ORCHK+12, DISP+10*
VERB	ACP1+7!
X	SIG+3*, QTY+6!, QTY+7!, QTY+10!
Y	QTY+6!, QTY+7!, QTY+10!, DISP+8*, DISP+9

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSOORNE6

Information

Source Information