Routine: PSOORED3

Package	Total	Call Graph
Outpatient Pharmacy	9	(ASK,RTE,SCH)^PSOBKDED ($$DCHK,DCHK1)^PSODOSUT EN^PSOFSIG $$SCHASL^PSOORED5 VER^PSOORED7 (CON,CON1,DUPD,DUR1,FNM,JFN,M1,NOU,STR,UPD,VER)^PSOOREDX MW^PSOPRK (QTY,SCH)^PSOSIG DAYSUP^PSOUTIL
VA FileMan	3	NOW^%DTC $$GET1^DIQ ^DIR

Package	Total	Caller Graph
Outpatient Pharmacy	8	PSOERXD2 PSOORED1 PSOORED2 PSOORED4 PSOORED5 PSOORED6 PSOORED7 PSOVER1

Entry Points

Name	Comments	DBIA/ICR reference
DOSE	;adds dosing info
ASK
VER
DUPD	;
NOU1
NOU
RTE
SCH
DUR
CON
MW
UDSIG
EX	;
EX1
KV
EXQ
M1
DOLST1(PSORXED)	;
DOLST
UPDSIG	;updates sig
JUMP	;jump to fields
CNON	;
DUROK(DOSE,ENT)	; Duration OK? (Complex Doses only)

External References

Name	Field # of Occurrence
NOW^%DTC	UDSIG+3
$$GET1^DIQ	DUROK+9
^DIR	DUPD+4, DUR+5, JUMP+5
ASK^PSOBKDED	ASK
RTE^PSOBKDED	RTE+1
SCH^PSOBKDED	SCH
$$DCHK^PSODOSUT	CON+10
DCHK1^PSODOSUT	CON+9
EN^PSOFSIG	CON+20, EXQ
$$SCHASL^PSOORED5	SCH+2
VER^PSOORED7	CON+20
CON^PSOOREDX	CON
CON1^PSOOREDX	CON+4
DUPD^PSOOREDX	DUPD+2
DUR1^PSOOREDX	DUR+7
FNM^PSOOREDX	JUMP+2
JFN^PSOOREDX	JUMP+6
M1^PSOOREDX	M1
NOU^PSOOREDX	NOU
STR^PSOOREDX	DUPD+7
UPD^PSOOREDX	CON+4
VER^PSOOREDX	VER
MW^PSOPRK	MW+5
QTY^PSOSIG	CON+25
SCH^PSOSIG	SCH+2
DAYSUP^PSOUTIL	CON+23

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Dispense Units Per Dose is Required!!",! Line Location: DUPD+6
Function Call: WRITE	Prompt: " ("_SCHEX_")" Line Location: SCH+3
Function Call: WRITE	Prompt: !,?10,"Invalid Entry - nothing to delete!!" Line Location: CON+2
Function Call: WRITE	Prompt: !!,"Duration is required for the dosage entered prior to the THEN conjunction.",$C(7),! Line Location: CON+8
Function Call: WRITE	Prompt: !,"Field Name Must Be At Least 3 Characters in Length",! Line Location: JUMP+1
Function Call: WRITE	Prompt: !,"INVALID FIELD NAME. PLEASE TRY AGAIN!",! Line Location: JUMP+3
Function Call: WRITE	Prompt: !,AR_". "_$P(FLDNM,"^",2)_": "_$S(NM="ROU"&($G(PSORXED($P(FLDNM,"^"),AR))):$P(^PS(51.2,PSORXED($P(FLDNM,"^"),AR),0),"^"),1:$G(PSORXED($P(FLDNM,"^"),AR))) Line Location: JUMP+4
Routine Call	DIR Line Location: DUPD+4 DUR+5 JUMP+5

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^PS(51.1 - [#51.1]	GET1^DIQ

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PS(51.1 - [#51.1]	DUROK+8
^PS(51.2 - [#51.2]	JUMP+4
^PSDRUG - [#50]	DUR+2
^PSRX - [#52]	CON+18, CON+19, UDSIG+1, UDSIG+2, UDSIG+3, UDSIG+4, UDSIG+5, UDSIG+6, UDSIG+7, UDSIG+10* , UDSIG+11, UDSIG+12, UDSIG+14, UDSIG+15, UDSIG+16, UDSIG+17, UDSIG+18, DOLST, DOLST+6, DOLST+8 , DOLST+9, UPDSIG+1!, UPDSIG+2, UPDSIG+3*

Label References

Name	Line Occurrences
$$DUROK	CON+7
@(	JUMP+1, JUMP+3, JUMP+5, JUMP+6
ASK	CON+9
CNON	NOU1+1
CON	DUR+2, CON+2, CON+4
DOLST	PSOORED3+5
DUPD	ASK+4, VER+2, DUPD+6
DUR	CON+7
EX	UDSIG+19, EXQ, JUMP+7
EX1	MW+8, MW+10
EXQ	ASK+1, VER+1, DUPD+5, NOU+1, RTE+3, SCH+1, DUR+6, CON+1, CON+4, MW+1
JUMP	ASK, VER, DUPD+4, NOU, RTE+2, SCH, DUR+5, CON
KV	DOSE+3, DUR, MW+3, JUMP+5
M1	CON+20, EXQ
MW	CON+4, CON+9, CON+10
NOU1	DUPD+1
RTE	NOU1, NOU+2
SCH	SCH+2

Naked Globals

Name	Field # of Occurrence
^(	DOLST
^(0	UDSIG+1, UPDSIG+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	UDSIG+3, UDSIG+4
A	UDSIG+2, UDSIG+3, UDSIG+4*, UDSIG+5, UDSIG+6, UDSIG+8!
>> AR	JUMP+4*
>> AR1	JUMP+4*, JUMP+5
CKX	CON+4~*, CON+20!
>> COUNT	UDSIG+11*, UDSIG+12
>> D	CON+19, UDSIG+1, UPDSIG+2*
DENT	CON+14*, CON+15, CON+16!
DIR	CON+9!, KV!
DIR("A"	DUR+3, JUMP+5
DIR("B"	DUPD+3!, DUR+4!
DIR(0	DUR+3, JUMP+5
DIRUT	ASK+1, CON+4, KV!, JUMP+5
DOOR	DOSE+3!
DOSE	EX+1!, EX1!, DUROK~
DOSE("CONJUNCTION"	DUROK+5
DOSE("DD"	CNON+4
DOSE("DURATION"	DUROK+6
DOSE("LD"	DUPD+1
DOSE("SCHEDULE"	DUROK+7, DUROK+8
DOSEOR	DOSE+3!, EX+1!, EX1!
>> DRET	RTE*
DTOUT	VER+1, DUPD+5, NOU+1, RTE+3, SCH+1, SCH+2, DUR+6, CON+1, CON+4, MW+6 , KV!
DUOUT	VER+1, DUPD+5, NOU+1, RTE+3, SCH+1, SCH+2, DUR+6, CON+1, CON+4, MW+6 , KV!
DUPD	DUPD+1!, EX+1!, EX1!
DUR	DUR+4, EX1!
DURA	EX+2!
DUZ	UDSIG+3, UDSIG+4
ENT	DOSE+3, ASK+4, VER+2, VER+3, DUPD+1, DUPD+3, NOU1, NOU1+3, NOU+2, NOU+5 , RTE, SCH+3, SCH+5, DUR+4, CON+2, CON+3, CON+7, CON+9, CON+14, MW+8 , UDSIG+14, UDSIG+15, EX+1!, CNON+2, CNON+11, CNON+12, DUROK~, DUROK+5, DUROK+6, DUROK+7 , DUROK+8
ENTS	EX1!
ERTE	EX1!
EXP	DUR!
FIELD	DOSE+3!, VER, DUPD+4, NOU, SCH, DUR+5, CON, CON+17!, JUMP+1, JUMP+3 , JUMP+5, JUMP+6
FLDNM	JUMP+3!, JUMP+4, JUMP+6
I	DOSE+1, UDSIG+2, UDSIG+6, UDSIG+8!, UDSIG+15, UDSIG+16, UDSIG+17, DOLST*, DOLST+1, DOLST+3 , DOLST+4, DOLST+5, DOLST+6
>> INST	DOLST*, DOLST+1, DOLST+2, DOLST+3, DOLST+4, DOLST+5
JUMP	ASK!, RTE+1!, RTE+2!
NM	JUMP+3!, JUMP+4
NOUN	DOSE+2!, NOU1+3, NOU+2!, NOU+3, NOU+4, EX+1!, EX1!, CNON+1, CNON+10!
OLENT	DOLST+5*, DOLST+7!
PRKMW	MW+2~, MW+7
PSOCKCON	CON+9*, CON+10!, CON+11!
PSODLBD4	CON+6~*
PSODOSE	DOSE+2!*, EX+1!, EXQ
>> PSODRUG("DEA"	MW+1
>> PSODRUG("IEN"	DUR+2, CON+23, CNON+4
>> PSOEDDOS	CON+11
PSOEXQ	MW, MW+1, MW+6, EX1!
PSONDEF	NOU1+2~, NOU+3, NOU+4
PSONLG	CNON+3~, CNON+5*, CNON+6, CNON+7, CNON+11, CNON+12
PSONLL	CNON+3~, CNON+4*, CNON+5, CNON+7, CNON+11, CNON+12
PSONLT	CNON+3~, CNON+7*, CNON+8, CNON+11
>> PSOQUIT	CON+10*
>> PSOREEDQ	MW+10
PSORTE	EX+1!
>> PSORX("DFLG"	CON+9
PSORXED	DOSE+2, CON+7, CON+11, CON+20, CON+23, CON+25, EXQ!*, DOLST1~
PSORXED(	JUMP+4
PSORXED("CONJUNCTION"	CON+2, CON+3, CON+9, CON+16!, UDSIG+16, EX+2!, DOLST+5
PSORXED("DAYS	SUPPLY" , CON+21*
PSORXED("DFLG"	CON+9, EXQ*
PSORXED("DOSE	ORDERED" , DUPD+1!, DUPD+3, NOU1, CON+15!, UDSIG+15, EX+1!, DOLST+1*, CNON+2, CNON+11
PSORXED("DOSE"	DOSE+1, DUPD+1, CON+14, CON+15!, UDSIG+15, EX+1!, DOLST+1*, DOLST+7
PSORXED("DURATION"	DUR+4, CON+16!, UDSIG+16, EX+2!, DOLST+3*
PSORXED("ENT"	DOSE+1, SCH+5, MW+8*, DOLST+7!, JUMP+4
PSORXED("IND"	DOLST+9*
PSORXED("INDF"	DOLST+9*
PSORXED("INS"	DOLST+8*
PSORXED("IRXN"	CON+18, CON+19, UDSIG+1, UDSIG+2, UDSIG+3, UDSIG+4, UDSIG+5, UDSIG+6, UDSIG+7, UDSIG+10 , UDSIG+11, UDSIG+12, UDSIG+14, UDSIG+15, UDSIG+16, UDSIG+17, UDSIG+18, DOLST, DOLST+6, DOLST+8 , DOLST+9, UPDSIG+1, UPDSIG+2, UPDSIG+3
PSORXED("MAIL/WINDOW"	MW+7*
PSORXED("NOUN"	NOU1+3, NOU+2!, NOU+5, CON+15!, UDSIG+15, EX+1!, DOLST+1, CNON+11, CNON+12*
PSORXED("ODOSE"	CON+15!, UDSIG+17, EX+2!, DOLST+6*
PSORXED("QTY"	CON+25, CON+26*, UDSIG+3
PSORXED("ROUTE"	RTE, CON+15!, UDSIG+16, EX+1!, DOLST+4*
PSORXED("RX0"	CON+21, CON+25, MW+1
PSORXED("SCHEDULE"	SCH+3, CON+16!, UDSIG+16, EX+2!, DOLST+4
PSORXED("SIG"	CON+19*
PSORXED("UNITS"	UDSIG+15, DOLST+1*
PSORXED("VERB"	ASK+4, VER+2!, VER+3, CON+15!, UDSIG+16, EX+1!, DOLST+5*
PSOSAVX	CON+6*, CON+11, CON+12!
PSOSCH	SCH+4!, EX1!
PSOSIGFL	CON+20, MW+8, EXQ!
>> PSOVER	CON+20, MW+10
QTY	CON+25!*, UDSIG+3!
QTYHLD	CON+25!*, CON+26, MW+10!
QUIT	ASK+2!, RTE+4!, CON+17*
ROU	DOSE+2!, ASK!, ASK+2!, RTE+1!, RTE+4!, EX1!
RTE	DOSE+2!, EX1!
SCH	SCH+2*, SCH+3, SCH+4!, EX+1!, EX1!
SCHEX	SCH+3, SCH+4!
SCHIEN	DUROK+4~, DUROK+8*, DUROK+9
SIG	UDSIG+8!, EX+1!
SIG(	UDSIG+1, UPDSIG+2
SIG(0	UDSIG
>> SIGOK	MW+8*
STRE	DOSE+2!, EX1!
U	VER, DUPD+4, NOU, SCH, DUR+2, DUR+5, CON, MW+1
UNITN	DOSE+2!, EX1!
UNITS	DOSE+3!
VERB	DOSE+2!, ASK+4, VER+2!, VER+3*, EX+1!, EX1!
X	DOSE+3!, VER, VER+2, VER+3, DUPD+4, DUPD+6, NOU, NOU+2, NOU+3, NOU+4 , NOU+5, SCH, SCH+4!, DUR+5, CON, CON+2, CON+3, CON+4, CON+6, EX+2! , EX1!, JUMP+1, JUMP+3!
Y	DOSE+3!, SCH+2, SCH+4!, CON+3, CON+4, EX+2!, EX1!

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSOORED3

Information

Source Information

Call Graph

Call Graph Total: 12

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 8

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: