PSSHRQ25 ;BIR/RTR - Create General Dosing Guidelines ; Apr 25, 2017@16:00
Source file <PSSHRQ25.m>
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| 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
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^PS(51.24 - [#51.24] | CNV+3, CNV+8, LKUN+2, LKUN+3, LKUN+4, SUNIT+2, SUNIT+5 |
| ^PS(51.25 - [#51.25] | FNCV+3, FNCV+4, FNCV+6, FNCV+7 |
| ^TMP($J | BUILDMSG+11, BUILDMSG+12, CONRT+2 |
| Name | Line Occurrences |
|---|---|
| $$CASE | CNV+16, SUNIT+2, SUNIT+5, PRS+2, FDUNIT+3 |
| $$CONRT | BUILDMSG+26, BUILDMSG+39 |
| $$FNCV | CNV+24 |
| $$LKUN | CNV+17, CNV+20 |
| @( | CNV+9 |
| CNV | BUILDMSG+16, BUILDMSG+30 |
| DFT1 | CNV+4 |
| FDSET | FDUNIT+5, FDUNIT+6, FDUNIT+8 |
| FDUNIT | CNV+7, DFT1+3 |
| INTRO | BUILDMSG+16, BUILDMSG+30 |
| PRS | CNV+20 |
| SUNIT | CNV+3, CNV+17, CNV+20 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> BASE | BUILDMSG+11, BUILDMSG+12, CONRT+2 |
| COUNT | BUILDMSG~, BUILDMSG+11, BUILDMSG+12, CONRT+2, INTRO+2, CNV+6, CONDU+2, DFT1+2, DFT3+2 |
| HASH | BUILDMSG~ |
| HASH( | BUILDMSG+11, BUILDMSG+12, CONRT+2, INTRO+2, CNV+6, CONDU+2, DFT1+2, DFT3+2 |
| PSSGX1 | BUILDMSG+10~, BUILDMSG+16*, BUILDMSG+18*, BUILDMSG+20, BUILDMSG+21, BUILDMSG+25, BUILDMSG+30*, BUILDMSG+32*, BUILDMSG+34, BUILDMSG+35 , BUILDMSG+41 |
| PSSGX2 | BUILDMSG+10~, BUILDMSG+17*, BUILDMSG+19*, BUILDMSG+21, BUILDMSG+22, BUILDMSG+25, BUILDMSG+31*, BUILDMSG+33*, BUILDMSG+35, BUILDMSG+36 , BUILDMSG+41 |
| PSSGX3 | BUILDMSG+10~, BUILDMSG+23*, BUILDMSG+24*, BUILDMSG+25, BUILDMSG+26*, BUILDMSG+27, BUILDMSG+37*, BUILDMSG+38*, BUILDMSG+39*, BUILDMSG+40 , BUILDMSG+41 |
| PSSGX4 | BUILDMSG+10~, BUILDMSG+26*, BUILDMSG+27, BUILDMSG+39*, BUILDMSG+40 |
| PSSGX8 | BUILDMSG+10~, BUILDMSG+23*, BUILDMSG+24*, BUILDMSG+27, BUILDMSG+37*, BUILDMSG+38*, BUILDMSG+40 |
| PSSGX9 | CONRT+1~, CONRT+2*, CONRT+3, CONRT+5, CONRT+6, CONRT+7, CONRT+8, CONRT+9, CONRT+10, CONRT+11 , CONRT+12 |
| PSSGXDFT | BUILDMSG+10~, BUILDMSG+11*, BUILDMSG+15 |
| PSSGXDU | BUILDMSG+10~, BUILDMSG+12*, CNV+3, CNV+10 |
| PSSGXMSG | BUILDMSG+10~, BUILDMSG+15, BUILDMSG+20*, BUILDMSG+21*, BUILDMSG+22*, BUILDMSG+25*, BUILDMSG+27*, BUILDMSG+34*, BUILDMSG+35*, BUILDMSG+36* , BUILDMSG+40*, BUILDMSG+41*, BUILDMSG+42, INTRO+1*, INTRO+2*, INTRO+3* |
| PSSHX2 | FNCV+1~, FNCV+3*, FNCV+4, FNCV+6, FNCV+7 |
| PSSHX3 | FNCV+1~, FNCV+2*, FNCV+4*, FNCV+5, FNCV+6 |
| PSSHX4 | CNV+1~ |
| PSSHX4( | CNV+34, CNV+40, FNCV+8* |
| PSSHX5 | CNV+1~, CNV+6*, CNV+7, DFT1+2*, DFT1+3 |
| PSSHX6 | CNV+1~, CNV+23*, CNV+24 |
| PSSHX8 | CNV+1~, CNV+17*, CNV+20* |
| PSSHX9 | CNV+1~, CNV+15*, CNV+16*, CNV+17, CNV+18, CNV+19*, CNV+20 |
| PSSHXA | BUILDMSG+10~ |
| PSSHXA( | CNV+6*, CNV+15, CNV+31*, CNV+34*, CNV+35*, CNV+37*, CNV+40*, CNV+41*, PRS+2, PRS+6 , CONDU+2*, DFT1+2*, DFT3+2* |
| PSSHXA("doseFormHigh" | BUILDMSG+31 |
| PSSHXA("doseFormHighUnit" | BUILDMSG+36 |
| PSSHXA("doseFormLow" | BUILDMSG+30 |
| PSSHXA("doseFormLowUnit" | BUILDMSG+34 |
| PSSHXA("doseHigh" | BUILDMSG+17 |
| PSSHXA("doseHighUnit" | BUILDMSG+22 |
| PSSHXA("doseLow" | BUILDMSG+16 |
| PSSHXA("doseLowUnit" | BUILDMSG+20 |
| PSSHXA("drugName" | INTRO+1 |
| PSSHXA("maxDailyDose" | BUILDMSG+23 |
| PSSHXA("maxDailyDoseForm" | BUILDMSG+37 |
| PSSHXA("maxDailyDoseFormUnit" | BUILDMSG+38, BUILDMSG+40 |
| PSSHXA("maxDailyDoseUnit" | BUILDMSG+24, BUILDMSG+27 |
| PSSHXCV1 | FNCV+1~, FNCV+6*, FNCV+7 |
| PSSHXCV2 | FNCV+1~, FNCV+7*, FNCV+8 |
| PSSHXFL | CNV+1~, CNV+2*, CNV+8*, CNV+10, CNV+13, CNV+18*, CNV+19*, CNV+21*, CNV+22, CNV+25* , CNV+26, FDSET+1* |
| PSSHXFND | CNV+1~, CNV+23*, CNV+24*, CNV+25 |
| PSSHXIEN | CNV+1~, CNV+2*, CNV+3*, CNV+7, CNV+8, CNV+10, DFT1+3 |
| PSSHXL | CNV+1~, CNV+5*, CNV+6, CNV+13*, CNV+15, CNV+30*, CNV+31, CNV+32, CNV+33, CNV+34 , CNV+36*, CNV+37, CNV+38, CNV+39, CNV+40, PRS+2, PRS+6, FNCV+8, FDUNIT+4, FDUNIT+7 , FDSET+1, CONDU+1*, CONDU+2, DFT1+1*, DFT1+2, DFT3+1*, DFT3+2 |
| PSSHXMCH | CNV+1~ |
| PSSHXMCH("MATCH" | FDUNIT+4*, FDUNIT+7* |
| PSSHXMCH("MISMATCH" | CNV+13, CNV+32, CNV+38, FDSET+1* |
| PSSHXNM | CNV+1~, CNV+8*, CNV+31, CNV+37 |
| PSSHXNM( | CNV+31, CNV+37, PRS+6* |
| PSSHXNUL | CNV+1~, CNV+2*, CNV+6*, CNV+10, CONDU+2*, DFT1+2*, DFT3+2* |
| PSSHXOLD | CNV+1~, CNV+33*, CNV+34, CNV+35, CNV+39*, CNV+40, CNV+41 |
| PSSHXQ | FNCV+1~, FNCV+2*, FNCV+4, FNCV+8*, FNCV+9 |
| PSSHXTYP | CNV~, CNV+4, CNV+5, CNV+9, CNV+29 |
| PSSKQ1 | FDUNIT~, FDUNIT+3 |
| PSSKQ2 | FDUNIT+2~, FDUNIT+3*, FDUNIT+4, FDUNIT+5, FDUNIT+6*, FDUNIT+7 |
| PSSLNUNI | LKUN+1~, LKUN+2*, LKUN+3*, LKUN+4* |
| PSSLUNFN | FNCV~, FNCV+3 |
| PSSLUNV | LKUN~, LKUN+2, LKUN+3, LKUN+4 |
| PSSLWR | CASE~, CASE+1 |
| PSSPER1 | PRS+1~, PRS+2*, PRS+3, PRS+4, PRS+6 |
| PSSPER2 | PRS+1~, PRS+4*, PRS+5*, PRS+6 |
| PSSUNARA | CNV+1~, CNV+3 |
| PSSUNARA( | FNCV+5, FDUNIT+4, FDUNIT+7 |
| PSSUNARF | CNV+1~, CNV+14!, CNV+17, CNV+20 |
| PSSUNARF( | CNV+23 |
| PSSUNARG | SUNIT~ |
| PSSUNARG( | SUNIT+3*, SUNIT+4*, SUNIT+5* |
| PSSUNARL | SUNIT+1~, SUNIT+5* |
| PSSUNARN | SUNIT+1~, SUNIT+2*, SUNIT+3, SUNIT+4 |
| PSSUNARR | SUNIT~, SUNIT+2, SUNIT+5 |
| U | BUILDMSG+11, BUILDMSG+12, CONRT+2 |