MAGDQR11 ;WOIFO/MLH - UID logic for C-FIND - process rad entries from old DB structure ; 25 Jan 2012 11:43 AM
Source file <MAGDQR11.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 |
---|---|---|
ACCSIDRA(IARRAY,P,PAT,SSN,UID,MAGD0,MAGD1,MAGD2) | ; Radiology images (old DB structure) case - called from ACCSID^MAGDQR10
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^MAG(2005 - [#2005] | ACCSIDRA+11, ACCSIDRA+12 |
^RADPT - [#70] | ACCSIDRA+5 |
^RARPT - [#74] | ACCSIDRA+6, ACCSIDRA+7 |
^TMP("MAG" | ACCSIDRA+3, ACCSIDRA+8, ACCSIDRA+13 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
IARRAY | ACCSIDRA~ |
IARRAY( | ACCSIDRA+8*, ACCSIDRA+10*, ACCSIDRA+13*, ACCSIDRA+15* |
MAGD0 | ACCSIDRA~, ACCSIDRA+2*, ACCSIDRA+3, ACCSIDRA+5 |
MAGD1 | ACCSIDRA~, ACCSIDRA+2*, ACCSIDRA+5 |
MAGD2 | ACCSIDRA~, ACCSIDRA+2*, ACCSIDRA+5 |
OK | ACCSIDRA+1~, ACCSIDRA+4*, ACCSIDRA+6, ACCSIDRA+8*, ACCSIDRA+11, ACCSIDRA+13*, ACCSIDRA+15* |
P | ACCSIDRA~, ACCSIDRA+2 |
P1 | ACCSIDRA+1~, ACCSIDRA+6*, ACCSIDRA+7 |
P2 | ACCSIDRA+1~, ACCSIDRA+7*, ACCSIDRA+8, ACCSIDRA+10, ACCSIDRA+11, ACCSIDRA+12 |
P3 | ACCSIDRA+1~, ACCSIDRA+11*, ACCSIDRA+12 |
P4 | ACCSIDRA+1~, ACCSIDRA+12*, ACCSIDRA+13, ACCSIDRA+15 |
PAT | ACCSIDRA~, ACCSIDRA+3 |
SSN | ACCSIDRA~, ACCSIDRA+3 |
UID | ACCSIDRA~, ACCSIDRA+8, ACCSIDRA+10, ACCSIDRA+13, ACCSIDRA+15 |
V | ACCSIDRA+1~, ACCSIDRA+5*, ACCSIDRA+6, ACCSIDRA+7 |