PXRMTERM ;SLC/PKR - Handle reminder terms. ;03/31/2022
Source file <PXRMTERM.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 |
|---|---|---|
| COPY(NOCC,SDIR,TFIEVAL,DATEORDR,FINDING,FIEVAL,STF) | ;Copy the NOCC date ordered
|
|
| DORDER(TFIEVAL,DATEORDR) | ;Order term findings by date, term finding,
|
|
| EVALFI(DFN,DEFARR,ENODE,FIEVAL) | ;Evaluate all reminder terms in a
|
|
| EVALTERM(DFN,FINDPA,TERMARR,TFIEVAL) | ;Evaluate all the findings in
|
|
| IEVALTER(DFN,FINDPA,TERMARR,FINDING,FIEVAL) | ;Evaluate an individual
|
|
| DEMOK | ||
| MHVOUT(INDENT,IFIEVAL,NLINES,TEXT) | ;Produce the MHV output.
|
|
| OUTPUT(INDENT,IFIEVAL,NLINES,TEXT) | ;Produce the clinical
|
|
| OPT(INDENT,IFIEVAL,NLINES,TEXT,TYPE) | ;General output.
|
|
| SPFINDPA(FINDPA,TFINDPA,PFINDPA) | ;Set the finding parameter array
|
| Name | Field # of Occurrence |
|---|---|
| EVALTERM^PXRMCF | EVALTERM+15 |
| EVALTERM^PXRMDGEN | EVALTERM+21 |
| EVALTERM^PXRMDIN | EVALTERM+17 |
| EVALTERM^PXRMDNVA | EVALTERM+18 |
| EVALTERM^PXRMDOUT | EVALTERM+20 |
| EVALTERM^PXRMDRCL | EVALTERM+16 |
| EVALTERM^PXRMDRUG | EVALTERM+19 |
| EVALTERM^PXRMEDU | EVALTERM+5 |
| EVALTERM^PXRMEXAM | EVALTERM+6 |
| $$INSCHR^PXRMEXLC | OPT+19 |
| EVALTERM^PXRMHF | EVALTERM+7 |
| EVALTERM^PXRMIMM | EVALTERM+8 |
| TERMCRFINDING^PXRMIMM | EVALFI+46 |
| EVALTERM^PXRMLAB | EVALTERM+11 |
| TERM^PXRMLDR | EVALFI+18 |
| EVALTERM^PXRMLOCF | EVALTERM+14 |
| EVALTERM^PXRMMH | EVALTERM+23 |
| EVALTERM^PXRMORDR | EVALTERM+12 |
| FOUT^PXRMOUTC | OPT+30 |
| FOUT^PXRMOUTM | OPT+31 |
| DEM^PXRMPINF | IEVALTER+5 |
| EVALTERM^PXRMRAD | EVALTERM+22 |
| EVALTERM^PXRMSKIN | EVALTERM+9 |
| EVALTERM^PXRMTAX | EVALTERM+13 |
| EVALTERM^PXRMVITL | EVALTERM+10 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^PXRMD(811.5 - [#811.5] | EVALFI+9, EVALFI+15 |
| ^TMP( | EVALFI+10* |
| ^TMP("PXRMTDEB" | EVALFI+35* |
| ^TMP($J | DEMOK+16! |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CASESEN | EVALFI+2~ |
| CFPARAM | EVALFI+28~, EVALFI+33*, EVALFI+34 |
| COND | EVALFI+28~, EVALFI+31*, EVALFI+32 |
| CONVAL | EVALFI+2~ |
| DATE | COPY+2~, COPY+6*, COPY+7*, COPY+9, COPY+19, DORDER+2~, DORDER+8*, DORDER+9, EVALFI+2~ |
| DATEORDR | COPY~, DORDER~, DORDER+3!, EVALFI+2~, EVALFI+42, EVALFI+43, IEVALTER+2~, DEMOK+8, DEMOK+9 |
| DATEORDR( | COPY+7, COPY+9, COPY+19, DORDER+9* |
| DEFARR | EVALFI~ |
| DEFARR("E" | EVALFI+6, EVALFI+12, EVALFI+17, EVALFI+20 |
| DEFARR(20 | EVALFI+25 |
| DFN | EVALFI~, EVALFI+26, EVALTERM~, EVALTERM+5, EVALTERM+6, EVALTERM+7, EVALTERM+8, EVALTERM+9, EVALTERM+10, EVALTERM+11 , EVALTERM+12, EVALTERM+13, EVALTERM+14, EVALTERM+15, EVALTERM+16, EVALTERM+17, EVALTERM+18, EVALTERM+19, EVALTERM+20, EVALTERM+21 , EVALTERM+22, EVALTERM+23, IEVALTER~, IEVALTER+5, DEMOK+1, DEMOK+16 |
| DG | OPT+1~ |
| DG( | OPT+8*, OPT+13, OPT+14*, OPT+16, OPT+17 |
| DGL | OPT+1~ |
| DGL( | OPT+15*, OPT+17*, OPT+24 |
| DGL(1 | OPT+8* |
| DGN | OPT+1~, OPT+9*, OPT+14*, OPT+15, OPT+21 |
| DT | IEVALTER+3, IEVALTER+5 |
| ENODE | EVALFI~, EVALFI+6, EVALFI+12, EVALFI+17, EVALFI+20, EVALTERM+2~, EVALTERM+3*, EVALTERM+4*, EVALTERM+5, EVALTERM+6 , EVALTERM+7, EVALTERM+8, EVALTERM+9, EVALTERM+10, EVALTERM+11, EVALTERM+12, EVALTERM+13, EVALTERM+14, EVALTERM+15, EVALTERM+16 , EVALTERM+17, EVALTERM+18, EVALTERM+19, EVALTERM+20, EVALTERM+21, EVALTERM+22, EVALTERM+23 |
| FI | DORDER+2~, DORDER+4*, DORDER+5*, DORDER+7, DORDER+8, DORDER+9 |
| FIEVAL | COPY~, EVALFI~, EVALFI+43, EVALFI+46, IEVALTER~, DEMOK+9 |
| FIEVAL( | COPY+12*, COPY+14, COPY+16*, COPY+17, COPY+23*, COPY+24*, COPY+25*, COPY+26*, COPY+28*, EVALFI+12* , EVALFI+17*, EVALFI+21*, EVALFI+22*, EVALFI+23*, EVALFI+47, EVALFI+50, EVALFI+51, EVALFI+52*, DEMOK*, DEMOK+10 , DEMOK+13, DEMOK+14, DEMOK+15*, OPT+19 |
| FIEVT | EVALFI+3~ |
| FILENUM | OPT+1~, OPT+6*, OPT+8, OPT+11*, OPT+13, OPT+14, OPT+15, OPT+16, OPT+17 |
| FIND0 | SPFINDPA+2~, SPFINDPA+3*, SPFINDPA+8, SPFINDPA+11 |
| FINDING | COPY~, COPY+12, COPY+14, COPY+16, COPY+17, COPY+23, COPY+24, COPY+25, COPY+26, COPY+28 , EVALFI+3~, EVALFI+11*, EVALFI+12*, EVALFI+16*, EVALFI+17*, EVALFI+19*, EVALFI+20*, EVALFI+21, EVALFI+22, EVALFI+23 , EVALFI+25, EVALFI+35, EVALFI+43, EVALFI+46, EVALFI+47, EVALFI+50, EVALFI+51, EVALFI+52, IEVALTER~, DEMOK , DEMOK+9, DEMOK+10, DEMOK+13, DEMOK+14, DEMOK+15, OPT+19 |
| FINDPA | EVALFI+3~, EVALFI+24!, EVALFI+25*, EVALFI+26, EVALTERM~, EVALTERM+5, EVALTERM+6, EVALTERM+7, EVALTERM+8, EVALTERM+9 , EVALTERM+10, EVALTERM+11, EVALTERM+12, EVALTERM+13, EVALTERM+14, EVALTERM+15, EVALTERM+16, EVALTERM+17, EVALTERM+18, EVALTERM+19 , EVALTERM+20, EVALTERM+21, EVALTERM+22, EVALTERM+23, IEVALTER~, DEMOK+1, SPFINDPA~ |
| FINDPA(0 | EVALFI+37, DEMOK+3, SPFINDPA+3 |
| FINDPA(10 | SPFINDPA+15 |
| FINDPA(11 | SPFINDPA+15 |
| FINDPA(15 | SPFINDPA+20 |
| FINDPA(3 | SPFINDPA+15 |
| FINDPA(5 | SPFINDPA+18 |
| IEN | OPT+1~, OPT+7*, OPT+8, OPT+12*, OPT+13, OPT+14, OPT+15, OPT+16, OPT+17 |
| IFIEVAL | MHVOUT~, MHVOUT+1, OUTPUT~, OUTPUT+2, OPT~ |
| IFIEVAL( | OPT+10, OPT+11, OPT+12, OPT+27, OPT+28, OPT+29 |
| IFIEVAL("FILE | NUMBER" , OPT+6 |
| IFIEVAL("FINDING" | OPT+7 |
| IND | COPY+2~, COPY+18*, COPY+19*, COPY+21, COPY+23, COPY+28, DORDER+2~, DORDER+6*, DORDER+7*, DORDER+8 , DORDER+9, EVALFI+3~, EVALFI+49*, EVALFI+50*, EVALFI+51, EVALFI+52, DEMOK+12*, DEMOK+13*, DEMOK+14, DEMOK+15 , OPT+1~, OPT+9*, OPT+10*, OPT+11, OPT+12, OPT+15, OPT+17, OPT+21*, OPT+24 |
| INDENT | MHVOUT~, MHVOUT+1, OUTPUT~, OUTPUT+2, OPT~, OPT+18, OPT+19 |
| INDENTT | OPT+1~, OPT+18*, OPT+30, OPT+31 |
| JND | COPY+2~, COPY+15*, COPY+16*, COPY+27*, COPY+28*, OPT+1~, OPT+23*, OPT+24*, OPT+27, OPT+28 , OPT+29 |
| KND | OPT+1~, OPT+23*, OPT+27*, OPT+28, OPT+29 |
| MRS | COPY+2~, COPY+4*, COPY+10, COPY+13* |
| NFOUND | COPY+2~, COPY+5*, COPY+7, COPY+9, COPY+19, COPY+22*, COPY+23, COPY+24, COPY+25, COPY+26 , COPY+28 |
| NLINES | MHVOUT~, MHVOUT+1, OUTPUT~, OUTPUT+2, OPT~, OPT+20*, OPT+30, OPT+31 |
| NOCC | COPY~, COPY+7, COPY+9, COPY+19, EVALFI+3~, EVALFI+37*, EVALFI+38*, EVALFI+39, EVALFI+40*, EVALFI+43 , IEVALTER+2~, DEMOK+3*, DEMOK+4*, DEMOK+5, DEMOK+6*, DEMOK+9 |
| PFIND0 | SPFINDPA+2~, SPFINDPA+4*, SPFINDPA+9*, SPFINDPA+11*, SPFINDPA+12*, SPFINDPA+13 |
| PFINDPA | SPFINDPA~ |
| PFINDPA(0 | SPFINDPA+13* |
| PFINDPA(10 | SPFINDPA+14*, SPFINDPA+15* |
| PFINDPA(11 | SPFINDPA+14*, SPFINDPA+15* |
| PFINDPA(15 | SPFINDPA+19*, SPFINDPA+20* |
| PFINDPA(3 | SPFINDPA+14*, SPFINDPA+15* |
| PFINDPA(5 | SPFINDPA+17*, SPFINDPA+18* |
| PIECE | SPFINDPA+2~, SPFINDPA+6*, SPFINDPA+7, SPFINDPA+8, SPFINDPA+9, SPFINDPA+11*, SPFINDPA+12* |
| PXRMAGE | IEVALTER+7~, IEVALTER+8* |
| PXRMDATE | IEVALTER+3~* |
| >> PXRMDEBG | EVALFI+48, DEMOK+11 |
| PXRMDOB | IEVALTER+7~, IEVALTER+8* |
| PXRMDOD | IEVALTER+7~, IEVALTER+8* |
| >> PXRMITEM | EVALFI+10 |
| PXRMLAD | IEVALTER+7~, IEVALTER+9* |
| PXRMPDEM | IEVALTER+4, IEVALTER+5~ |
| PXRMPDEM("AGE" | IEVALTER+8 |
| PXRMPDEM("DOB" | IEVALTER+8 |
| PXRMPDEM("DOD" | IEVALTER+8 |
| PXRMPDEM("LAD" | IEVALTER+9 |
| PXRMPDEM("SEX" | IEVALTER+9 |
| PXRMPDEM("SIG" | IEVALTER+9 |
| >> PXRMPID | EVALFI+10 |
| PXRMSEX | IEVALTER+7~, IEVALTER+9* |
| PXRMSIG | IEVALTER+7~, IEVALTER+9* |
| >> PXRMTDEB | EVALFI+27 |
| SDIR | COPY~, COPY+7, EVALFI+4~, EVALFI+39*, EVALFI+43, IEVALTER+2~, DEMOK+5*, DEMOK+9 |
| STF | COPY~, COPY+26 |
| TEMP | OPT+1~, OPT+17*, OPT+19*, OPT+20 |
| TERMARR | EVALFI+4~, EVALFI+18, EVALFI+26, EVALTERM~, EVALTERM+5, EVALTERM+6, EVALTERM+7, EVALTERM+8, EVALTERM+9, EVALTERM+10 , EVALTERM+11, EVALTERM+12, EVALTERM+13, EVALTERM+14, EVALTERM+15, EVALTERM+16, EVALTERM+17, EVALTERM+18, EVALTERM+19, EVALTERM+20 , EVALTERM+21, EVALTERM+22, EVALTERM+23, IEVALTER~, DEMOK+1 |
| TERMARR("E" | EVALFI+46, EVALTERM+4 |
| TERMARR(0 | EVALFI+22 |
| TERMARR(20 | EVALFI+30, EVALFI+31, EVALFI+33, EVALFI+52, DEMOK+15 |
| TERMIEN | EVALFI+4~, EVALFI+5*, EVALFI+6*, EVALFI+9, EVALFI+10, EVALFI+12, EVALFI+15, EVALFI+17, EVALFI+18, EVALFI+20 , EVALFI+23 |
| TEXT | MHVOUT~, MHVOUT+1, OUTPUT~, OUTPUT+2, OPT~, OPT+30, OPT+31 |
| TEXT( | OPT+20* |
| TFI | COPY+2~, COPY+8*, COPY+9*, COPY+12, COPY+16, COPY+19, COPY+21, COPY+23, COPY+24, COPY+25 , COPY+26, COPY+28, EVALFI+4~ |
| TFIEVAL | COPY~, DORDER~, EVALFI+4~, EVALFI+24!, EVALFI+26, EVALFI+35, EVALFI+42, EVALFI+43, EVALFI+46, EVALTERM~ , EVALTERM+5, EVALTERM+6, EVALTERM+7, EVALTERM+8, EVALTERM+9, EVALTERM+10, EVALTERM+11, EVALTERM+12, EVALTERM+13, EVALTERM+14 , EVALTERM+15, EVALTERM+16, EVALTERM+17, EVALTERM+18, EVALTERM+19, EVALTERM+20, EVALTERM+21, EVALTERM+22, EVALTERM+23, IEVALTER+2~ , DEMOK+1, DEMOK+8, DEMOK+9 |
| TFIEVAL( | COPY+12, COPY+16, COPY+21, COPY+23, COPY+24, COPY+25, COPY+28, DORDER+5, DORDER+7, DORDER+8 , EVALFI+32*, EVALFI+34* |
| TFIEVAL("C/R | STATUS" , EVALFI+46 |
| TFIND0 | SPFINDPA+2~, SPFINDPA+4*, SPFINDPA+7, SPFINDPA+11, SPFINDPA+12 |
| TFIND3 | EVALFI+4~ |
| TFIND4 | EVALFI+4~ |
| TFINDING | EVALFI+28~, EVALFI+29*, EVALFI+30*, EVALFI+31, EVALFI+32, EVALFI+33, EVALFI+34 |
| TFINDPA | SPFINDPA~ |
| TFINDPA(0 | SPFINDPA+4 |
| TFINDPA(10 | SPFINDPA+14 |
| TFINDPA(11 | SPFINDPA+14 |
| TFINDPA(15 | SPFINDPA+19 |
| TFINDPA(3 | SPFINDPA+14 |
| TFINDPA(5 | SPFINDPA+17 |
| TIFIEVAL | OPT+1~, OPT+22!, OPT+28*, OPT+30, OPT+31 |
| TIFIEVAL( | OPT+29* |
| TYPE | OPT~, OPT+30, OPT+31 |
| U | EVALFI+31, EVALFI+37, EVALFI+52, DEMOK+3, DEMOK+15, OPT+8, OPT+15, OPT+19, SPFINDPA+7, SPFINDPA+8 , SPFINDPA+9, SPFINDPA+11, SPFINDPA+12, SPFINDPA+14 |
| UCIFS | EVALFI+4~ |
| VAL | SPFINDPA+2~, SPFINDPA+7*, SPFINDPA+8*, SPFINDPA+9 |