PXRMRAD ; SLC/PKR - Handle radiology findings. ;08/04/2008
Source file <PXRMRAD.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) | ;Evaluate radiology findings.
|
|
EVALPL(FINDPA,ENODE,TERMARR,PLIST) | ;Evaluate radiology term findings
|
|
EVALTERM(DFN,FINDPA,ENODE,TERMARR,TFIEVAL) | ;Evaluate radiology terms.
|
|
GETDATA(DAS,FIEVT) | ;Return data for a RAD/NUC MED PATIENT entry.
|
|
MHVOUT(INDENT,IFIEVAL,NLINES,TEXT) | ;Produce the MHV output.
|
|
OUTPUT(INDENT,IFIEVAL,NLINES,TEXT) | ;Produce the clinical
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^RAMIS(71 - [#71] | MHVOUT+4, OUTPUT+5 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
CODE | MHVOUT+1~, MHVOUT+8*, OUTPUT+2~, OUTPUT+9*, OUTPUT+11 |
CPT | MHVOUT+1~, MHVOUT+6*, MHVOUT+7, OUTPUT+2~, OUTPUT+7*, OUTPUT+8 |
CPTDATA | MHVOUT+1~, MHVOUT+7*, MHVOUT+8, MHVOUT+9, OUTPUT+2~, OUTPUT+8*, OUTPUT+9, OUTPUT+10 |
D0 | MHVOUT+1~, MHVOUT+4*, MHVOUT+5, MHVOUT+6, OUTPUT+2~, OUTPUT+5*, OUTPUT+6, OUTPUT+7 |
DAS | GETDATA~, GETDATA+2 |
DEFARR | EVALFI~, EVALFI+1 |
DFN | EVALFI~, EVALFI+1, EVALTERM~, EVALTERM+1 |
ENODE | EVALFI~, EVALFI+1, EVALPL~, EVALPL+2, EVALTERM~, EVALTERM+1 |
FIEVAL | EVALFI~, EVALFI+1 |
FIEVT | GETDATA~, GETDATA+2 |
FIEVT("EXAM S | TATUS" , GETDATA+3 |
FIEVT("STATUS" | GETDATA+3* |
FIEVT("VALUE" | GETDATA+3* |
FINDPA | EVALPL~, EVALPL+2, EVALTERM~, EVALTERM+1 |
IFIEVAL | MHVOUT~, OUTPUT~ |
IFIEVAL( | MHVOUT+12, MHVOUT+13, OUTPUT+15, OUTPUT+16, OUTPUT+17, OUTPUT+18 |
IFIEVAL("FINDING" | MHVOUT+2, OUTPUT+3 |
IND | MHVOUT+1~, MHVOUT+11*, MHVOUT+12*, MHVOUT+13, OUTPUT+2~, OUTPUT+14*, OUTPUT+15*, OUTPUT+16, OUTPUT+17, OUTPUT+18 |
INDENT | MHVOUT~, MHVOUT+14, OUTPUT~, OUTPUT+12, OUTPUT+19 |
JND | MHVOUT+1~, MHVOUT+15*, OUTPUT+2~, OUTPUT+13*, OUTPUT+20* |
NAME | MHVOUT+1~, MHVOUT+5*, MHVOUT+10*, MHVOUT+13, OUTPUT+2~, OUTPUT+6*, OUTPUT+11 |
NLINES | MHVOUT~, MHVOUT+15*, MHVOUT+16*, OUTPUT~, OUTPUT+13*, OUTPUT+20*, OUTPUT+21* |
NOUT | MHVOUT+1~, MHVOUT+14, MHVOUT+15, OUTPUT+2~, OUTPUT+12, OUTPUT+13, OUTPUT+19, OUTPUT+20 |
PLIST | EVALPL~, EVALPL+2 |
>> PXRMRM | MHVOUT+14, OUTPUT+12, OUTPUT+19 |
RADPROC | MHVOUT+1~, MHVOUT+2*, MHVOUT+4, OUTPUT+2~, OUTPUT+3*, OUTPUT+5 |
SNAME | MHVOUT+1~, MHVOUT+9*, MHVOUT+10, OUTPUT+2~, OUTPUT+10*, OUTPUT+11 |
TEMP | MHVOUT+1~, MHVOUT+13*, MHVOUT+14, OUTPUT+2~, OUTPUT+11*, OUTPUT+12, OUTPUT+16*, OUTPUT+17*, OUTPUT+18*, OUTPUT+19 |
TERMARR | EVALPL~, EVALPL+2, EVALTERM~, EVALTERM+1 |
TEXT | MHVOUT~, OUTPUT~ |
TEXT( | MHVOUT+15*, MHVOUT+16*, OUTPUT+13*, OUTPUT+20*, OUTPUT+21* |
TEXTOUT | MHVOUT+1~, MHVOUT+14, OUTPUT+2~, OUTPUT+12, OUTPUT+19 |
TEXTOUT( | MHVOUT+15, OUTPUT+13, OUTPUT+20 |
TFIEVAL | EVALTERM~, EVALTERM+1 |
U | MHVOUT+5, MHVOUT+6, MHVOUT+8, MHVOUT+9, OUTPUT+6, OUTPUT+7, OUTPUT+9, OUTPUT+10 |