RASETU ;HISC/DAD-Determine Order Status for an Exam Set ;6/17/97 11:17
Source file <RASETU.m>
| Package | Total | Caller Graph | 
|---|---|---|
| Radiology Nuclear Medicine | 3 | RAKRDIT RAORDC RAORDU | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| EN1(RAOIFN,RADFN) | ; | |
| PARNT(RAOIFN,RADFN) | ; Based on the patient and the order number, determine ; if the exams are part of an exam set. ; Input: 'RAOIFN' -> Order # 'RADFN' -> Patient ien ; Output: $S(Exam Set:1,1:0) | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^RA(72 - [#72] | EN1+24 | 
| ^RADPT - [#70] | EN1+23, PARNT+8 | 
| ^RADPT("AO" | EN1+1, EN1+19, EN1+21, PARNT+5, PARNT+7 | 
| ^RAO(75.1 - [#75.1] | EN1+10 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| RACNI | EN1+7, EN1+9~, EN1+20*, EN1+21*, EN1+22, EN1+23 | 
| RACNISAV | EN1+7~*, EN1+22 | 
| >> RADELFLG | EN1+22 | 
| RADFN | EN1~, EN1+1, EN1+19, EN1+21, EN1+23, PARNT~, PARNT+5, PARNT+7, PARNT+8 | 
| RADTI | EN1+9~, EN1+18*, EN1+19*, EN1+21, EN1+23, PARNT+6~, PARNT+7*, PARNT+8 | 
| RAOIFN | EN1~, EN1+1, EN1+10, EN1+19, EN1+21, PARNT~, PARNT+5, PARNT+7 | 
| RAORDER | EN1+9~, EN1+10*, EN1+11, EN1+12, EN1+13 | 
| RAPROC | EN1+9~, EN1+12* | 
| RARXM | PARNT+6~ | 
| RARXM(0 | PARNT+8*, PARNT+9 | 
| RASTATUS | EN1+9~, EN1+23*, EN1+24 | 
| RASTATUS("MAX" | EN1+14*, EN1+25*, EN1+32 | 
| RASTATUS("MIN" | EN1+15*, EN1+26, EN1+27*, EN1+32 | 
| RASTATUS("NUL" | EN1+16*, EN1+29*, EN1+32 | 
| RASTATUS("ORD" | EN1+13* | 
| RASTATUS(0 | EN1+24*, EN1+25, EN1+26, EN1+27, EN1+29 | 
| U | EN1+12, EN1+13, EN1+23, EN1+24 |