PSSDSUTA ;BIR/RTR-Dosing Utility Routine ;11/24/14
Source file <PSSDSUTA.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| FCY() | ;Validate Frequency, leading and trailing spaces already stripped off, and uppercase conversion done
|
|
| MAXD(PSSDADO,PSSDADB,PSSDADNM,PSSDADI,PSSDBCAR) | ; -- in 2.1 Perform Max Daily Dose check when Frequency is Out of Range - called from PSSHRQ24
|
|
| MAXDQ | ; -- set frequency flag=0 if unable to complete max daily dose check
|
|
| CALCDDA(PSSDADF,PSSDADD) | ; -- in 2.1 calculate daily dose amount by converting FDB frequency patterns into numeric daily dose amount
|
|
| CALCDDAT(PSSDADTM,PSSDADN,PSSDADD) | ; -- in 2.1 calculate daily dose amount based on time per day, week or month
|
|
| GETUNIT(PSSDADE,PSSDADU) | ; -- in 2.1 FDB not sending Dose Unit in Standard format try and derive
|
|
| CONVMDDA(PSSDADU,PSSFDBU,PSSDADC1) | ; -- in 2.1 Convert FDB Max Daily Dose or Dose Form Amount using Dose Unit Conversion file (#51.25)
|
|
| MAXDMSG(PSSDADO,PSSDADB,PSSDADNM,PSSDADI,PSSDADH,PSSDADU,PSSDADC1,PSSDADFF,PSSDBCAR) | ; -- in 2.1 build customized max daily dose message
|
|
| FMTNUM(X,PSSGDIF) | ; -- in 2.1 format number for display
|
|
| ERRMSG(PSSDADO,PSSDADB,PSSERRT) | ; -- in 2.1 update max daily dose error message if BSA or weight missing
|
|
| CHKCFREQ(PSSDADO,PSSDBASE,PSSDBASG,PSSDBCAR) | ; -- in 2.1 check for custom frequency -- called from PSSDSAPA
|
