PSSHRQ25 ;BIR/RTR - Create General Dosing Guidelines ; Apr 25, 2017@16:00
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
 |