ORWDPS2 ; SLC/KCM/JLI - Pharmacy Calls for Windows Dialog ;Feb 24, 2022@08:28:30
Source file <ORWDPS2.m>
| 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,TITR) | ; return the maximum number of refills
; PAT=Patient DFN, DRG=ptr50, SUP=days supply, OI=orderable item, TITR=Titration Flag (1/0) ; 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) | ;
|
|
| INDICAT | ; from OISLCT return Indication for Use of Prescription or Medication Order
|
|
| INDICAT2(LST,ORWPSOI) | ||
| INDICAT3(LST,ORIFN) | ; CPRS RPC to return Indication for use previously selected for an Order
|
| 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 |
