PSSHRQ25 ;BIR/RTR-Create General Dosing Guidelines ;04/25/17
Source file <PSSHRQ25.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
BUILDMSG(COUNT,HASH) | ; Build General Dosing Guidelines
|
|
CASE(PSSLWR) | ;Translate to uppercase
|
|
CONRT() | ;Look for continuous route
|
|
INTRO | ;Start message
|
|
CNV(PSSHXTYP) | ;Reset display array and convert Dose Units if necessary
|
|
LKUN(PSSLUNV) | ;Look for Unit
|
|
SUNIT(PSSUNARG,PSSUNARR) | ;Set Unit arrays
|
|
PRS | ;Look for any verbage to add to Name using 'per' as the key
|
|
FNCV(PSSLUNFN) | ;Find conversion value
|
|
FDUNIT(PSSKQ1) | ;Determine match from Order Unit to FDB units
|
|
FDSET | ;
|
|
CONDU | ;Convert last three Non-Dose Form values, no conversion of data
|
|
DFT1 | ;Initialize variables for Dose Form Type
|
|
DFT3 | ;Convert last three Dose Form values, no conversion of data
|