RARTUVR ;HISC/FPT,SWM AISC/RMO-Unverified Reports ;8/19/97 11:01
Source file <RARTUVR.m>
Package | Total | Caller Graph |
---|---|---|
Radiology Nuclear Medicine | 1 | RA DAIUVR |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ; unverified reports report
|
|
START | ; start processing
|
|
ASKTHRU | ||
IT | ; imaging type
|
|
DEVICE | ; select device
|
|
KILL | ; kill variables & close device
|
|
ASKBD | ||
DIV | ; walk through tmp global, start with 'division'
|
|
ASKCUT |
Name | Field # of Occurrence |
---|---|
^%DT | DIV+2 |
^DIR | ASKBD+6, ASKCUT+4, ASKCUT+6 |
132^RAMAINP | ASKBD+9 |
SETVARS^RAPSET1 | EN+5 |
BTG^RARTUVR1 | START+29 |
DIVSUM^RARTUVR1 | DIV+4 |
PRINT^RARTUVR2 | IT+2 |
EN1^RARTUVR3 | START+2 |
CLOSE^RAUTL | KILL+5 |
D^RAUTL | DIV+2 |
DATE^RAUTL | ASKTHRU+1 |
ZIS^RAUTL | DEVICE+2 |
RASET^RAUTL2 | START+21 |
$$DIVLOC^RAUTL7 | EN+7 |
$$SETUPDI^RAUTL7 | EN+6 |
STOPCHK^RAUTL9 | START+20 |
$$UP^XLFSTR | ASKBD+7 |
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 |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^RARPT - [#74] | START+17, START+18 |
^RARPT("ASTAT" | EN+2, START+12, START+14 |
^TMP($J | EN+1!, EN+9, EN+11*, START+4, START+5*, START+6*, START+7*, DIV+4, KILL+1!, IT+2 |
Name | Line Occurrences |
---|---|
ASKCUT | ASKCUT+7 |
DEVICE | ASKTHRU+4, ASKCUT+4 |
IT | DIV+4 |
KILL | EN+7, ASKBD+6, ASKTHRU+2, ASKCUT+4, DEVICE+2, START+2 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
%DT | DIV+2*! |
BEGDATE | ASKTHRU+2, START+19, KILL+4! |
DIR | ASKBD!, ASKBD+7!, ASKCUT+3!, ASKCUT+4!, ASKCUT+7!, KILL+4! |
DIR("?" | ASKBD+1*, ASKBD+2*, ASKBD+3*, ASKBD+4*, ASKCUT+3*, ASKCUT+5* |
DIR("??" | ASKCUT+3* |
DIR("A" | ASKCUT+3*, ASKCUT+6* |
DIR("B" | ASKBD*, ASKCUT+3* |
DIR(0 | ASKBD+5*, ASKCUT+3*, ASKCUT+6* |
DIROUT | ASKBD+7! |
DIRUT | ASKBD+6, ASKBD+7!, KILL+4! |
DTOUT | ASKBD+7! |
DUOUT | ASKBD+7!, KILL+4! |
DUZ | EN+5, EN+8, EN+10 |
ENDDATE | ASKTHRU+2, ASKTHRU+3*, START+19, KILL+4! |
I | KILL+4! |
IO | START+1 |
IOM | DIV+3 |
POP | KILL+1! |
RA1 | ASKCUT+2*, ASKCUT+6*, KILL+2! |
RA2 | KILL+2! |
RA3 | KILL+2! |
RA4 | KILL+2! |
RABD | ASKBD+7*, ASKBD+8, ASKTHRU+4, START+2, KILL+2! |
RACCESS | KILL+3! |
RACCESS( | EN+5, EN+8, EN+10 |
RACN | KILL+1! |
RACNI | KILL+1! |
RACNT | EN+8*, EN+11*, KILL+1! |
RACNT(0 | DIV+1* |
RACUT | KILL+2! |
RACUT( | ASKCUT+2, ASKCUT+6* |
RACUT(1 | ASKCUT* |
RACUT(2 | ASKCUT* |
RACUT(3 | ASKCUT* |
RAD | KILL+1! |
RADASH | DIV+3*, KILL+2! |
RADATE | KILL+1! |
RADFN | KILL+1! |
RADIVNME | START+3*, START+4*, START+5, START+6, START+7, DIV+1*, DIV+4*, KILL+1!, IT+2 |
RADIVNUM | KILL+1! |
RADTE | KILL+1! |
RADTI | KILL+1! |
RAEQUAL | DIV+3*, KILL+2! |
RAFILE | ASKBD+9*, ASKBD+11*, ASKTHRU, ASKTHRU+1! |
RAFL | KILL+1! |
RAFLG | KILL+1! |
RAHOURS | KILL+2! |
RAIP | START+25*, START+26*, START+27*, START+28*, KILL+1! |
RAIPNAME | KILL+1! |
RAITNAME | START+4*, START+5, START+6, START+7, KILL+1!, IT+1*, IT+2* |
RAITNUM | KILL+1! |
RAMES | KILL+4! |
RAOUT | START+11*, START+12, START+13*, START+14, START+20*, DIV+1*, DIV+4, KILL+1!, IT+2 |
RAPAGE | DIV+1*, KILL+1! |
RAPOP | DEVICE+2, KILL+1! |
RAPRES | START+22*, START+24*, START+26, KILL+1! |
RAPSTF | START+22*, START+24, START+27, KILL+1! |
RAPSTX | EN+5*, KILL+3! |
RAQUIT | KILL+1! |
RARAD | KILL+1! |
RARE | KILL+1! |
RARPT | START+13*, START+14*, START+17, START+18, START+21, KILL+1! |
RARPTENT | START+18*, START+19, KILL+2! |
RARS | KILL+1! |
RARUNDAT | DIV+2*, KILL+2! |
RASKTIME | ASKTHRU*, ASKTHRU+1! |
RASSN | KILL+2! |
RASTATUS | START+11*, START+12*, START+14, KILL+1! |
RASTRING | KILL+1! |
RAX | START+21*, START+22, KILL+1! |
RAXIT | EN+6*!, KILL+1! |
U | START+17, START+18 |
X | EN+7*, EN+8*, EN+9, EN+10, EN+11, ASKTHRU+2, ASKCUT+4, DIV+2*, KILL+1! |
Y | EN+9*, EN+10*, EN+11, ASKBD+7, ASKCUT+4, ASKCUT+6, ASKCUT+7, START+21*, DIV+2, KILL+1! |
ZTDESC | KILL+4! |
ZTQUEUED | START+1, START+20, KILL+1! |
>> ZTREQ | START+1* |
ZTRTN | DEVICE+1*, KILL+4! |
ZTSAVE | KILL+4! |
ZTSAVE("BEGDATE" | DEVICE+1* |
ZTSAVE("ENDDATE" | DEVICE+1* |
ZTSAVE("RABD" | DEVICE+1* |
ZTSAVE("RACNT" | DEVICE+1* |
ZTSAVE("RACUT*" | DEVICE+1* |
ZTSAVE("^TMP( | $J, ""RA D-TYPE"", " , DEVICE+1*, $J, ""RA I-TYPE"", " , DEVICE+1* |
ZTSAVE("^TMP($J,""RAUVR""," | DEVICE+1* |
ZTSTOP | START+20, KILL+1! |