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 |