RADUTL ;HISC/GJC Radiation dosage data filing utility ;12 Jul 2017 9:37 AM
Source file <RADUTL.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 |
|---|---|---|
| DEL(Y) | ;delete the top level record from file 70.3
|
|
| UPCT(RAX,RAII,RAIEN) | ;update the CT sub-file 70.31
|
|
| EDTFL(RAP,RAQ,RAR,RAS,RAIENS) | ;edit fluoroscopy specific data
|
|
| FIND(RADFN,RADTE,RACN) | ;find the record in file 70.3
|
|
| NEW(RADFN,RADTE,RACN) | ;create a radiation absorbtion dose (RAD) record
|
|
| RADPTR(RADFN,RADTI,RACNI,Y) | ;file/delete the pointer value from 70.3 from
|
|
| II(X) | ;check the data integrity of the Irradiation Instance UID (IIUID).
|
|
| GETDOSE | ;call the Imaging API which returns radiation dose data for a study
; RADFN, RADTI & RACNI exist ; RAY2, RAY3 & RAIT set in RAORDC ; $P(RAY3,U) = case # |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^RAD("ARAD" | FIND+7 |
| ^RADPT - [#70] | GETDOSE+19 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| D | GETDOSE+4~, GETDOSE+24*, GETDOSE+37, GETDOSE+38, GETDOSE+42, GETDOSE+43, GETDOSE+44, GETDOSE+78, GETDOSE+79, GETDOSE+81 , GETDOSE+82, GETDOSE+84 |
| DIERR | DEL+3~, UPCT+8, EDTFL+11~, NEW+7~, RADPTR+9~ |
| FLD | GETDOSE+4~ |
| I | GETDOSE+4~, GETDOSE+53! |
| II | GETDOSE+4~, GETDOSE+38*, GETDOSE+39, GETDOSE+42, GETDOSE+43, GETDOSE+44, GETDOSE+53! |
| P | GETDOSE+4~ |
| Q | GETDOSE+4~ |
| RACCNUM | GETDOSE+4~, GETDOSE+7*, GETDOSE+8*, GETDOSE+12 |
| RACN | FIND~, FIND+7, NEW~, NEW+9 |
| RACNI | RADPTR~, RADPTR+9, GETDOSE+19, GETDOSE+94 |
| RADFN | FIND~, FIND+7, NEW~, NEW+8, RADPTR~, RADPTR+9, GETDOSE+12, GETDOSE+19, GETDOSE+21, GETDOSE+94 |
| RADOSE | GETDOSE+4~, GETDOSE+19*, GETDOSE+21*, GETDOSE+51, GETDOSE+87, GETDOSE+94 |
| RADTE | FIND~, FIND+7, NEW~, NEW+9, GETDOSE+17*, GETDOSE+21 |
| RADTI | RADPTR~, RADPTR+9, GETDOSE+17, GETDOSE+19, GETDOSE+94 |
| RAFDA | DEL+3~, UPCT+5~, UPCT+13!, EDTFL+11~, NEW+7~, RADPTR+9~ |
| RAFDA( | DEL+4*, UPCT+6*, UPCT+15*, EDTFL+13*, EDTFL+14*, EDTFL+15*, EDTFL+16*, NEW+8*, NEW+9*, RADPTR+10* |
| RAH | UPCT+5~, UPCT+9*, UPCT+10, UPCT+13*, UPCT+14*, UPCT+15 |
| RAI | GETDOSE+34*, GETDOSE+35*, GETDOSE+36, GETDOSE+53!, GETDOSE+75*, GETDOSE+76*, GETDOSE+77, GETDOSE+88! |
| RAIEN | DEL+3~, DEL+4*, UPCT~, UPCT+5, UPCT+10, GETDOSE+4~ |
| RAIEN703 | NEW+7~, NEW+11*, NEW+12 |
| RAIEN703(1 | NEW+11 |
| RAIENS | UPCT+5~, UPCT+10*, UPCT+15, EDTFL~, EDTFL+12*, EDTFL+13, EDTFL+14, EDTFL+15, EDTFL+16, RADPTR+9~* , RADPTR+10 |
| RAII | UPCT~, UPCT+6, UPCT+14, UPCT+15, GETDOSE+4~, GETDOSE+49*, GETDOSE+50*, GETDOSE+51, GETDOSE+53! |
| >> RAIT | GETDOSE+12, GETDOSE+33 |
| RAP | EDTFL~, EDTFL+13 |
| RAQ | EDTFL~, EDTFL+14, GETDOSE+4~, GETDOSE+34!, GETDOSE+51, GETDOSE+53! |
| RAQ( | GETDOSE+39*, GETDOSE+42*, GETDOSE+43*, GETDOSE+44*, GETDOSE+50 |
| RAR | EDTFL~, EDTFL+15 |
| RARY | GETDOSE+4~, GETDOSE+12, GETDOSE+49!, GETDOSE+87! |
| RARY( | GETDOSE+35, GETDOSE+36, GETDOSE+76, GETDOSE+77 |
| RARY(0 | GETDOSE+34, GETDOSE+75 |
| RARY(1 | GETDOSE+13, GETDOSE+14 |
| RAS | EDTFL~, EDTFL+16 |
| RAX | UPCT~ |
| RAX( | UPCT+14, UPCT+15 |
| RAXX | UPCT+5~*, UPCT+6 |
| RAY | UPCT+5~ |
| RAY(1 | UPCT+9 |
| >> RAY2 | GETDOSE+8 |
| >> RAY3 | GETDOSE+7, GETDOSE+8, GETDOSE+21 |
| T | GETDOSE+70*, GETDOSE+78*, GETDOSE+79*, GETDOSE+81*, GETDOSE+82*, GETDOSE+84*, GETDOSE+87, GETDOSE+88! |
| U | GETDOSE+7, GETDOSE+8, GETDOSE+19, GETDOSE+21, GETDOSE+78, GETDOSE+79, GETDOSE+81, GETDOSE+82, GETDOSE+84, GETDOSE+87 |
| X | II~, II+17, GETDOSE+4~, GETDOSE+36*, GETDOSE+37, GETDOSE+38, GETDOSE+42, GETDOSE+43, GETDOSE+44, GETDOSE+53! , GETDOSE+77*, GETDOSE+78, GETDOSE+79, GETDOSE+81, GETDOSE+82, GETDOSE+84, GETDOSE+88! |
| Y | DEL~, DEL+4, RADPTR~, RADPTR+10 |
