MAGGSIA1 ;WOIFO/GEK/SG/NST - RPC Call to Add Image File entry ; 01 Nov 2010 2:08 PM
Source file <MAGGSIA1.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 |
|---|---|---|
| PRE(MAGERR,MAGGFDA,MAGGRP,MAGGDRV,MAGREF) | ;
; Check on some possible problems: required fields etc. ; Object Type and (Patient, or Short Desc) Required. |
|
| PATCHK(MAGR) | ; This uses the FDA Array and checks the Imaging Patient against the Procedure patient
|
|
| OBJTYPE | ; This call uses the EXT and computes an Object Type
|
|
| ISTYPADM(TYPE) | ; Returns 1 if this is an Admin Type
|
|
| PROCTEXT | ;This call uses flds 16 and 17 to compute fld #6 PROCEDURE TEXT [8F]
; We are here because fld #6 PROCEDURE [8F] is null. ; If a pointer to a package is in the data, (flds 16 and 17) ; get fld #6 from that , if not then treat it as an UNASSIGNED image ; i.e. Category UNASSIGNED. |
|
| CHKRSND | ;
|
| Name | Field # of Occurrence |
|---|---|
| UPDATE^DIE | PRE+85 |
| $$GET1^DIQ | PRE+21, PRE+22, ISTYPADM+3 |
| DATA^MAGGNTI | PATCHK+9, PROCTEXT+10 |
| $$MAKENAME^MAGGSIU1 | PRE+43 |
| MAKECLAS^MAGGSIU1 | PRE+23 |
| MAKEORIG^MAGGSIU1 | PRE+28 |
| MAKEPKG^MAGGSIU1 | PRE+26 |
| MAKEPROC^MAGGSIU1 | PRE+27 |
| GETIAPID^MAGGSIUI | CHKRSND+3 |
| $$DRIVE^MAGGTU1 | PRE+56 |
| $$NOW^XLFDT | PRE+36, PRE+38 |
| FileNo | Call Tags |
|---|---|
| ^MAG(2005.83 - [#2005.83] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^MAG(2005 - [#2005] | PRE+91*, PROCTEXT+23 |
| ^MAG(2005.02 - [#2005.02] | OBJTYPE+3 |
| ^MAG(2005.1 - [#2005.1] | PRE+91 |
| ^MAG(2005.81 - [#2005.81] | PROCTEXT+19, PROCTEXT+26 |
| ^MAG(2006.04 - [#2006.04] | PRE+73, PRE+75 |
| ^TIU(8925 - [#8925] | PATCHK+8 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CL | ISTYPADM+1~, ISTYPADM+3*, ISTYPADM+4 |
| DUZ | PRE+44 |
| IDATA | CHKRSND+1~, CHKRSND+3 |
| IDATA( | CHKRSND+19, CHKRSND+20, CHKRSND+21 |
| IDATA("ACTION" | CHKRSND+14 |
| IDATA(110 | CHKRSND+18 |
| IDATA(6 | CHKRSND+17 |
| >> MAGACT("ABS" | PRE+65 |
| >> MAGACT("ACQD" | PRE+70, PRE+72, PRE+73, PRE+75, PRE+80 |
| >> MAGACT("ACQL" | PRE+67, PRE+82 |
| >> MAGACT("ACQS" | PRE+46, PRE+48, PRE+81, PRE+82 |
| >> MAGACT("BIG" | PRE+63 |
| >> MAGACT("EXT" | OBJTYPE+2, OBJTYPE+3 |
| >> MAGACT("WRITE" | PRE+53 |
| MAGDFDA | PRE+79~ |
| MAGDFDA( | PRE+80*, PRE+81*, PRE+82* |
| MAGDFN | PATCHK+2~, PATCHK+6*, PATCHK+10 |
| MAGDIEN | PRE+79~ |
| MAGDIEN(1 | PRE+86 |
| MAGDXE | PRE+79~ |
| MAGERR | PRE~, PRE+13*, PRE+15*, PRE+17*, PRE+21, PRE+22*, PRE+23, PRE+24, PRE+25*, PRE+26 , PRE+27, PRE+28, PRE+50, PRE+57* |
| MAGGDRV | PRE~, PRE+58* |
| MAGGFDA | PRE~, PRE+43 |
| MAGGFDA(2005 | PRE+8*, PRE+11*, PRE+12, PRE+13, PRE+14, PRE+20, PRE+21, PRE+22, PRE+23, PRE+24 , PRE+26, PRE+27, PRE+28, PRE+31, PRE+34, PRE+35*, PRE+36*, PRE+38*, PRE+41*, PRE+43* , PRE+44*, PRE+48*, PRE+53, PRE+56, PRE+59*, PRE+63*, PRE+65*, PRE+67*, PRE+72*, PRE+75* , PRE+81, PRE+82, PRE+86*, PATCHK+3, PATCHK+4, PATCHK+6, OBJTYPE+7*, PROCTEXT+6, PROCTEXT+7, PROCTEXT+11* , PROCTEXT+15*, PROCTEXT+18, PROCTEXT+19*, PROCTEXT+22, PROCTEXT+23*, PROCTEXT+26*, PROCTEXT+27*, CHKRSND+2, CHKRSND+17*, CHKRSND+18* , CHKRSND+19*, CHKRSND+20*, CHKRSND+21* |
| MAGGRP | PRE~, PRE+50 |
| MAGR | PATCHK~, PATCHK+5*, PATCHK+8*, PATCHK+10*, PATCHK+11* |
| MAGREF | PRE~, PRE+64* |
| MAGRSLT | PRE+3~, PRE+17 |
| >> MAGRY | PRE+21*, PRE+23*, PRE+24*, PRE+26*, PRE+27*, PRE+28* |
| MAGY | PATCHK+2~, PATCHK+9, PATCHK+10 |
| MAGYPX | PROCTEXT+5~, PROCTEXT+10, PROCTEXT+11 |
| MTYPE | OBJTYPE+1~, OBJTYPE+3*, OBJTYPE+6*, OBJTYPE+7 |
| PARENT | PROCTEXT+5~, PROCTEXT+6*, PROCTEXT+9, PROCTEXT+15 |
| PARIEN | PROCTEXT+5~, PROCTEXT+7*, PROCTEXT+9, PROCTEXT+10 |
| PX | PATCHK+2~, PATCHK+3*, PATCHK+5, PATCHK+7 |
| PXDA | PATCHK+2~, PATCHK+4*, PATCHK+8, PATCHK+9 |
| PXDESC | PROCTEXT+5~ |
| TRKID | CHKRSND+1~, CHKRSND+2*, CHKRSND+3 |
| TYPE | ISTYPADM~, ISTYPADM+2, ISTYPADM+3 |
| U | PRE+58, PRE+91, PATCHK+10, PROCTEXT+11, PROCTEXT+19, PROCTEXT+23 |
| X | PRE+3~, PRE+53*, PRE+56 |
| Z | PRE+3~, PRE+56*, PRE+57, PRE+58, PRE+59, PRE+63, PRE+64, PRE+65 |
