RASETU ;HISC/DAD-Determine Order Status for an Exam Set ;11 Apr 2018 12:07 PM
Source file <RASETU.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 |
|---|---|---|
| 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+35 |
| ^RADPT - [#70] | EN1+34, PARNT+8 |
| ^RADPT("AO" | EN1+1, EN1+27, EN1+29, PARNT+5, PARNT+7 |
| ^RAO(75.1 - [#75.1] | EN1+18 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> RACAN124 | EN1+33 |
| RACNI | EN1+15, EN1+17~, EN1+28*, EN1+29*, EN1+30, EN1+33, EN1+34 |
| RACNISAV | EN1+15~*, EN1+30, EN1+33 |
| >> RADELFLG | EN1+30 |
| RADFN | EN1~, EN1+1, EN1+27, EN1+29, EN1+34, PARNT~, PARNT+5, PARNT+7, PARNT+8 |
| RADTI | EN1+17~, EN1+26*, EN1+27*, EN1+29, EN1+34, PARNT+6~, PARNT+7*, PARNT+8 |
| RAOIFN | EN1~, EN1+1, EN1+18, EN1+27, EN1+29, PARNT~, PARNT+5, PARNT+7 |
| RAORDER | EN1+17~, EN1+18*, EN1+19, EN1+20, EN1+21 |
| RAPROC | EN1+17~, EN1+20* |
| RARXM | PARNT+6~ |
| RARXM(0 | PARNT+8*, PARNT+9 |
| RASTATUS | EN1+17~, EN1+34*, EN1+35 |
| RASTATUS("MAX" | EN1+22*, EN1+36*, EN1+43 |
| RASTATUS("MIN" | EN1+23*, EN1+37, EN1+38*, EN1+43 |
| RASTATUS("NUL" | EN1+24*, EN1+40*, EN1+43 |
| RASTATUS("ORD" | EN1+21* |
| RASTATUS(0 | EN1+35*, EN1+36, EN1+37, EN1+38, EN1+40 |
| U | EN1+20, EN1+21, EN1+34, EN1+35 |