Routine: PSOORED4

Package	Total	Call Graph
Outpatient Pharmacy	10	(ASK,RTE,SCH)^PSOBKDED DCHK1^PSODOSUT EN^PSOFSIG SIGS^PSOHCPRS SIG^PSOHELP ($$DUROK,CNON)^PSOORED3 $$SCHASL^PSOORED5 (CON,CON1,DUPD,DUR1,FNM,JFN,MP1,NOU,STR,UPD,VER)^PSOOREDX 2^PSOORNW1 (QTY,SCH)^PSOSIG
VA FileMan	3	^DIC MIX^DIC1 ^DIR
List Manager	1	FULL^VALM1

Package	Total	Caller Graph
Outpatient Pharmacy	2	PSOORNE6 PSOORNEW

Entry Points

Name	Comments	DBIA/ICR reference
DOSE(PSORXED)	;
ASK
VER
DUPD	;
NOU1
NOU
RTE
SCH
DUR
CON
EX	;
KV
EXQ	;
MP1
VERI	;checks for changes to dosing instructions
JUMP	;jump to fields
HLP	;help text for med route
SCHLP	;
A	;display 51.1 entries only
B
M
X
DICW	;

External References

Name	Field # of Occurrence
^DIC	HLP+2, M
MIX^DIC1	B
^DIR	DUPD+4, DUR+5, JUMP+5, SCHLP+4, B+3
ASK^PSOBKDED	ASK+6
RTE^PSOBKDED	RTE
SCH^PSOBKDED	SCH
DCHK1^PSODOSUT	CON+10, CON+11
EN^PSOFSIG	CON+16, CON+18, EXQ+1
SIGS^PSOHCPRS	ASK+2
SIG^PSOHELP	CON+15
$$DUROK^PSOORED3	CON+8
CNON^PSOORED3	NOU1+1
$$SCHASL^PSOORED5	SCH+2
CON^PSOOREDX	CON
CON1^PSOOREDX	CON+4
DUPD^PSOOREDX	DUPD+2
DUR1^PSOOREDX	DUR+7
FNM^PSOOREDX	JUMP+2
JFN^PSOOREDX	JUMP+6
MP1^PSOOREDX	MP1
NOU^PSOOREDX	NOU
STR^PSOOREDX	DUPD+7
UPD^PSOOREDX	CON+4
VER^PSOOREDX	VER
2^PSOORNW1	DOSE+1
QTY^PSOSIG	CON+21
SCH^PSOSIG	SCH+2
FULL^VALM1	HLP+1, SCHLP+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Possible SIG: " Line Location: ASK+0
Function Call: WRITE	Prompt: !?14 Condition for execution: $X+$L($P(MIG," ",SG)_" ")>IOM Line Location: ASK+4
Function Call: WRITE	Prompt: $P(MIG," ",SG)_" " Line Location: ASK+4
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+9
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
Function Call: WRITE	Prompt: !,"Please enter how patient will use the medication!" Line Location: HLP+1
Function Call: WRITE	Prompt: !,"You can choose an entry from the Administration Schedule File (#51.1),",!,"Medication Instruction File (#51) or enter free text." Line Location: SCHLP+1
Function Call: WRITE	Prompt: !,"The free text entry cannot contain more than 2 spaces or be greater than 20",!,"characters in length." Line Location: SCHLP+2
Function Call: WRITE	Prompt: ! Line Location: SCHLP+3
Function Call: WRITE	Prompt: ! Line Location: B+0
Function Call: WRITE	Prompt: " ",$P(^(0),"^",Z+2) Line Location: DICW+2
Routine Call	DIC Line Location: HLP+2 M
Routine Call	DIR Line Location: DUPD+4 DUR+5 JUMP+5 SCHLP+4 B+3

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^PS(51.1 - [#51.1]	DICW+1
^PS(51.2 - [#51.2]	JUMP+4
^PS(52.41 - [#52.41]	ASK+2
^PSDRUG - [#50]	DUR+2

Label References

Name	Line Occurrences
@(	JUMP+1, JUMP+3, JUMP+5, JUMP+6, SCHLP+5
ASK	CON+10
CON	DUR+2, CON+2, CON+4
DUPD	ASK+9, VER+2, DUPD+6
DUR	CON+8
EX	CON+10, CON+11, EXQ+3, JUMP+7
EXQ	ASK+7, VER+1, DUPD+5, NOU+1, RTE+2, SCH+1, DUR+6, CON+1, CON+4
JUMP	ASK+6, VER, DUPD+4, NOU, RTE+1, SCH, DUR+5, CON
KV	DOSE+3, DUR, JUMP+5
MP1	CON+16, EXQ+1
NOU1	DUPD+1
RTE	NOU1, NOU+2
SCH	SCH+2
VERI	CON+16
X	SCHLP+4, B+1, B+3

Naked Globals

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

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
AR	EX+1!, JUMP+4*
>> AR1	JUMP+4*, JUMP+5
CKX	CON+4~*, CON+16!
>> D	B*
DIC	HLP+2!, B!, B+1!, M!*
DIC("S"	HLP+2*
DIC("W"	B*
DIC(0	HLP+2, B, M*
DIR	CON+10!, KV!, B+2!, B+3!
DIR("?"	X*
DIR("A"	DUR+3, JUMP+5, SCHLP+4, B+2, X*
DIR("B"	DUPD+3!, DUR+4!, SCHLP+3, B+2, X+1*!
DIR(0	DUR+3, JUMP+5, SCHLP+3, B+2, X*
DIRUT	ASK+7, CON+4, KV!, JUMP+5, SCHLP+4
>> DOSE("LD"	DUPD+1
DOSEOR	DOSE+3!, EX+1!
DTOUT	VER+1, DUPD+5, NOU+1, RTE+2, SCH+1, SCH+2, DUR+6, CON+1, CON+11, KV! , B+1, B+2!, B+3, M!
DUOUT	VER+1, DUPD+5, NOU+1, RTE+2, SCH+1, SCH+2, DUR+6, CON+1, CON+11, KV! , B+2!, M!
DUPD	DOSE+3!, DUPD+1!, EX+1!
DUR	EX+1!
DURATION	VERI+7*, VERI+8, VERI+12!
ENT	DOSE+3, ASK+6, ASK+9, VER+2, VER+3, DUPD+1, DUPD+3, NOU1, NOU1+3, NOU+2 , NOU+5, SCH+3, SCH+5, DUR+4, CON+2, CON+3, CON+4, CON+8, CON+10, CON+20 , EX+1!, X+1
ENTS	EX+1!, VERI+1, VERI+2, VERI+3
ERTE	EX+1!
EXP	DUR!
FIELD	DOSE+3!, VER, DUPD+4, NOU, SCH, DUR+5, CON, EX+1!, JUMP+1, JUMP+3 , JUMP+5, JUMP+6
FLDNM	EX+1!, JUMP+3!, JUMP+4, JUMP+6
>> I	VERI+2, VERI+4, VERI+5, VERI+6, VERI+7, VERI+8, VERI+9, VERI+10, VERI+11
II	ASK+6*!
>> INS1	CON+15
INST	ASK+3*, ASK+5!
IOM	ASK+4
JUMP	ASK+6!, RTE!, RTE+1!
LBL	SCHLP+5*, B+1!, M!
MIG	ASK+3*, ASK+4, ASK+5!
>> NCPDPFLG	CON+20*
NM	EX+1!, JUMP+3!, JUMP+4
NOUN	NOU1+3, NOU+2!, NOU+3, NOU+4, EX+1!
OLENT	DOSE+3*, EX+1!, VERI+3, VERI+4
>> OR0	CON+18, CON+24
>> ORD	ASK, ASK+2
>> PSJPP	DICW+2
>> PSJW	DICW+2
PSOBDR	CON+19!, EX+1!, EXQ+2!
PSOBDRG	CON+19!, EX+1!, EXQ+2!
PSOCKCON	CON+10*, CON+11!, CON+12!
PSODLBD4	CON+6~*
PSODOSE	DOSE+2!*, CON+18, EX+1!, EXQ+1
PSODOSE("CONJUNCTION"	VERI+9
PSODOSE("DOSE"	VERI+5
PSODOSE("DURATION"	VERI+6, VERI+7
PSODOSE("ROUTE"	VERI+10
PSODOSE("SCHEDULE"	VERI+11
PSODRUG	CON+19!, EXQ+2
PSODRUG("IEN"	DOSE+1, DUR+2
PSOEDDOS	CON+12!
PSONDEF	NOU1+2~, NOU+3, NOU+4
>> PSONEW("DFLG"	CON+10, CON+11*
>> PSORX("DFLG"	CON+11*
PSORXED	DOSE~, DOSE+2, CON+8, CON+12, CON+16, CON+18!, CON+21, EXQ+1!
PSORXED(	JUMP+4
PSORXED("CONJUNCTION"	CON+2, CON+3*, CON+4, CON+10, VERI+9
PSORXED("DOSE	ORDERED" , DUPD+1!, DUPD+3, NOU1
PSORXED("DOSE"	DUPD+1, VERI+2, VERI+5
PSORXED("DURATION"	DUR+4, VERI+8
PSORXED("ENT"	DOSE+3, SCH+5, CON+20, JUMP+4
PSORXED("INS"	CON+15
PSORXED("NOUN"	NOU1+3, NOU+2!, NOU+5
PSORXED("QTY"	CON+21, CON+22, CON+24
PSORXED("ROUTE"	VERI+10
PSORXED("SCHEDULE"	SCH+3*, VERI+11, X+1
PSORXED("SIG"	CON+15*
PSORXED("VERB"	ASK+9, VER+2!, VER+3
PSOSAVX	CON+6*, CON+12, CON+13!
PSOSCH	SCH+4!, EX+1!, X+1
PSOSIGFL	CON+16, CON+17, CON+18!, EXQ+1!, VERI+3, VERI+5, VERI+8, VERI+9, VERI+10, VERI+11
>> QTY	CON+21*
QTYHLD	CON+21!*, CON+22, CON+23!
ROU	DOSE+2!, ASK+6!, RTE!, EX+1!
RTE	EX+1!
SCH	SCH+2*, SCH+3, SCH+4!, EX+1!
SCHEX	SCH+3, SCH+4!
SG	ASK+4*, ASK+5!
>> SIG(	ASK+3
>> SIG(""	ASK+2
>> SIGOK	CON+20*
STRE	DOSE+2!, EX+1!
U	VER, DUPD+4, NOU, SCH, DUR+2, DUR+5, CON, DICW+4
UNITN	DOSE+2!, EX+1!
UNITS	DOSE+3!
>> VALMSG	DOSE+1, CON+18, CON+20*
VERB	ASK+9, VER+2!, VER+3*, EX+1!
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, CON+15* , EX+1!, JUMP+1, JUMP+3!, HLP+2!, SCHLP+4!, B!, B+1!, B+3!, M!*
Y	DOSE+3!, SCH+2, SCH+4!, CON+3, CON+4, EX+1!, HLP+2!, SCHLP+4!, SCHLP+5, B! , B+2, B+3!, M!, DICW+1, DICW+4
>> Z	DICW+1*, DICW+2

Customize PDF page

Package: Outpatient Pharmacy

Routine: PSOORED4

Information

Source Information

Call Graph

Call Graph Total: 14

Caller Graph

Legends:

Package Component Superscript legend

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: