Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Used in RPC |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: ORWDPS2

Package: Order Entry Results Reporting

Routine: ORWDPS2


Information

ORWDPS2 ; SLC/KCM/JLI - Pharmacy Calls for Windows Dialog;05/09/2007 ;10/12/17 09:35

Source Information

Source file <ORWDPS2.m>

Call Graph

Call Graph

Call Graph Total: 11

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  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

protocol O screenman SM broker B event driver Ed print P extended action Ea limited protocol LP edit E server Se subscriber Su inquire I run routine RR action A

Caller Graph

Caller Graph Total: 14

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
DAY2QTY(VAL,DAY,UPD,SCH,DUR,PAT,DRG) ; return qty for days supply
; VAL: quantity
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
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
SCHREQ(VAL,OI,RTE,DRG) ; return 1 if schedule is required
; OI=orderable item, RTE=ptr route, DRG=ptr dispense drug
REQST(VAL,DFN,SCH,OI,LOC,TXT) ; return requested start time
; VAL: FirstAdmin time
DISPLST ; from OISLCT, set up list of dispense drugs
; DrugIEN^Strength^Units^Name^Split
QOGRP(VAL,QOIFN) ;
ADMIN(REC,DFN,SCH,OI,LOC,ADMIN) ; return administration time info
; REC: StartText^StartTime^Duration^FirstAdmin
GUIDE ; from OISLCT, get guidelines associated with this medication
CHKGRP(VAL,ORIFN) ;
OIMSG ; from OISLCT, get the orderable item message for this medication
ALLDOSE ; from OISLCT, set up a list of all possible doses
; LST(n)=iDrugName^Strength^NF^... (see BLDDOSE)
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
PTINSTR ; from OISLCT, set up patient instructions
CHKPI(VAL,ODIFN) ; return pre-existing patient instruct
OISLCT(LST,OI,PSTYPE,ORVP,NEEDPI,PKIACTIV) ; return for defaults for pharmacy orderable item
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
QTY2DAY(VAL,QTY,UPD,SCH,DUR,PAT,DRG) ; return days supply given quantity
; VAL: days supply

External References

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

Used in RPC

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] ADMIN+4
^OR(100 - [#100] CHKPI+3, CHKPI+4, CHKPI+5, CHKPI+6, CHKGRP+15, CHKGRP+16
^ORD(100.98 - [#100.98] CHKGRP+10, CHKGRP+11, CHKGRP+12, CHKGRP+13, CHKGRP+14, 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!

Label References

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

Naked Globals

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 CHKGRP+6~, CHKGRP+9*, CHKGRP+13*, CHKGRP+17, CHKGRP+20!, 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+20
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+20
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+20
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+20
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+14*, CHKGRP+18, CHKGRP+20!, 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+20
ODGRP CHKGRP+6~, CHKGRP+9*, CHKGRP+16*, CHKGRP+17, CHKGRP+18, CHKGRP+19, CHKGRP+20!
ODID CHKGRP+6~, CHKGRP+7*, CHKGRP+8, CHKGRP+15, CHKGRP+16, CHKGRP+20!
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+19, CHKGRP+20!
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+20
SUP MAXREF~, MAXREF+6
TEXT ALLDOSE+2~, BLDDOSE+12*, BLDDOSE+14*, BLDDOSE+15*, BLDDOSE+20
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+20, 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+16, QOGRP+14
UD ALLDOSE+2~, BLDDOSE+16*, BLDDOSE+18
UDGRP CHKGRP+6~, CHKGRP+9*, CHKGRP+10*, CHKGRP+17, CHKGRP+20!, 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+17*, CHKGRP+18*
, CHKGRP+19*, 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+20*, BLDDOSE+21

Marked Items

Name Field # of Occurrence
$T(DOSE^PSSOPKI1 OISLCT+15, OISLCT+16
$T(SL^ORWDPLM1 OIMSG+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Used in RPC |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All