Routine: ORWDPS2

Package	Total	Call Graph
Pharmacy Data Management	4	EN^PSSDIN START^PSSJORDF DOSE^PSSOPKI1 DOSE^PSSORUTL
Order Entry Results Reporting	2	$$FIRST^ORCDPS3 SL^ORWDPLM1
Outpatient Pharmacy	2	QTYX^PSOSIG MAX^PSOSIGDS
Inpatient Medications	1	($$RESOLVE,$$SCHREQ)^PSJORPOE
Kernel	1	$$NOW^XLFDT
National Drug File	1	$$CPTIER^PSNAPIS

Package	Total	Caller Graph
Order Entry Results Reporting	14	ORALWORD ORAREN ORDSGCHK ORQOREP ORWDPS2 ADMIN ORWDPS2 CHKGRP ORWDPS2 CHKPI ORWDPS2 DAY2QTY ORWDPS2 MAXREF ORWDPS2 OISLCT ORWDPS2 QOGRP ORWDPS2 QTY2DAY ORWDPS2 REQST ORWDPS2 SCHREQ

Entry Points

Name	Comments	DBIA/ICR reference
OISLCT(LST,OI,PSTYPE,ORVP,NEEDPI,PKIACTIV)	; return for defaults for pharmacy orderable item
PTINSTR	; from OISLCT, set up patient instructions
DOSAGE	; from OISLCT, set up the list of dosages ; LST(n)=iDrugName^Strength^NF^... (see BLDDOSE) ; must be called after ALLDOSE so ORWDOSES is set up
DISPLST	; from OISLCT, set up list of dispense drugs ; DrugIEN^Strength^Units^Name^Split
ALLDOSE	; from OISLCT, set up a list of all possible doses ; LST(n)=iDrugName^Strength^NF^... (see BLDDOSE)
BLDDOSE(X)	; build dose info where X is ORDOSE node ; from ALLDOSE ; X=TotalDose^Units^U/D^Noun^LocalDose^DispDrugIEN ; Y=iDrugName^Strength^NF^TDose&Units&U/D&Noun&LDose&Drug&Stren&Units^ ; DoseText^CostText^MaxRefills^DispUnits^CanSplit ; DRUG=Name^Cost^NF^DispUnit^Strength^Units^DoseForm^MaxRefills^ ; No TotalDose, use LocalDose ; TotalDose & Strength, use LocalDose+Conjunction+Strength+Units ; TotalDose, No Strength, use LocalDose+Conjunction+DispenseName
ROUTE	; from OISLCT, get list of routes for the drug form ; ** NEED BOTH ABBREVIATION & NAME IN LIST BOX
SCHED	; from OISLCT, get default schedule for this medication
GUIDE	; from OISLCT, get guidelines associated with this medication
OIMSG	; from OISLCT, get the orderable item message for this medication
ADMIN(REC,DFN,SCH,OI,LOC,ADMIN)	; return administration time info ; REC: StartText^StartTime^Duration^FirstAdmin
REQST(VAL,DFN,SCH,OI,LOC,TXT)	; return requested start time ; VAL: FirstAdmin time
DAY2QTY(VAL,DAY,UPD,SCH,DUR,PAT,DRG)	; return qty for days supply ; VAL: quantity
QTY2DAY(VAL,QTY,UPD,SCH,DUR,PAT,DRG)	; return days supply given quantity ; VAL: days supply
MAXREF(VAL,PAT,DRG,SUP,OI,OUT)	; return the maximum number of refills ; PAT=Patient DFN, DRG=ptr50, SUP=days supply, OI=orderable item ; VAL: maximum refills allowed
SCHREQ(VAL,OI,RTE,DRG)	; return 1 if schedule is required ; OI=orderable item, RTE=ptr route, DRG=ptr dispense drug
CHKPI(VAL,ODIFN)	; return pre-existing patient instruct
CHKGRP(VAL,ORIFN)	;
QOGRP(VAL,QOIFN)	;

Name	Field # of Occurrence
$$FIRST^ORCDPS3	ADMIN+4
SL^ORWDPLM1	OIMSG+2
$$RESOLVE^PSJORPOE	REQST+6
$$SCHREQ^PSJORPOE	SCHREQ+4
$$CPTIER^PSNAPIS	BLDDOSE+17
QTYX^PSOSIG	DAY2QTY+15, QTY2DAY+13
MAX^PSOSIGDS	MAXREF+9
EN^PSSDIN	OISLCT+17
START^PSSJORDF	OISLCT+14
DOSE^PSSOPKI1	OISLCT+15, OISLCT+16
DOSE^PSSORUTL	OISLCT+15
$$NOW^XLFDT	BLDDOSE+10

RPC Name	Call Tags
ORWDPS2 OISLCT	OISLCT
ORWDPS2 ADMIN	ADMIN
ORWDPS2 REQST	REQST
ORWDPS2 DAY2QTY	DAY2QTY
ORWDPS2 MAXREF	MAXREF
ORWDPS2 SCHREQ	SCHREQ
ORWDPS2 QTY2DAY	QTY2DAY
ORWDPS2 CHKPI	CHKPI
ORWDPS2 CHKGRP	CHKGRP
ORWDPS2 QOGRP	QOGRP

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	ADMIN+4
^OR(100 - [#100]	CHKPI+3, CHKPI+4, CHKPI+5, CHKPI+6, CHKGRP+14, CHKGRP+15
^ORD(100.98 - [#100.98]	CHKGRP+10, CHKGRP+11, CHKGRP+12, CHKGRP+13, QOGRP+9, QOGRP+10, QOGRP+11, QOGRP+12
^ORD(101.41 - [#101.41]	OISLCT+2, OISLCT+3, OISLCT+4, OISLCT+6, OISLCT+7, QOGRP+13, QOGRP+14
^ORD(101.43 - [#101.43]	OISLCT+13, OISLCT+19, OIMSG+1, ADMIN+2, REQST+4, MAXREF+7
^SC - [#44]	ADMIN+3, REQST+5
^TMP("OI"	OISLCT+48*
^TMP("PSJINS"	OISLCT+10!, OISLCT+44!
^TMP("PSJMR"	OISLCT+10!, OISLCT+44!, ROUTE+3, ROUTE+4
^TMP("PSJNOUN"	OISLCT+10!, OISLCT+44!
^TMP("PSJSCH"	OISLCT+10!, OISLCT+44!, SCHED+1
^TMP("PSSDIN"	OISLCT+10!, OISLCT+44!, GUIDE+2, GUIDE+3, GUIDE+4
^TMP($J	OISLCT+1, OISLCT+3, OISLCT+4, OISLCT+7, OISLCT+8!

Name	Line Occurrences
$$BLDDOSE	ALLDOSE+6, ALLDOSE+11
ALLDOSE	OISLCT+26
DISPLST	OISLCT+28
DOSAGE	OISLCT+27
GUIDE	OISLCT+31
OIMSG	OISLCT+32
PTINSTR	OISLCT+24
ROUTE	OISLCT+29
SCHED	OISLCT+30

Name	Field # of Occurrence
^(	OIMSG+1
^($J	SCHED+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
A	BLDDOSE+9~, BLDDOSE+17*, BLDDOSE+18
ABBR	ROUTE+2~, ROUTE+5*, ROUTE+6
ADMIN	ADMIN~, ADMIN+4
ADUR	DAY2QTY+2~, DAY2QTY+9, DAY2QTY+10, DAY2QTY+11, DAY2QTY+13, QTY2DAY+2~, QTY2DAY+9, QTY2DAY+11
ADURNM	DAY2QTY+2~, DAY2QTY+9*, DAY2QTY+10, DAY2QTY+11
CLMED	QOGRP+5~, QOGRP+8, QOGRP+11, QOGRP+16, QOGRP+17!
CNT	ROUTE+2~
CONJ	ALLDOSE+2~, ALLDOSE+3, ALLDOSE+4, BLDDOSE+14, BLDDOSE+15
COST	ALLDOSE+2~, BLDDOSE+16, BLDDOSE+18, BLDDOSE+19
CREATLST	OISLCT+46~, OISLCT+47*, OISLCT+48
DAY	DAY2QTY~, DAY2QTY+3
DD	DISPLST+2~, DISPLST+3, DISPLST+5, ALLDOSE+2~, BLDDOSE+11, BLDDOSE+17
DDNM	ALLDOSE+2~, BLDDOSE+11*, BLDDOSE+19
DFN	ADMIN~, ADMIN+4, REQST~, REQST+6
DRG	DAY2QTY~, DAY2QTY+5, QTY2DAY~, QTY2DAY+5, MAXREF~, MAXREF+5, SCHREQ~, SCHREQ+4
DRUG	ALLDOSE+2~, BLDDOSE+11*, BLDDOSE+12, BLDDOSE+13, BLDDOSE+14, BLDDOSE+15, BLDDOSE+16, BLDDOSE+18, BLDDOSE+19
DUR	DAY2QTY~, DAY2QTY+9, QTY2DAY~, QTY2DAY+9
EXP	ROUTE+2~, ROUTE+5*, ROUTE+6
I	PTINSTR+1~, PTINSTR+2, DOSAGE+3~, DOSAGE+4, ALLDOSE+2~, ALLDOSE+5, ALLDOSE+6, ALLDOSE+10, ALLDOSE+11, ROUTE+2~ , ROUTE+3, ROUTE+4, GUIDE+1~, GUIDE+3, GUIDE+4, OIMSG+1, DAY2QTY+2~, DAY2QTY+6, DAY2QTY+7, DAY2QTY+8 , DAY2QTY+9, DAY2QTY+12, DAY2QTY+14, QTY2DAY+2~, QTY2DAY+6, QTY2DAY+7, QTY2DAY+8, QTY2DAY+9, QTY2DAY+10, QTY2DAY+12
ID	ALLDOSE+2~, BLDDOSE+11, BLDDOSE+13, BLDDOSE+19
IDNUM	CHKPI+1~, CHKPI+2, CHKPI+4, CHKPI+5, CHKPI+6, CHKPI+7!
IDPI	CHKPI+1~, CHKPI+2, CHKPI+5, CHKPI+6, CHKPI+7!
IEN	ROUTE+2~, ROUTE+5, ROUTE+6, ROUTE+7, GUIDE+1~, GUIDE+2, GUIDE+3, GUIDE+4
ILST	OISLCT+9~, OISLCT+11, OISLCT+18, OISLCT+19, OISLCT+20, OISLCT+21, OISLCT+22, OISLCT+23, OISLCT+24, OISLCT+26* , OISLCT+27, OISLCT+28, OISLCT+29, OISLCT+30, OISLCT+31, OISLCT+32, OISLCT+33, OISLCT+35, OISLCT+39, PTINSTR+2* , DOSAGE+4, DISPLST+4, DISPLST+5, ALLDOSE+8, ALLDOSE+9, ALLDOSE+12, ALLDOSE+13, ROUTE+6, ROUTE+7, SCHED+1* , GUIDE+4, OIMSG+1
IPGRP	CHKGRP+6~, CHKGRP+9, CHKGRP+12, CHKGRP+13, CHKGRP+17, CHKGRP+19!, QOGRP+5~, QOGRP+8, QOGRP+10, QOGRP+12 , QOGRP+16, QOGRP+17!
J	ALLDOSE+2~, ALLDOSE+10*, ALLDOSE+11
LDOSE	ALLDOSE+2~, BLDDOSE+12*
LOC	ADMIN~, ADMIN+3, ADMIN+4, REQST~, REQST+5, REQST+6
LST	OISLCT~
LST(	OISLCT+18, OISLCT+19, OISLCT+20, OISLCT+21, OISLCT+22, OISLCT+23, OISLCT+24, OISLCT+26, OISLCT+27, OISLCT+28 , OISLCT+29, OISLCT+30, OISLCT+31, OISLCT+32, OISLCT+33, OISLCT+35, OISLCT+39, OISLCT+47, OISLCT+48, PTINSTR+2 , DOSAGE+4, DISPLST+5, ALLDOSE+9, ALLDOSE+13, ROUTE+6, ROUTE+7, SCHED+1, GUIDE+4, OIMSG+1*
NEEDPI	OISLCT~, OISLCT+1, OISLCT+7*, OISLCT+24
NF	ALLDOSE+2~, BLDDOSE+16*, BLDDOSE+19
ODGRP	CHKGRP+6~, CHKGRP+9, CHKGRP+15, CHKGRP+16, CHKGRP+17, CHKGRP+18, CHKGRP+19!
ODID	CHKGRP+6~, CHKGRP+7*, CHKGRP+8, CHKGRP+14, CHKGRP+15, CHKGRP+19!
ODIFN	CHKPI~, CHKPI+3, CHKPI+4, CHKPI+5, CHKPI+6
OI	OISLCT~, OISLCT+5, OISLCT+13, OISLCT+19, OIMSG+1, ADMIN~, ADMIN+2, ADMIN+4, REQST~, REQST+3 , REQST+4, REQST+6, MAXREF~, MAXREF+7, SCHREQ~, SCHREQ+3, SCHREQ+4
OPGRP	CHKGRP+6~, CHKGRP+9, CHKGRP+11, CHKGRP+18, CHKGRP+19!
ORDOSE	OISLCT+9~, OISLCT+15, OISLCT+16
ORDOSE(	ALLDOSE+5, ALLDOSE+6, ALLDOSE+10, ALLDOSE+11
ORDOSE("DD"	DISPLST+3, DISPLST+5, BLDDOSE+11
ORDOSE("DEA"	OISLCT+36
ORDOSE("MISC"	OISLCT+21, OISLCT+23, ALLDOSE+3
ORDOSE("PI"	PTINSTR+2
ORIFN	CHKGRP~, CHKGRP+5, CHKGRP+7
ORNOW	BLDDOSE+9~, BLDDOSE+10*, BLDDOSE+17
ORQOI	OISLCT+3~*, OISLCT+4
ORQOIEN	OISLCT+2~*, OISLCT+3
ORQOOI	OISLCT+4~*, OISLCT+5
ORQOPIDA	OISLCT+6~*, OISLCT+7
ORVP	OISLCT~, OISLCT+15, OISLCT+16
ORWDOSES	OISLCT+9~, ALLDOSE+3, ALLDOSE+7
ORWDOSES(	DOSAGE+4, ALLDOSE+7*
ORWPSOI	OISLCT+9~, OISLCT+12, OISLCT+13, OISLCT+14, OISLCT+15, OISLCT+16, OISLCT+17, GUIDE+2, GUIDE+3, GUIDE+4
ORWX	DAY2QTY+2~, DAY2QTY+15, QTY2DAY+2~, QTY2DAY+13, MAXREF+3~, MAXREF+9
ORWX("CONJUNCTION"	DAY2QTY+14, QTY2DAY+12
ORWX("DAYS SU	PPLY" , DAY2QTY+3, QTY2DAY+14, MAXREF+6
ORWX("DISCHARGE"	MAXREF+8*
ORWX("DOSE OR	DERED" , DAY2QTY+7, QTY2DAY+7
ORWX("DRUG"	DAY2QTY+5, QTY2DAY+5, MAXREF+5*
ORWX("DURATION"	DAY2QTY+12, QTY2DAY+10
ORWX("ITEM"	MAXREF+7*
ORWX("MAX"	MAXREF+10
ORWX("PATIENT"	DAY2QTY+4, QTY2DAY+4, MAXREF+4*
ORWX("QTY"	DAY2QTY+16, QTY2DAY+3*
ORWX("SCHEDULE"	DAY2QTY+8, QTY2DAY+8
OUT	MAXREF~, MAXREF+8
PAT	DAY2QTY~, DAY2QTY+4, QTY2DAY~, QTY2DAY+4, MAXREF~, MAXREF+4
PKIACTIV	OISLCT~, OISLCT+38
PSTYPE	OISLCT~, OISLCT+14, OISLCT+15, OISLCT+16, OISLCT+40, OISLCT+42
QOGRP	QOGRP+5~, QOGRP+8, QOGRP+14, QOGRP+15, QOGRP+16, QOGRP+17!
QOID	QOGRP+5~, QOGRP+6*, QOGRP+7, QOGRP+13, QOGRP+14, QOGRP+17!
QOIFN	QOGRP~, QOGRP+4, QOGRP+6
QTY	QTY2DAY~, QTY2DAY+3
REC	ADMIN~, ADMIN+3, ADMIN+4
ROUT	ROUTE+2~, ROUTE+5*, ROUTE+6, ROUTE+7
RTE	SCHREQ~, SCHREQ+3, SCHREQ+4
SCH	ADMIN~, ADMIN+4, REQST~, REQST+3, REQST+6, DAY2QTY~, DAY2QTY+8, QTY2DAY~, QTY2DAY+8
STREN	ALLDOSE+2~, BLDDOSE+12*, BLDDOSE+14, BLDDOSE+19
SUP	MAXREF~, MAXREF+6
TEXT	ALLDOSE+2~, BLDDOSE+12, BLDDOSE+14, BLDDOSE+15*, BLDDOSE+19
TXT	REQST~, REQST+6
U	OISLCT+13, OISLCT+19, OISLCT+21, OISLCT+23, DISPLST+5, ALLDOSE+3, ALLDOSE+9, ALLDOSE+13, BLDDOSE+11, BLDDOSE+12 , BLDDOSE+13, BLDDOSE+14, BLDDOSE+15, BLDDOSE+16, BLDDOSE+18, BLDDOSE+19, ROUTE+5, ROUTE+6, ROUTE+7, ADMIN+2 , REQST+4, REQST+6, DAY2QTY+6, DAY2QTY+7, DAY2QTY+8, DAY2QTY+9, QTY2DAY+6, QTY2DAY+7, QTY2DAY+8, QTY2DAY+9 , MAXREF+7, CHKGRP+15, QOGRP+14
UD	ALLDOSE+2~, BLDDOSE+16*, BLDDOSE+18
UDGRP	CHKGRP+6~, CHKGRP+9, CHKGRP+10, CHKGRP+16, CHKGRP+19!, QOGRP+5~, QOGRP+8, QOGRP+9, QOGRP+15, QOGRP+17!
UPD	DAY2QTY~, DAY2QTY+6, DAY2QTY+7, QTY2DAY~, QTY2DAY+6, QTY2DAY+7
VAL	REQST~, REQST+2, REQST+6, DAY2QTY~, DAY2QTY+16, QTY2DAY~, QTY2DAY+14, MAXREF~, MAXREF+10, SCHREQ~ , SCHREQ+2, SCHREQ+4, CHKPI~, CHKPI+2, CHKPI+3, CHKPI+6, CHKGRP~, CHKGRP+4, CHKGRP+16, CHKGRP+17* , CHKGRP+18, QOGRP~, QOGRP+3, QOGRP+15, QOGRP+16
X	OISLCT+36, OISLCT+38, OISLCT+39, ALLDOSE+2~, ALLDOSE+6, ALLDOSE+7, ALLDOSE+9, ALLDOSE+11, ALLDOSE+13, BLDDOSE~ , BLDDOSE+11, BLDDOSE+12, BLDDOSE+14, BLDDOSE+15, BLDDOSE+16, ROUTE+2~, ROUTE+4, ROUTE+5, ROUTE+6, ROUTE+7 , DAY2QTY+2~, DAY2QTY+10, DAY2QTY+11, DAY2QTY+12, DAY2QTY+13, DAY2QTY+14, QTY2DAY+2~, QTY2DAY+9, QTY2DAY+10, QTY2DAY+11 , QTY2DAY+12
X1	OISLCT+9~, OISLCT+36*
X2	OISLCT+9~, OISLCT+36*, OISLCT+37, OISLCT+38
Y	BLDDOSE+9~, BLDDOSE+19*, BLDDOSE+20

Customize PDF page

Package: Order Entry Results Reporting

Routine: ORWDPS2

Information

Source Information

Call Graph

Call Graph Total: 11

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 14

Entry Points

External References

Used in RPC

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items