RARTR2 ;HIRMFO/GJC-Queue/print Radiology Reports (utility) ;3/11/96
Source file <RARTR2.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 |
---|---|---|
SETDIV | ;get division params
|
|
WRITE | ; Write out Report Text, Impression Text, Clinical History and
; Additional Clinical History on report. |
|
FOOT | ; footer
|
|
BANNER | ;Report Batch Header/Trailer Page
|
|
HANG | ; end-of-page prompt
|
|
SET | ; Set up our TMP global for mailman
|
|
AMENRPT() | ; Pass the text, '*** THIS IS AN AMENDED REPORT ***'.
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^RA(79 - [#79] | SETDIV+4, SETDIV+5 |
^RADPT - [#70] | SETDIV+2, WRITE+10, SET+12, SET+13 |
^RARPT - [#74] | WRITE+7, SET+7, SET+8 |
^TMP($J | SET+17*, SET+19* |
^UTILITY($J | SET+2!, SET+15, SET+16 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> %DT | BANNER+3* |
DIR | HANG+2! |
DIR(0 | HANG+2* |
>> DIRUT | HANG+2 |
>> DIV | SETDIV+4*, SETDIV+5 |
DIWF | SET+1~, SET+2* |
DIWL | SET+1~, SET+2*, SET+15, SET+16 |
DIWR | SET+1~, SET+2* |
F1 | BANNER+1*, BANNER+2, BANNER+5, BANNER+6! |
F2 | BANNER+1*, BANNER+2, BANNER+5, BANNER+6! |
>> I | SETDIV+5*, FOOT+2*, FOOT+5*, BANNER+2*, BANNER+4*, BANNER+5* |
IO | BANNER+1 |
IOM | BANNER+1, BANNER+3 |
IOSL | WRITE+7, WRITE+10, FOOT+2, FOOT+5, BANNER+4, BANNER+5 |
IOST | FOOT+2, FOOT+3, FOOT+5, HANG+2 |
>> LOC | SETDIV+2*, SETDIV+3, SETDIV+4 |
>> RAACNT | SET+17, SET+19 |
RACN | SETDIV+1~ |
RACNI | SETDIV+1~, WRITE+10, SET+12, SET+13 |
RADATE | SETDIV+1~ |
RADFN | SETDIV+1~, SETDIV+2, WRITE+10, SET+12, SET+13 |
RADTE | SETDIV+1~ |
RADTI | SETDIV+1~, SETDIV+2, WRITE+10, SET+12, SET+13 |
>> RAFFLF | FOOT+4*, BANNER+1*, HANG+2 |
>> RAFMT | FOOT+4* |
>> RAFOOT | WRITE+7, WRITE+10, FOOT+2, FOOT+4 |
>> RAFTFM | FOOT+4 |
>> RAIOF | FOOT+4* |
>> RAMDIV | SETDIV+5* |
>> RAMDV | SETDIV+1*, SETDIV+5* |
>> RAOOUT | WRITE+7, WRITE+10, HANG+2* |
>> RAP | WRITE+5, WRITE+6, WRITE+9, SET+5, SET+6, SET+11 |
RAPX | SET+1~, SET+6*, SET+7, SET+8 |
>> RARPT | SETDIV+2, WRITE+7, SET+7, SET+8 |
>> RARTMES | BANNER+1, BANNER+2, BANNER+5 |
>> RAUTOE | FOOT+1, BANNER+1, HANG+1 |
>> RAV | WRITE+2*, WRITE+7*, WRITE+10* |
RAX | SET+1~*, SET+7*, SET+8, SET+12*, SET+13, SET+15*, SET+16 |
RAXX | WRITE+2!, WRITE+7*, WRITE+10*, WRITE+11 |
U | SETDIV+2 |
X | WRITE+7*, WRITE+10*, BANNER+3*, SET+1~, SET+8*, SET+13*, SET+16*, SET+17 |
Y | SETDIV+1~, SETDIV+2*, SETDIV+5*, BANNER+3 |
>> ZRAP | WRITE+6*, WRITE+7 |