PXRMTAX ;SLC/PKR - Handle taxonomy finding. ;19-Jan-2017 14:23;DU
Source file <PXRMTAX.m>
| Package | Total | Call Graph |
|---|---|---|
| Clinical Reminders | 12 | ($$COND,SCPAR)^PXRMCOND GETDATA^PXRMDATA GPLIST^PXRMDGPT TAX^PXRMLDR (FPDAT,GPLIST,MHVOUT,OUTPUT)^PXRMPROB (FPDAT,GPLIST,MHVOUT,OUTPUT)^PXRMRCPT GETSTATI^PXRMSTAT SPFINDPA^PXRMTERM (SFRES,SSPAR)^PXRMUTIL (FPDAT,GPLIST,MHVOUT,OUTPUT)^PXRMVCPT (FPDAT,GPLIST,MHVOUT,OUTPUT)^PXRMVPOV GETDATA^PXRMVSIT |
| IHS Mods To Patient Care Encounter | 1 | (FPDAT,MHVOUT,OUTPUT)^BPXRMPRC |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| MHVOUT(INDENT,IFIEVAL,NLINES,TEXT) | ;Produce the MHV output.
|
|
| EVALFI(DFN,DEFARR,ENODE,FIEVAL) | ;Evaluate taxonomy findings.
|
|
| EVALPL(FINDPA,ENODE,TERMARR,PLIST) | ;Evaluate taxonomy terms for
|
|
| FIEVAL(DFN,TAXIEN,FINDPA,FIEVAL) | ;
|
|
| EVALTERM(DFN,FINDPA,ENODE,TERMARR,TFIEVAL) | ;Evaluate taxonomy
|
|
| GPLIST(TAXIEN,FINDPA,PLIST) | ;Get the list of patients with
|
|
| OUTPUT(INDENT,IFIEVAL,NLINES,TEXT) | ;Produce the clinical
|
| Name | Field # of Occurrence |
|---|---|
| FPDAT^BPXRMPRC | FIEVAL+32 |
| MHVOUT^BPXRMPRC | MHVOUT+15 |
| OUTPUT^BPXRMPRC | OUTPUT+16 |
| $$COND^PXRMCOND | FIEVAL+59 |
| SCPAR^PXRMCOND | FIEVAL+10, GPLIST+14 |
| GETDATA^PXRMDATA | FIEVAL+53 |
| GPLIST^PXRMDGPT | GPLIST+19 |
| TAX^PXRMLDR | FIEVAL+9, GPLIST+13 |
| FPDAT^PXRMPROB | FIEVAL+27 |
| GPLIST^PXRMPROB | GPLIST+24 |
| MHVOUT^PXRMPROB | MHVOUT+13 |
| OUTPUT^PXRMPROB | OUTPUT+14 |
| FPDAT^PXRMRCPT | FIEVAL+37 |
| GPLIST^PXRMRCPT | GPLIST+30 |
| MHVOUT^PXRMRCPT | MHVOUT+10 |
| OUTPUT^PXRMRCPT | OUTPUT+11 |
| GETSTATI^PXRMSTAT | FIEVAL+26, FIEVAL+36, GPLIST+23 |
| SPFINDPA^PXRMTERM | EVALPL+11, EVALTERM+11 |
| SFRES^PXRMUTIL | FIEVAL+73 |
| SSPAR^PXRMUTIL | FIEVAL+6, GPLIST+12 |
| FPDAT^PXRMVCPT | FIEVAL+29 |
| GPLIST^PXRMVCPT | GPLIST+28 |
| MHVOUT^PXRMVCPT | MHVOUT+12 |
| OUTPUT^PXRMVCPT | OUTPUT+13 |
| FPDAT^PXRMVPOV | FIEVAL+20 |
| GPLIST^PXRMVPOV | GPLIST+26 |
| MHVOUT^PXRMVPOV | MHVOUT+11 |
| OUTPUT^PXRMVPOV | OUTPUT+12 |
| GETDATA^PXRMVSIT | FIEVAL+54 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^TMP($J | GPLIST+11!, GPLIST+36, GPLIST+38, GPLIST+42, GPLIST+44, GPLIST+46, GPLIST+56, GPLIST+57*, GPLIST+58! |
| Name | Line Occurrences |
|---|---|
| FIEVAL | EVALFI+10, EVALTERM+12 |
| GPLIST | EVALPL+12 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| BDT | FIEVAL+1~, FIEVAL+6, FIEVAL+7, FIEVAL+20, FIEVAL+27, FIEVAL+29, FIEVAL+32, FIEVAL+37, GPLIST+5~, GPLIST+12 , GPLIST+19, GPLIST+24, GPLIST+26, GPLIST+28 |
| CASESEN | FIEVAL+1~, FIEVAL+10, FIEVAL+59 |
| CODE | FIEVAL+1~ |
| CODESYS | FIEVAL+1~ |
| COND | FIEVAL+1~, FIEVAL+10, FIEVAL+59, FIEVAL+64, GPLIST+5~, GPLIST+14 |
| CONVAL | FIEVAL+1~, FIEVAL+59*, FIEVAL+60, FIEVAL+63, FIEVAL+64 |
| DAS | FIEVAL+1~, FIEVAL+52*, FIEVAL+53, FIEVAL+65 |
| DATE | FIEVAL+1~, FIEVAL+40*, FIEVAL+41*, FIEVAL+43, FIEVAL+45, FIEVAL+47, GPLIST+5~, GPLIST+46*, GPLIST+47, GPLIST+49* , GPLIST+50*, GPLIST+52, GPLIST+54, GPLIST+55 |
| DEFARR | EVALFI~ |
| DEFARR("E" | EVALFI+4, EVALFI+6 |
| DEFARR(20 | EVALFI+8 |
| DFN | EVALFI~, EVALFI+10, EVALTERM~, EVALTERM+12, FIEVAL~, FIEVAL+20, FIEVAL+27, FIEVAL+29, FIEVAL+32, FIEVAL+37 , GPLIST+5~, GPLIST+37*, GPLIST+38*, GPLIST+42, GPLIST+44, GPLIST+46, GPLIST+56 |
| DLIST | GPLIST+5~, GPLIST+39! |
| DLIST( | GPLIST+47*, GPLIST+50, GPLIST+52, GPLIST+54, GPLIST+55 |
| EDT | FIEVAL+1~, FIEVAL+6, FIEVAL+7, FIEVAL+20, FIEVAL+27, FIEVAL+29, FIEVAL+32, FIEVAL+37, GPLIST+5~, GPLIST+12 , GPLIST+19, GPLIST+24, GPLIST+26, GPLIST+28 |
| ENODE | EVALFI~, EVALFI+4, EVALFI+6, EVALPL~, EVALPL+5, EVALPL+7, EVALTERM~, EVALTERM+5, EVALTERM+7 |
| ENS | FIEVAL+1~, GPLIST+5~ |
| FIEVAL | EVALFI~, FIEVAL~, FIEVAL+48*, FIEVAL+73 |
| FIEVAL( | EVALFI+11*, FIEVAL+63*, FIEVAL+64*, FIEVAL+65*, FIEVAL+66*, FIEVAL+67*, FIEVAL+68*, FIEVAL+69*, FIEVAL+70*, FIEVAL+71* |
| FIEVAL("BDTE" | FIEVAL+7* |
| FIEVAL("EDTE" | FIEVAL+7* |
| FIEVT | EVALFI+1~, EVALFI+9!, EVALFI+10, EVALFI+11, EVALTERM+2~, EVALTERM+8!, EVALTERM+12, EVALTERM+13, FIEVAL+2~, FIEVAL+53 , FIEVAL+54, FIEVAL+59, FIEVAL+70, FIEVAL+71 |
| FIEVT("CODE" | FIEVAL+57* |
| FIEVT("CODESYS" | FIEVAL+56* |
| FIEVT("DATE" | FIEVAL+55*, FIEVAL+66 |
| FIEVT("NODE" | FIEVAL+58* |
| FIEVT("VISIT" | FIEVAL+54 |
| FILENUM | FIEVAL+2~, FIEVAL+44*, FIEVAL+45*, FIEVAL+47, FIEVAL+51*, FIEVAL+53, FIEVAL+67, GPLIST+5~, GPLIST+43*, GPLIST+44* , GPLIST+46, GPLIST+47, GPLIST+55*, GPLIST+56, MHVOUT+1~, MHVOUT+3*, MHVOUT+4*, MHVOUT+5*, MHVOUT+7, MHVOUT+10 , MHVOUT+11, MHVOUT+12, MHVOUT+13, MHVOUT+15, OUTPUT+2~, OUTPUT+4*, OUTPUT+5*, OUTPUT+6*, OUTPUT+8, OUTPUT+11 , OUTPUT+12, OUTPUT+13, OUTPUT+14, OUTPUT+16 |
| FINDING | EVALFI+1~, EVALFI+5*, EVALFI+6*, EVALFI+8, EVALFI+11 |
| FINDPA | EVALFI+1~, EVALFI+7!, EVALFI+8*, EVALFI+10, EVALPL~, EVALPL+11, EVALTERM~, EVALTERM+11, FIEVAL~, FIEVAL+10 , FIEVAL+26, FIEVAL+36, GPLIST~, GPLIST+14, GPLIST+23, GPLIST+30 |
| FINDPA(0 | FIEVAL+6, FIEVAL+8, GPLIST+12 |
| FLIST | FIEVAL+2~ |
| FLIST( | FIEVAL+47*, FIEVAL+51, FIEVAL+52, FIEVAL+55, FIEVAL+56, FIEVAL+57, FIEVAL+58, FIEVAL+68 |
| FNA | MHVOUT+1~, OUTPUT+2~ |
| FNA( | MHVOUT+3*, MHVOUT+5, MHVOUT+7, OUTPUT+4*, OUTPUT+6, OUTPUT+8 |
| ICOND | FIEVAL+2~, FIEVAL+10, FIEVAL+59, GPLIST+6~, GPLIST+14 |
| IFIEVAL | MHVOUT~, MHVOUT+10, MHVOUT+11, MHVOUT+12, MHVOUT+13, MHVOUT+15, OUTPUT~, OUTPUT+11, OUTPUT+12, OUTPUT+13 , OUTPUT+14, OUTPUT+16 |
| IFIEVAL( | MHVOUT+3, OUTPUT+4 |
| >> IHSIEN | FIEVAL+25*, FIEVAL+26 |
| IND | FIEVAL+2~, FIEVAL+42*, FIEVAL+43*, FIEVAL+45, FIEVAL+47, FIEVAL+50*, FIEVAL+51, FIEVAL+52, FIEVAL+55, FIEVAL+56 , FIEVAL+57, FIEVAL+58, FIEVAL+68, GPLIST+6~, GPLIST+54*, GPLIST+56, MHVOUT+1~, MHVOUT+2*, MHVOUT+3*, OUTPUT+2~ , OUTPUT+3*, OUTPUT+4* |
| INDENT | MHVOUT~, MHVOUT+10, MHVOUT+11, MHVOUT+12, MHVOUT+13, MHVOUT+15, OUTPUT~, OUTPUT+11, OUTPUT+12, OUTPUT+13 , OUTPUT+14, OUTPUT+16 |
| INS | FIEVAL+2~, GPLIST+6~ |
| INVFD | FIEVAL+2~, FIEVAL+8* |
| IPLIST | GPLIST+6~, GPLIST+39!, GPLIST+57 |
| IPLIST( | GPLIST+56* |
| NF | GPLIST+7~, GPLIST+41*, GPLIST+42*, GPLIST+44, GPLIST+46, GPLIST+47, GPLIST+51*, GPLIST+52*, GPLIST+54, GPLIST+55 |
| NFOUND | FIEVAL+3~, FIEVAL+40*, FIEVAL+41, FIEVAL+43, FIEVAL+46*, FIEVAL+47, FIEVAL+48, FIEVAL+50, GPLIST+7~, GPLIST+40* , GPLIST+45*, GPLIST+47, GPLIST+49*, GPLIST+50, GPLIST+52, GPLIST+53*, GPLIST+56 |
| NGET | FIEVAL+3~, FIEVAL+13*, FIEVAL+20, FIEVAL+27, FIEVAL+29, FIEVAL+32, GPLIST+7~ |
| NLINES | MHVOUT~, MHVOUT+10, MHVOUT+11, MHVOUT+12, MHVOUT+13, MHVOUT+15, OUTPUT~, OUTPUT+11, OUTPUT+12, OUTPUT+13 , OUTPUT+14, OUTPUT+16 |
| NOCC | FIEVAL+3~, FIEVAL+6, FIEVAL+11, FIEVAL+12*, FIEVAL+13, FIEVAL+37, FIEVAL+41, FIEVAL+43, FIEVAL+50, GPLIST+7~ , GPLIST+12, GPLIST+19, GPLIST+24, GPLIST+26, GPLIST+28, GPLIST+50, GPLIST+52 |
| NP | FIEVAL+3~, FIEVAL+49*, FIEVAL+50, FIEVAL+62*, FIEVAL+63, FIEVAL+64, FIEVAL+65, FIEVAL+66, FIEVAL+67, FIEVAL+68 , FIEVAL+69, FIEVAL+70, FIEVAL+71, FIEVAL+73 |
| OCCLIST | MHVOUT+1~, MHVOUT+6!, MHVOUT+7*, MHVOUT+10, MHVOUT+11, MHVOUT+12, MHVOUT+13, MHVOUT+15, OUTPUT+2~, OUTPUT+7! , OUTPUT+8*, OUTPUT+11, OUTPUT+12, OUTPUT+13, OUTPUT+14, OUTPUT+16 |
| PFIND3 | EVALPL+2~ |
| PFIND4 | EVALPL+2~ |
| PFINDPA | EVALPL+2~, EVALPL+8!, EVALPL+11, EVALPL+12, EVALTERM+2~, EVALTERM+8!, EVALTERM+11, EVALTERM+12 |
| PLIST | EVALPL~, EVALPL+12, GPLIST~, GPLIST+57 |
| PLS | FIEVAL+3~, GPLIST+8~ |
| >> PXRMDEBG | FIEVAL+7, FIEVAL+71 |
| RAS | FIEVAL+4~, GPLIST+8~ |
| SAVE | FIEVAL+4~, FIEVAL+60*, FIEVAL+61 |
| SDIR | FIEVAL+4~, FIEVAL+11*, FIEVAL+20, FIEVAL+27, FIEVAL+29, FIEVAL+32, FIEVAL+41, FIEVAL+73 |
| STATUSA | FIEVAL+4~, FIEVAL+23!, FIEVAL+26, FIEVAL+27, FIEVAL+35!, FIEVAL+36, FIEVAL+37, GPLIST+8~, GPLIST+22!, GPLIST+23 , GPLIST+24 |
| TAXARR | FIEVAL+4~, FIEVAL+9, FIEVAL+20, FIEVAL+27, FIEVAL+29, FIEVAL+32, FIEVAL+37, GPLIST+8~, GPLIST+13, GPLIST+19 , GPLIST+24, GPLIST+26, GPLIST+28, GPLIST+30 |
| TAXARR("APDS" | FIEVAL+20, FIEVAL+22, FIEVAL+29, FIEVAL+32, FIEVAL+34, GPLIST+19, GPLIST+21, GPLIST+26, GPLIST+28, GPLIST+30 |
| TAXARR("IEN" | FIEVAL+25 |
| TAXIEN | EVALFI+2~, EVALFI+3*, EVALFI+4*, EVALFI+6, EVALFI+10, EVALPL+2~, EVALPL+4*, EVALPL+5*, EVALPL+7, EVALPL+12 , EVALTERM+3~, EVALTERM+4*, EVALTERM+5*, EVALTERM+7, EVALTERM+12, FIEVAL~, FIEVAL+9, FIEVAL+69, GPLIST~, GPLIST+13 , GPLIST+56 |
| TERMARR | EVALPL~, EVALTERM~ |
| TERMARR("E" | EVALPL+5, EVALPL+7, EVALTERM+5, EVALTERM+7 |
| TERMARR(20 | EVALPL+9, EVALTERM+9 |
| TEXT | MHVOUT~, MHVOUT+10, MHVOUT+11, MHVOUT+12, MHVOUT+13, MHVOUT+15, OUTPUT~, OUTPUT+11, OUTPUT+12, OUTPUT+13 , OUTPUT+14, OUTPUT+16 |
| TF | GPLIST+8~, GPLIST+35*, GPLIST+36, GPLIST+38, GPLIST+42, GPLIST+44, GPLIST+46, GPLIST+56 |
| TFIEVAL | EVALTERM~ |
| TFIEVAL( | EVALTERM+13* |
| TFINDING | EVALPL+3~, EVALPL+6*, EVALPL+7*, EVALPL+9, EVALTERM+3~, EVALTERM+6*, EVALTERM+7*, EVALTERM+9, EVALTERM+13 |
| TFINDPA | EVALPL+3~, EVALPL+8!, EVALPL+9*, EVALPL+11, EVALTERM+3~, EVALTERM+8!, EVALTERM+9*, EVALTERM+11 |
| TIFIEVAL | MHVOUT+1~, OUTPUT+2~ |
| TLIST | FIEVAL+4~, FIEVAL+20, FIEVAL+27, FIEVAL+29, FIEVAL+32, FIEVAL+37, GPLIST+8~, GPLIST+10*, GPLIST+11, GPLIST+19 , GPLIST+24, GPLIST+26, GPLIST+28, GPLIST+30, GPLIST+36, GPLIST+38, GPLIST+42, GPLIST+44, GPLIST+46, GPLIST+56 , GPLIST+58 |
| TLIST( | FIEVAL+41, FIEVAL+43, FIEVAL+45, FIEVAL+47 |
| U | FIEVAL+8, FIEVAL+47, FIEVAL+51, FIEVAL+52, FIEVAL+55, FIEVAL+56, FIEVAL+57, FIEVAL+58, FIEVAL+68, GPLIST+46 , GPLIST+47, GPLIST+54, GPLIST+55 |
| UCIFS | FIEVAL+4~, FIEVAL+10, FIEVAL+13, FIEVAL+60, GPLIST+8~, GPLIST+14 |
| USEINP | FIEVAL+4~, GPLIST+8~ |
| VSLIST | FIEVAL+4~, FIEVAL+10, FIEVAL+59, GPLIST+8~, GPLIST+14 |