PXRMHF ;SLC/PKR - Handle Health Factor findings. ;23-Mar-2015 10:36;DU
Source file <PXRMHF.m>
Package | Total | Call Graph |
---|---|---|
Clinical Reminders | 9 | $$GETFNUM^PXRMDATA $$EDATE^PXRMDATE NOINDEX^PXRMERRH $$INSCHR^PXRMEXLC EVALPL^PXRMINDL FIEVAL^PXRMINDX SEND^PXRMMSG SPFINDPA^PXRMTERM FORMATS^PXRMTEXT |
PCE Patient Care Encounter | 1 | VHF^PXPXRM |
VA Fileman | 1 | $$EXTERNAL^DILFD |
Name | Comments | DBIA/ICR reference |
---|---|---|
MHVOUT(INDENT,IFIEVAL,NLINES,TEXT) | ;Produce the MHV output.
|
|
GETDATA(DAS,FIEVT) | ;Return data for a specified V Health Factor entry.
|
|
EVALFI(DFN,DEFARR,ENODE,FIEVAL) | ;Evaluate health factor findings.
|
|
EVALPL(FINDPA,ENODE,TERMARR,PLIST) | ;Evaluate health factor term findings
|
|
CATSORT(FIEVAL,FIND0,FARR) | ;Sort all the true health factor findings
|
|
EVALTERM(DFN,FINDPA,ENODE,TERMARR,TFIEVAL) | ;Evaluate health factor terms.
|
|
WARN(HF0) | ;Issue a warning if a health factor is missing its category.
|
|
OUTPUT(INDENT,IFIEVAL,NLINES,TEXT) | ;Produce the clinical
|
Name | Field # of Occurrence |
---|---|
$$EXTERNAL^DILFD | MHVOUT+10, OUTPUT+17 |
VHF^PXPXRM | GETDATA+2 |
$$GETFNUM^PXRMDATA | EVALFI+2 |
$$EDATE^PXRMDATE | MHVOUT+12, OUTPUT+13 |
NOINDEX^PXRMERRH | EVALFI+4, EVALTERM+4 |
$$INSCHR^PXRMEXLC | OUTPUT+9 |
EVALPL^PXRMINDL | EVALPL+2 |
FIEVAL^PXRMINDX | EVALFI+15, EVALTERM+16 |
SEND^PXRMMSG | WARN+7 |
SPFINDPA^PXRMTERM | EVALTERM+15 |
FORMATS^PXRMTEXT | MHVOUT+13, OUTPUT+18, OUTPUT+22 |
FileNo | Call Tags |
---|---|
^AUPNVHF - [#9000010.23] | EXTERNAL^DILFD |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^AUTTHF - [#9999999.64] | CATSORT+16, CATSORT+18, MHVOUT+4, OUTPUT+6 |
^PXRMINDX( | EVALFI+3 |
^PXRMINDX(9000010.23 | EVALTERM+3 |
^TMP("PXRMXMZ" | WARN+2!, WARN+4*, WARN+5*, WARN+6* |
Name | Line Occurrences |
---|---|
CATSORT | EVALFI+19, EVALTERM+20 |
WARN | CATSORT+18 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
BDT | EVALTERM+1~ |
CAT | CATSORT+3~, CATSORT+16*, CATSORT+18, CATSORT+19, CATSORT+20, CATSORT+24*, CATSORT+25*, CATSORT+26, CATSORT+29, CATSORT+31 , CATSORT+33, CATSORT+45, CATSORT+47 |
CATLIST | CATSORT+3~, CATSORT+22 |
CATLIST( | CATSORT+19*, CATSORT+25, CATSORT+26, CATSORT+29, CATSORT+31, CATSORT+33, CATSORT+45, CATSORT+47 |
DAS | GETDATA~, GETDATA+2 |
DATE | CATSORT+3~, CATSORT+28*, CATSORT+29*, CATSORT+31, CATSORT+33 |
DEFARR | EVALFI~, EVALFI+19 |
DEFARR("E" | EVALFI+8, EVALFI+10 |
DEFARR(20 | EVALFI+13 |
DFN | EVALFI~, EVALFI+15, EVALTERM~, EVALTERM+16 |
DUZ | WARN+7 |
EDT | EVALTERM+1~ |
EM | MHVOUT+1~, MHVOUT+10, OUTPUT+2~, OUTPUT+17 |
ENODE | EVALFI~, EVALFI+2, EVALFI+8, EVALFI+10, EVALPL~, EVALPL+2, EVALTERM~, EVALTERM+8, EVALTERM+10 |
FARR | CATSORT~ |
FARR("E" | CATSORT+5, CATSORT+7 |
FARR(20 | CATSORT+10 |
FI | CATSORT+3~, CATSORT+6*, CATSORT+7*, CATSORT+8, CATSORT+10, CATSORT+19, CATSORT+20, CATSORT+32*, CATSORT+33*, CATSORT+34 , CATSORT+37, CATSORT+46*, CATSORT+47*, CATSORT+51, CATSORT+52, CATSORT+55 |
FIEN | MHVOUT+1~, MHVOUT+2*, MHVOUT+4, OUTPUT+2~, OUTPUT+3*, OUTPUT+6 |
FIEVAL | CATSORT~, EVALFI~, EVALFI+19 |
FIEVAL( | CATSORT+8, CATSORT+19, CATSORT+20*, CATSORT+34*, CATSORT+37*, CATSORT+51*, CATSORT+52*, CATSORT+55*, EVALFI+11*, EVALFI+16* , EVALFI+17* |
FIEVT | EVALFI+1~, EVALFI+14!, EVALFI+15, EVALFI+16, EVALTERM+1~, EVALTERM+12!, EVALTERM+16, EVALTERM+17, GETDATA~, GETDATA+2 |
FILENUM | EVALFI+1~, EVALFI+2*, EVALFI+3, EVALFI+4, EVALFI+15 |
FIND0 | CATSORT~, CATSORT+11 |
FINDING | EVALFI+1~, EVALFI+9*, EVALFI+10*, EVALFI+11, EVALFI+13, EVALFI+16, EVALFI+17 |
FINDPA | EVALFI+1~, EVALFI+12!, EVALFI+13*, EVALFI+15, EVALPL~, EVALPL+2, EVALTERM~, EVALTERM+15 |
FINDPA(0 | EVALFI+17, EVALTERM+20 |
HF0 | WARN~, WARN+4 |
HFIEN | CATSORT+3~, CATSORT+4*, CATSORT+5*, CATSORT+7, CATSORT+16, CATSORT+18, EVALFI+1~, EVALFI+7*, EVALFI+8*, EVALFI+10 , EVALFI+15, EVALTERM+1~, EVALTERM+7*, EVALTERM+8*, EVALTERM+10, EVALTERM+16 |
IFIEVAL | MHVOUT~, OUTPUT~ |
IFIEVAL( | MHVOUT+8, MHVOUT+9, MHVOUT+11, OUTPUT+11, OUTPUT+12, OUTPUT+14, OUTPUT+20, OUTPUT+21 |
IFIEVAL("FINDING" | MHVOUT+2, OUTPUT+3 |
IND | CATSORT+3~, CATSORT+36*, CATSORT+37*, CATSORT+50*, CATSORT+51*, CATSORT+54*, CATSORT+55*, MHVOUT+1~, MHVOUT+7*, MHVOUT+8* , MHVOUT+9, MHVOUT+11, OUTPUT+2~, OUTPUT+10*, OUTPUT+11*, OUTPUT+12, OUTPUT+14, OUTPUT+20, OUTPUT+21 |
INDENT | MHVOUT~, MHVOUT+13, OUTPUT~, OUTPUT+9, OUTPUT+18, OUTPUT+22 |
JND | MHVOUT+1~, MHVOUT+14*, OUTPUT+2~, OUTPUT+19*, OUTPUT+23* |
LDATE | CATSORT+3~, CATSORT+26*, CATSORT+29, CATSORT+45, CATSORT+47 |
LVL | MHVOUT+1~, MHVOUT+9*, MHVOUT+10*, MHVOUT+12, OUTPUT+2~, OUTPUT+14*, OUTPUT+15, OUTPUT+17 |
NAME | MHVOUT+1~, MHVOUT+6*, MHVOUT+12 |
NLINES | MHVOUT~, MHVOUT+14*, MHVOUT+15*, OUTPUT~, OUTPUT+8*, OUTPUT+9, OUTPUT+19*, OUTPUT+23*, OUTPUT+24* |
NOINDEX | EVALFI+1~, EVALFI+5*, EVALFI+6*, EVALFI+11, EVALTERM+1~, EVALTERM+5*, EVALTERM+6*, EVALTERM+11 |
NOUT | MHVOUT+1~, MHVOUT+13, MHVOUT+14, OUTPUT+2~, OUTPUT+18, OUTPUT+19, OUTPUT+22, OUTPUT+23 |
NTRUE | CATSORT+3~, CATSORT+44*, CATSORT+48, CATSORT+50* |
PFINDPA | EVALTERM+1~, EVALTERM+12!, EVALTERM+15, EVALTERM+16 |
PLIST | EVALPL~, EVALPL+2 |
PNAME | MHVOUT+1~, MHVOUT+4*, MHVOUT+6, OUTPUT+2~, OUTPUT+6*, OUTPUT+9 |
>> PXRMDEBG | CATSORT+20 |
>> PXRMITEM | EVALFI+4 |
>> PXRMRM | MHVOUT+13, OUTPUT+18, OUTPUT+22 |
TEMP | MHVOUT+1~, MHVOUT+12*, MHVOUT+13, OUTPUT+2~, OUTPUT+13*, OUTPUT+16*, OUTPUT+17*, OUTPUT+18, OUTPUT+21*, OUTPUT+22 |
TERMARR | EVALPL~, EVALPL+2, EVALTERM~, EVALTERM+20 |
TERMARR("E" | EVALTERM+8, EVALTERM+10 |
TERMARR("IEN" | EVALTERM+4 |
TERMARR(20 | EVALTERM+13 |
TEXT | MHVOUT~, OUTPUT~ |
TEXT( | MHVOUT+14*, MHVOUT+15*, OUTPUT+9*, OUTPUT+19*, OUTPUT+23*, OUTPUT+24* |
TEXTOUT | MHVOUT+1~, MHVOUT+13, OUTPUT+2~, OUTPUT+18, OUTPUT+22 |
TEXTOUT( | MHVOUT+14, OUTPUT+19, OUTPUT+23 |
TFIEVAL | EVALTERM~, EVALTERM+20 |
TFIEVAL( | EVALTERM+11*, EVALTERM+17*, EVALTERM+18* |
TFINDING | EVALTERM+2~, EVALTERM+9*, EVALTERM+10*, EVALTERM+11, EVALTERM+13, EVALTERM+17, EVALTERM+18 |
TFINDPA | EVALTERM+2~, EVALTERM+12!, EVALTERM+13*, EVALTERM+15 |
TFINDPA(0 | EVALTERM+18 |
U | CATSORT+10, CATSORT+11, CATSORT+16, CATSORT+20, EVALFI+17, EVALTERM+18, MHVOUT+4, OUTPUT+6, WARN+4 |
VDATE | MHVOUT+1~, MHVOUT+11*, MHVOUT+12, OUTPUT+2~, OUTPUT+12*, OUTPUT+13 |
WCR | CATSORT+3~, CATSORT+10*, CATSORT+11*, CATSORT+12*, CATSORT+15, CATSORT+19, CATSORT+20, CATSORT+30*, CATSORT+31*, CATSORT+33 , CATSORT+44*, CATSORT+45*, CATSORT+47 |
XMSUB | WARN+1~, WARN+3*, WARN+7 |