MAGGSIM ;WOIFO/GEK - Call to Modify Image File entry ; [ 12/27/2000 10:49 ]
Source file <MAGGSIM.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 |
|---|---|---|
| MOD(MAGRY,MAGARRAY) | ; RPC Call to UPDATE^DIE to Add an Image File entry
; Parameters : ; MAGARRAY - array of field numbers and their entries ; i.e. MAGARRAY(1)=".5^38" field# .5 data is 38 ; If Long Description is included in array (field 11), we create a new ; array to hold the text, and pass that to UPDATE^DIE ; If this entry is an Image Group ; i.e. MAGARRAY(n)="2005.04^344" ; (the field 2005.04 is the OBJECT GROUP MULTIPLE) ; ( 344 is the pointer to the Image File Entry that will be added ; ( as a member of this new/existing Group) |
|
| UPDPAR(MAGERR,MAGRPDA,MAGACT,MAGGDA) | ;
; We're here beceause this image is a member of a Group ; so we will modify the Group Parent, adding this to it's group ; HERE we will also send the 'Series Number' and 'Image Number' if ; they exist; |
|
| UPDCHLD(MAGCHLD,MAGGDA) | ;
|
|
| RTRNERR(ETXT) | ; There was error from FILE^DIE quit with error text
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^MAG(2005 - [#2005] | UPDCHLD+3* |
| Name | Line Occurrences |
|---|---|
| RTRNERR | MOD+51, UPDPAR+13 |
| UPDCHLD | MOD+63 |
| UPDPAR | MOD+66 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> DIERR | MOD+50, UPDPAR+13 |
| ETXT | RTRNERR~, RTRNERR+1* |
| GRPCT | MOD+17~, MOD+30* |
| I | MOD+23~ |
| J | MOD+23~ |
| MAGACT | MOD+20~, MOD+37, MOD+66, UPDPAR~ |
| MAGACT("DICOMIN" | UPDPAR+10 |
| MAGACT("DICOMSN" | UPDPAR+9 |
| MAGACT("IEN" | MOD+39, MOD+43, MOD+55, MOD+63, MOD+66 |
| MAGARRAY | MOD~, MOD+27, MOD+33, MOD+37 |
| MAGCHLD | MOD+17~, MOD+37, MOD+63, UPDCHLD~ |
| MAGCHLD( | UPDCHLD+2 |
| MAGDHASH | MOD+19~ |
| MAGERR | MOD+18~, MOD+30*, MOD+50, MOD+51, MOD+65, MOD+66, UPDPAR~, UPDPAR+13 |
| MAGFDA | UPDPAR+5~ |
| MAGFDA( | UPDPAR+7*, UPDPAR+9*, UPDPAR+10* |
| MAGGDA | MOD+17~, UPDPAR~, UPDPAR+7, UPDCHLD~, UPDCHLD+3 |
| MAGGDAT | MOD+18~ |
| MAGGDRV | MOD+17~ |
| MAGGFDA | MOD+17~, MOD+37, MOD+44!, MOD+45* |
| MAGGFDA(2005 | MOD+41, MOD+44, MOD+55, MOD+65, MOD+66 |
| MAGGFLD | MOD+18~ |
| MAGGFNM | MOD+17~ |
| MAGGIEN | MOD+22~ |
| MAGGRP | MOD+17~, MOD+30*, MOD+37, MOD+63 |
| MAGGWP | MOD+18~, MOD+37 |
| MAGGXE | MOD+22~ |
| MAGGXE("DIERR" | RTRNERR+1 |
| MAGREF | MOD+19~ |
| MAGRPDA | UPDPAR~, UPDPAR+6 |
| MAGRY | MOD~, MOD+27*, MOD+29*, MOD+33*, MOD+39*, MOD+41*, MOD+50*, MOD+63*, MOD+65* |
| MAGTEMP | MOD+19~, MOD+21~, MOD+45! |
| MAGTEMP(2005 | MOD+44* |
| MAGVY | MOD+20~, MOD+33 |
| MAGVY(0 | MOD+33 |
| TEMPIEN | MOD+21~, MOD+43*, MOD+44 |
| U | UPDCHLD+3 |
| WPCT | MOD+18~, MOD+30* |
| X | MOD+23~ |
| Y | MOD+23~, UPDPAR+6*, UPDPAR+7, UPDPAR+9, UPDPAR+10 |
| Z | MOD+23~, UPDCHLD+1*, UPDCHLD+2*, UPDCHLD+3 |
