ORWDPS32 ; SLC/KCM - Pharmacy Calls for GUI Dialog ;08/23/17 12:00
Source file <ORWDPS32.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| NXT() | ; -- ret next available index in data array
|
|
| DLGSLCT(LST,PSTYPE,DFN,LOCIEN) | ; return def lists for dialog
; PSTYPE: pharmacy type (U=unit dose, F=IV fluids, O=outpt) |
|
| SHORT | ; from DLGSLCT, get short list of med quick orders
; !!! change this so that it uses the ORWDXQ call!!! |
|
| SCHEDA | ; (similar to SCHED, but also rtns admin times)
|
|
| IVROUTE | ;
|
|
| ALLIVRTE(LST) | ;
|
|
| ROUTE | ; from OISLCT^ORWDPS32, get list of routes for the drug form
; ** NEED BOTH ABBREVIATION & NAME IN LIST BOX |
|
| SCHED(LOCIEN) | ;
|
|
| WARDIEN(LOCIEN) | ;
|
|
| PRIOR | ; from DLGSLCT, get list of allowed priorities
|
|
| PICKUP | ; from DLGSLCT, get prescription routing
|
|
| DEFPICK() | ||
| XPICK | ||
| SCLIST | ; from DLGSLCT, get options for service connected
|
|
| OISLCT(LST,OI,PSTYPE,ORVP) | ; rtn for defaults for pharm OI
|
|
| DISPDRUG(LST,OI) | ; list dispense drugs for an OI
|
|
| DISPDRG | ; from OISLCT, get disp drugs for this pharm OI
|
|
| INSTRCT | ; from OISLCT, get list of potential instructs (based on drug form)
|
|
| MIXED(X) | ||
| MESSAGE | ; message
|
|
| ALLROUTE(LST) | ; returns a list of all available med routes
|
|
| VALROUTE(REC,X) | ||
| AUTH(VAL,PRV,ORDLOG) | ; For inpatient meds, check restrictions
|
|
| AUTHNVA(VAL,PRV) | ; For Non-VA meds, check restrictions
|
|
| UPPER(X) | ||
| TRIM(X) | ; trim leading and trailing spaces
|
| RPC Name | Call Tags |
|---|---|
| ORWDPS32 DLGSLCT | DLGSLCT |
| ORWDPS32 OISLCT | OISLCT |
| ORWDPS32 ALLROUTE | ALLROUTE |
| ORWDPS32 AUTH | AUTH |
| ORWDPS32 VALROUTE | VALROUTE |
| ORWDPS32 AUTHNVA | AUTHNVA |
| ORWDPS32 ALLIVRTE | ALLIVRTE |
