MAGGTIA1 ;WOIFO/GEK/SG/NST - RPC Call to Add Image File entry ; Dec 05, 2018@1:42pm
Source file <MAGGTIA1.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 |
|---|---|---|
| ADD | ;Now call Fileman to file the data
|
|
| C1 | ; we jump here if we already had a Filename sent
|
|
| CLEAN | ;
|
|
| RTRNERR(ETXT) | ; There was error from UPDATE^DIE quit with error text
|
|
| ERR | ; Error trap
|
|
| MAKENAME() | ; MAGGFDA exists so get info from that.
; We'll make NAME (.01) with PATIENT NAME SSN ; DOCUMENT Imaging was making name of ; $E(PATENT NAME,1,10)' '$E(DESC CATEG,1,9)' 'MM/DD/YY (DOC DATE) |
| Name | Field # of Occurrence |
|---|---|
| $$EC^%ZOSV | ERR+1 |
| UPDATE^DIE | ADD+12, ADD+18, ADD+47, ADD+61 |
| ^DIK | ADD+56, ADD+65 |
| CLEAN^DILF | CLEAN+1 |
| $$ABSTRACT^MAGBAPI | C1+38 |
| $$JUKEBOX^MAGBAPI | C1+40 |
| $$DA2PLC^MAGBAPIP | C1+38, C1+40 |
| $$DIRHASH^MAGFILEB | C1+50 |
| $$NEWIEN^MAGGI12 | ADD+17 |
| $$VALINDEX^MAGGSIV1 | C1+25 |
| ACTION^MAGGTAU | ADD+15, ADD+27, C1+12, C1+27 |
| $$DA2NAME^MAGGTU1 | ADD+54 |
| ENTRY^MAGLOG | C1+13, C1+28 |
| NWI2005^MAGNWRK1 | C1+60 |
| GENIEN^MAGXCVI | C1+8, C1+19 |
| FileNo | Call Tags |
|---|---|
| ^MAG(2005 - [#2005] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("ERRTN" | ERR+2 |
| ^DPT - [#2] | MAKENAME+11 |
| ^MAG(2005 - [#2005] | ADD+7*, ADD+15, ADD+34*, C1+6, C1+9*, C1+12, C1+13, C1+16, C1+18, C1+26* , C1+27, C1+28, CLEAN+2 |
| ^MAG(2005.1 - [#2005.1] | ADD+7 |
| ^MAGIXCVT(2006.96 - [#2006.96] | C1+10* |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | ADD+56*, ADD+57!, ADD+65*, ADD+66! |
| DIC | ADD+57!, ADD+66! |
| >> DIERR | ADD+22, ADD+63 |
| DIK | ADD+56*, ADD+57!, ADD+65*, ADD+66! |
| DUZ | C1+13, C1+28 |
| ETXT | RTRNERR~, RTRNERR+1* |
| INDXD | C1+7~, C1+8, C1+9, C1+17~, C1+19, C1+21*, C1+23 |
| J | C1+17~, C1+23* |
| >> MAGBIG | C1+53 |
| >> MAGDCMIN | ADD+46 |
| >> MAGDCMSN | ADD+45 |
| >> MAGDHASH | C1+50*, C1+51, C1+55 |
| >> MAGERR | ADD+20, ADD+21*, ADD+22, ADD+54, ADD+55*, ADD+63, ADD+64 |
| >> MAGGABS | C1+38 |
| MAGGDA | ADD+1~, ADD+25*, ADD+27, ADD+33, ADD+34, ADD+43, ADD+54, ADD+56, ADD+59, ADD+65 , C1+6, C1+8, C1+9, C1+10, C1+12, C1+13, C1+16, C1+18, C1+19, C1+26 , C1+27, C1+28, C1+38, C1+40, C1+51, C1+60 |
| >> MAGGDRV | C1+51, C1+55 |
| >> MAGGEXT | ADD+54 |
| MAGGFDA | ADD+41!, ADD+53!, C1+1! |
| MAGGFDA( | ADD+43*, ADD+45*, ADD+46* |
| MAGGFDA(2005 | ADD+27, ADD+37, ADD+52, ADD+60*, MAKENAME+8, MAKENAME+9, MAKENAME+10 |
| >> MAGGFNM | ADD+52*, ADD+59*, ADD+60, C1+50, C1+51, C1+54 |
| >> MAGGIEN(1 | ADD+17*, ADD+20, ADD+25 |
| >> MAGGJB | C1+40 |
| >> MAGGR | ADD+33, C1+49 |
| >> MAGGR( | ADD+34 |
| >> MAGGXE("DIERR" | RTRNERR+1 |
| >> MAGMOD | ADD+11, ADD+15 |
| MAGOUT | C1+59~, C1+60 |
| >> MAGREF | C1+50 |
| >> MAGRY | ADD+13*, ADD+20*, ADD+33*, ADD+54*, ADD+63*, C1+51*, C1+55*, ERR+1* |
| N40 | C1+17~, C1+18*, C1+23*, C1+25*, C1+26 |
| NEWIEN | ADD+1~, ADD+17*, CLEAN+2 |
| OLD40 | C1+17~, C1+18*, C1+25 |
| U | ADD+7, ADD+15, ADD+33, ADD+34, ADD+59, C1+51, C1+55, MAKENAME+11 |
| X | ADD+1~, ADD+37*, ADD+42, ADD+54*, ADD+55, ADD+59, C1+25, C1+38*, C1+40*, C1+54* , C1+55, MAKENAME+10*, MAKENAME+11 |
| Y | ADD+1~, ADD+42*, ADD+43, ADD+45, ADD+46, ADD+59*, ADD+60 |
| Z | ADD+33*, ADD+34*, MAKENAME+4~, MAKENAME+16*, MAKENAME+17*, MAKENAME+18 |
| ZDESC | MAKENAME+4~, MAKENAME+8*, MAKENAME+17 |
| ZNAME | MAKENAME+4~, MAKENAME+11*, MAKENAME+16 |
| ZSSN | MAKENAME+4~, MAKENAME+11*, MAKENAME+16 |
| ZT | MAKENAME+4~ |
