PXRMINDX ;SLC/PKR - Routines for utilizing the index. ;03/31/2022
Source file <PXRMINDX.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 |
---|---|---|
EVALFI(DFN,DEFARR,ENODE,FIEVAL) | ;General finding evaluator.
|
|
EVALTERM(DFN,FINDPA,ENODE,TERMARR,TFIEVAL) | ;General term
|
|
FIEVAL(FILENUM,SNODE,DFN,ITEM,PFINDPA,FIEVAL) | ;
|
|
FPDAT(FILENUM,SNODE,ISC,DFN,ITEM,NGET,SDIR,BDT,EDT,NFOUND,FLIST) | ;Find patient
|
|
FPDATSS(FILENUM,SNODE,DFN,ITEM,NGET,SDIR,BDT,EDT,USESTRT,NFOUND,FLIST) | ;Find
|
|
OVERLAP(START,STOP,BDT,EDT) | ;Determine if the date range defined by START and
|
|
STATUSOK(STATUSA,FIEVD) | ;Return true if the status in FIEVD matches one in
|
Name | Field # of Occurrence |
---|---|
$$COND^PXRMCOND | FIEVAL+37 |
SCPAR^PXRMCOND | FIEVAL+8 |
$$GETFNUM^PXRMDATA | EVALFI+2, EVALTERM+4 |
GETDATA^PXRMDATA | FIEVAL+30 |
$$NOW^PXRMDATE | FPDATSS+11 |
NOINDEX^PXRMERRH | EVALFI+4, EVALTERM+6 |
CRFINDING^PXRMIMM | EVALFI+18, EVALTERM+21 |
CVXP^PXRMIMM | FPDAT+3 |
VGNP^PXRMIMM | FPDAT+4 |
SEVALFI^PXRMMH | FPDAT+5 |
GETSTATI^PXRMSTAT | FIEVAL+18 |
SPFINDPA^PXRMTERM | EVALTERM+17 |
SFRES^PXRMUTIL | FIEVAL+49 |
SSPAR^PXRMUTIL | FIEVAL+6 |
GETDATA^PXRMVSIT | FIEVAL+31 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^PXRMINDX( | EVALFI+3, EVALTERM+5, FPDAT+10, FPDAT+14, FPDATSS+7, FPDATSS+9, FPDATSS+14 |
Name | Line Occurrences |
---|---|
$$OVERLAP | FPDATSS+12 |
$$STATUSOK | FIEVAL+35 |
FIEVAL | EVALFI+15, EVALTERM+18 |
FPDAT | FIEVAL+20 |
FPDATSS | FIEVAL+19 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
BDT | EVALFI+1~, FIEVAL+2~, FIEVAL+6, FIEVAL+7, FIEVAL+19, FIEVAL+20, FPDAT~, FPDAT+3, FPDAT+4, FPDAT+5 , FPDAT+9, FPDAT+11, FPDATSS~, FPDATSS+12, OVERLAP~, OVERLAP+5 |
CASESEN | FIEVAL+2~, FIEVAL+8, FIEVAL+37 |
COND | FIEVAL+2~, FIEVAL+8, FIEVAL+37, FIEVAL+42 |
CONVAL | FIEVAL+2~, FIEVAL+37*, FIEVAL+38, FIEVAL+41, FIEVAL+42 |
CRLIST | FIEVAL+2~ |
DAS | FIEVAL+2~, FIEVAL+25*, FIEVAL+27*, FIEVAL+29*, FIEVAL+30, FPDAT+6~, FPDAT+13*, FPDAT+14*, FPDAT+16, FPDATSS+3~ , FPDATSS+14*, FPDATSS+15 |
DATE | FIEVAL+2~, FPDAT+6~, FPDAT+9*, FPDAT+10*, FPDAT+11, FPDAT+12, FPDAT+14, FPDAT+16 |
DEFARR | EVALFI~ |
DEFARR("E" | EVALFI+8, EVALFI+10 |
DEFARR(20 | EVALFI+13 |
DFN | EVALFI~, EVALFI+15, EVALFI+18, EVALTERM~, EVALTERM+18, EVALTERM+21, FIEVAL~, FIEVAL+19, FIEVAL+20, FPDAT~ , FPDAT+3, FPDAT+4, FPDAT+5, FPDAT+10, FPDAT+14, FPDATSS~, FPDATSS+7, FPDATSS+9, FPDATSS+14 |
DONE | FPDAT+6~, FPDAT+8*, FPDAT+10, FPDAT+11*, FPDAT+12*, FPDAT+17*, FPDATSS+3~, FPDATSS+5*, FPDATSS+7, FPDATSS+9 , FPDATSS+20*, FPDATSS+21* |
EDT | EVALFI+1~, FIEVAL+2~, FIEVAL+6, FIEVAL+7, FIEVAL+19, FIEVAL+20, FPDAT~, FPDAT+3, FPDAT+4, FPDAT+5 , FPDAT+7, FPDATSS~, FPDATSS+4, FPDATSS+12, OVERLAP~, OVERLAP+4 |
EDTT | FPDAT+6~, FPDAT+7*, FPDAT+9, FPDAT+12, FPDATSS+3~, FPDATSS+4*, FPDATSS+6, FPDATSS+7 |
ENODE | EVALFI~, EVALFI+2, EVALFI+8, EVALFI+10, EVALTERM~, EVALTERM+4, EVALTERM+10, EVALTERM+12 |
FIEVAL | EVALFI~, EVALFI+18, FIEVAL~, FIEVAL+21*, FIEVAL+49 |
FIEVAL( | EVALFI+11*, EVALFI+16*, EVALFI+17*, FIEVAL+41*, FIEVAL+42*, FIEVAL+43*, FIEVAL+44*, FIEVAL+45*, FIEVAL+46* |
FIEVAL("BDTE" | FIEVAL+7* |
FIEVAL("EDTE" | FIEVAL+7* |
FIEVAL("FILE | NUMBER" , FIEVAL+50* |
FIEVD | FIEVAL+2~, FIEVAL+30, FIEVAL+31, FIEVAL+35, FIEVAL+37, FIEVAL+45, FIEVAL+46, STATUSOK~ |
FIEVD("DATE" | FIEVAL+32*, FIEVAL+44 |
FIEVD("ISC" | FIEVAL+33* |
FIEVD("STATUS" | STATUSOK+2, STATUSOK+7 |
FIEVD("VISIT" | FIEVAL+31 |
FIEVT | EVALFI+1~, EVALFI+14!, EVALFI+15, EVALFI+16, EVALTERM+2~, EVALTERM+14!, EVALTERM+18, EVALTERM+19 |
FILENUM | EVALFI+1~, EVALFI+2*, EVALFI+3, EVALFI+4, EVALFI+15, EVALFI+18, EVALTERM+2~, EVALTERM+4*, EVALTERM+5, EVALTERM+6 , EVALTERM+18, EVALTERM+21, FIEVAL~, FIEVAL+12, FIEVAL+14, FIEVAL+16, FIEVAL+18, FIEVAL+19, FIEVAL+20, FIEVAL+30 , FIEVAL+50, FPDAT~, FPDAT+3, FPDAT+4, FPDAT+5, FPDAT+10, FPDAT+14, FPDATSS~, FPDATSS+7, FPDATSS+9 , FPDATSS+14, FPDATSS+18, FPDATSS+19 |
FINDING | EVALFI+1~, EVALFI+9*, EVALFI+10*, EVALFI+11, EVALFI+13, EVALFI+16, EVALFI+17, EVALFI+18 |
FINDPA | EVALFI+1~, EVALFI+12!, EVALFI+13*, EVALFI+15, EVALTERM~, EVALTERM+17 |
FINDPA(0 | EVALFI+17 |
FLIST | FIEVAL+2~, FIEVAL+19, FIEVAL+20, FPDAT~, FPDAT+3, FPDAT+4, FPDAT+5, FPDATSS~ |
FLIST( | FIEVAL+25, FIEVAL+32, FIEVAL+43, FPDAT+16*, FPDATSS+27* |
ICOND | FIEVAL+3~, FIEVAL+8, FIEVAL+37 |
IEN | FIEVAL+3~ |
IND | FIEVAL+3~, FIEVAL+24*, FIEVAL+25, FIEVAL+32, FIEVAL+43 |
INVFD | FIEVAL+3~, FIEVAL+22*, FIEVAL+31 |
ISC | FIEVAL+3~, FIEVAL+12*, FIEVAL+20, FIEVAL+33, FPDAT~, FPDAT+3, FPDAT+4 |
ITEM | EVALFI+1~, EVALFI+7*, EVALFI+8*, EVALFI+10, EVALFI+15, EVALFI+18, EVALTERM+2~, EVALTERM+9*, EVALTERM+10*, EVALTERM+12 , EVALTERM+18, EVALTERM+21, FIEVAL~, FIEVAL+19, FIEVAL+20, FIEVAL+27, FPDAT~, FPDAT+3, FPDAT+4, FPDAT+5 , FPDAT+10, FPDAT+14, FPDATSS~, FPDATSS+7, FPDATSS+9, FPDATSS+14 |
JND | STATUSOK+3~, STATUSOK+5*, STATUSOK+6, STATUSOK+7 |
NFOUND | FIEVAL+3~, FIEVAL+19, FIEVAL+20, FIEVAL+21, FIEVAL+24, FPDAT~, FPDAT+3, FPDAT+4, FPDAT+5, FPDAT+8* , FPDAT+15*, FPDAT+16, FPDAT+17, FPDATSS~, FPDATSS+5*, FPDATSS+15*, FPDATSS+23*, FPDATSS+24, FPDATSS+26, FPDATSS+27* |
NGET | FIEVAL+3~, FIEVAL+11*, FIEVAL+19, FIEVAL+20, FPDAT~, FPDAT+3, FPDAT+4, FPDAT+5, FPDAT+17, FPDATSS~ , FPDATSS+24, FPDATSS+26 |
NOCC | FIEVAL+3~, FIEVAL+6, FIEVAL+9, FIEVAL+10*, FIEVAL+11, FIEVAL+24 |
NOINDEX | EVALFI+1~, EVALFI+5*, EVALFI+6*, EVALFI+11, EVALTERM+2~, EVALTERM+7*, EVALTERM+8*, EVALTERM+13 |
NP | FIEVAL+3~, FIEVAL+23*, FIEVAL+24, FIEVAL+40*, FIEVAL+41, FIEVAL+42, FIEVAL+43, FIEVAL+44, FIEVAL+45, FIEVAL+46 , FIEVAL+49 |
OK | STATUSOK+3~, STATUSOK+4*, STATUSOK+5, STATUSOK+6*, STATUSOK+7*, STATUSOK+8 |
OVERLAP | FPDATSS+3~, FPDATSS+12*, FPDATSS+13, FPDATSS+20, FPDATSS+21 |
PFINDPA | EVALTERM+2~, EVALTERM+14!, EVALTERM+17, EVALTERM+18, FIEVAL~, FIEVAL+8, FIEVAL+18 |
PFINDPA(0 | FIEVAL+6, FIEVAL+12, FIEVAL+15, FIEVAL+22, FIEVAL+27, FIEVAL+29 |
>> PXRMDEBG | FIEVAL+46 |
>> PXRMITEM | EVALFI+4 |
SAVE | FIEVAL+4~, FIEVAL+38*, FIEVAL+39 |
SDATE | FPDATSS+3~, FPDATSS+11*, FPDATSS+12, FPDATSS+15 |
SDIR | FIEVAL+4~, FIEVAL+9*, FIEVAL+19, FIEVAL+20, FIEVAL+49, FPDAT~, FPDAT+3, FPDAT+4, FPDAT+5, FPDAT+9 , FPDAT+10, FPDAT+11, FPDAT+12, FPDATSS~, FPDATSS+6, FPDATSS+7, FPDATSS+9, FPDATSS+20, FPDATSS+21, FPDATSS+24 |
SNODE | FIEVAL~, FIEVAL+19, FIEVAL+20, FPDAT~, FPDAT+10, FPDAT+14, FPDATSS~, FPDATSS+7, FPDATSS+9, FPDATSS+14 |
SSFIND | FIEVAL+4~, FIEVAL+14*, FIEVAL+15, FIEVAL+19, FIEVAL+20 |
START | FPDATSS+3~, FPDATSS+6*, FPDATSS+7*, FPDATSS+9, FPDATSS+11, FPDATSS+12, FPDATSS+14, OVERLAP~, OVERLAP+4 |
STATOK | FIEVAL+4~, FIEVAL+35*, FIEVAL+36 |
STATUSA | FIEVAL+4~, FIEVAL+18, FIEVAL+35, STATUSOK~ |
STATUSA( | STATUSOK+6, STATUSOK+7 |
STATUSA(0 | STATUSOK+5 |
STOP | FPDATSS+3~, FPDATSS+8*, FPDATSS+9*, FPDATSS+11, FPDATSS+14, OVERLAP~, OVERLAP+5 |
TDATE | FPDATSS+3~, FPDATSS+23*, FPDATSS+24*, FPDATSS+26, FPDATSS+27 |
TERMARR | EVALTERM~ |
TERMARR("E" | EVALTERM+10, EVALTERM+12 |
TERMARR("IEN" | EVALTERM+6 |
TERMARR(20 | EVALTERM+15 |
TFIEVAL | EVALTERM~, EVALTERM+21 |
TFIEVAL( | EVALTERM+13*, EVALTERM+19*, EVALTERM+20* |
TFINDING | EVALTERM+3~, EVALTERM+11*, EVALTERM+12*, EVALTERM+13, EVALTERM+15, EVALTERM+19, EVALTERM+20, EVALTERM+21 |
TFINDPA | EVALTERM+3~, EVALTERM+14!, EVALTERM+15*, EVALTERM+17 |
TFINDPA(0 | EVALTERM+20 |
TIND | FPDATSS+3~, FPDATSS+25*, FPDATSS+26*, FPDATSS+27 |
TLIST | FPDATSS+3~ |
TLIST( | FPDATSS+15*, FPDATSS+24, FPDATSS+26, FPDATSS+27 |
U | EVALFI+17, EVALTERM+20, FIEVAL+12, FIEVAL+15, FIEVAL+22, FIEVAL+25, FIEVAL+29, FIEVAL+32, FIEVAL+43, FPDAT+16 , FPDATSS+15 |
UCIFS | FIEVAL+4~, FIEVAL+8, FIEVAL+11, FIEVAL+38 |
USESTRT | FIEVAL+4~, FIEVAL+15*, FIEVAL+16*, FIEVAL+19, FPDATSS~, FPDATSS+11 |
VSLIST | FIEVAL+4~, FIEVAL+8, FIEVAL+37 |