MAGDIR9E ;WOIFO/PMK - Read a DICOM image file ; Feb 15, 2022@09:34:42
Source file <MAGDIR9E.m>
| Package | Total | Call Graph |
|---|---|---|
| Imaging | 8 | ($$ACQDEV,$$EQUIVGRP)^MAGDFCNV $$TIULAST^MAGDGMRC $$MWLFIND^MAGDHOW1 NEWGROUP^MAGDIR9A $$TIUXLINK^MAGDIR9E (BADERROR,MISMATCH,TIUMISS,TIUMISS2,TMPMISS)^MAGDIRVE ADD^MAGDTR03 $$FIELD43^MAGXMA |
| Kernel | 1 | $$NOW^XLFDT |
| Text Integration Utility | 1 | PUTIMAGE^TIUSRVPL |
| VA FileMan | 1 | $$GET1^DIQ |
| 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 |
|---|---|---|
| GROUP() | ; entry point from ^MAGDIR8 for consult/procedure groups
|
|
| IMAGEIDX(ISPECIDX,IPROCIDX,FILEDATA) | ; set image index for specialty and procedure
|
|
| TIUXLINK() | ; create the cross-linkages to TIU EXTERNAL DATA LINK file
|
| Name | Field # of Occurrence |
|---|---|
| $$GET1^DIQ | GROUP+53, GROUP+130 |
| $$ACQDEV^MAGDFCNV | GROUP+21 |
| $$EQUIVGRP^MAGDFCNV | GROUP+67 |
| $$TIULAST^MAGDGMRC | GROUP+31 |
| $$MWLFIND^MAGDHOW1 | GROUP+137 |
| NEWGROUP^MAGDIR9A | GROUP+160 |
| $$TIUXLINK^MAGDIR9E | GROUP+163 |
| BADERROR^MAGDIRVE | TIUXLINK+11 |
| MISMATCH^MAGDIRVE | GROUP+57, GROUP+94 |
| TIUMISS^MAGDIRVE | GROUP+39 |
| TIUMISS2^MAGDIRVE | GROUP+74 |
| TMPMISS^MAGDIRVE | GROUP+108 |
| ADD^MAGDTR03 | GROUP+124 |
| $$FIELD43^MAGXMA | GROUP+153 |
| PUTIMAGE^TIUSRVPL | TIUXLINK+2 |
| $$NOW^XLFDT | GROUP+17 |
| FileNo | Call Tags |
|---|---|
| ^GMR(123 - [#123] | GET1^DIQ |
| ^TIU(8925.91 - [#8925.91] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^MAG(2005 - [#2005] | GROUP+55, GROUP+60, GROUP+64, GROUP+65, GROUP+69, GROUP+92, GROUP+98, GROUP+103, TIUXLINK+5* |
| ^MAG(2005.84 - [#2005.84] | IMAGEIDX+6 |
| ^MAG(2005.85 - [#2005.85] | IMAGEIDX+12 |
| ^MAG(2006.532 - [#2006.532] | GROUP+24 |
| ^MAG(2006.5831 - [#2006.5831] | GROUP+139 |
| ^MAG(2006.5839 - [#2006.5839] | GROUP+88, GROUP+90, GROUP+166, GROUP+167, GROUP+168*, GROUP+170, GROUP+171*, GROUP+172, GROUP+173*, GROUP+174* |
| ^MAG(2006.5849 - [#2006.5849] | GROUP+145, GROUP+147 |
| ^TIU(8925 - [#8925] | GROUP+37 |
| ^TIU(8925.91 - [#8925.91] | GROUP+48 |
| Name | Line Occurrences |
|---|---|
| $$IMAGEIDX | GROUP+141, GROUP+149 |
| Name | Field # of Occurrence |
|---|---|
| ^(0 | GROUP+171* |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ACQDEVP | GROUP+1~, GROUP+21*, GROUP+22, GROUP+98 |
| D0 | GROUP+2~, GROUP+170*, GROUP+171, GROUP+173, GROUP+174 |
| >> DATETIME | GROUP+15*, GROUP+17* |
| >> DFN | GROUP+38, GROUP+39, GROUP+56, GROUP+57, GROUP+93, GROUP+94 |
| DONE | GROUP+132~, GROUP+138, GROUP+141*, GROUP+146, GROUP+149* |
| ERRCODE | GROUP+3~, GROUP+12*, GROUP+32, GROUP+40*, GROUP+48, GROUP+58*, GROUP+75*, GROUP+82, GROUP+88, GROUP+96* , GROUP+109*, GROUP+159, GROUP+160, GROUP+162, GROUP+163*, TIUXLINK+7, TIUXLINK+12* |
| FILEDATA | GROUP+141, GROUP+149, IMAGEIDX~ |
| FILEDATA("ACQ | UISITION DEVICE" , GROUP+22* |
| FILEDATA("MODALITY" | GROUP+120*, GROUP+153 |
| FILEDATA("PACKAGE" | GROUP+121* |
| FILEDATA("PAR | ENT FILE PTR" , GROUP+72*, GROUP+106*, TIUXLINK+4*, ENT FILE" , GROUP+43*, GROUP+70*, GROUP+104*, GROUP+107, GROUP+108 , GROUP+115*, GROUP+162, GROUP+165, ENT IEN" , GROUP+44*, GROUP+71*, GROUP+73, GROUP+74, GROUP+105*, GROUP+116* |
| FILEDATA("PROC/EVENT" | GROUP+126*, GROUP+154*, IMAGEIDX+11, IMAGEIDX+13* |
| FILEDATA("SHO | RT DESCRIPTION" , GROUP+179* |
| FILEDATA("SOP | CLASS POINTER" , GROUP+25* |
| FILEDATA("SPEC/SUBSPEC" | GROUP+126*, IMAGEIDX+5, IMAGEIDX+7* |
| >> GMRCIEN | GROUP+31, GROUP+88, GROUP+116, GROUP+124, GROUP+130, GROUP+137, GROUP+145, GROUP+173, GROUP+174 |
| GROUP | GROUP+4~ |
| GROUPDFN | GROUP+50~, GROUP+55*, GROUP+56, GROUP+89~, GROUP+92*, GROUP+93 |
| HIT | GROUP+34~, GROUP+47*, GROUP+48, GROUP+69* |
| >> IMAGNAME | GROUP+179 |
| >> INSTLOC | GROUP+21 |
| IPROCIDX | IMAGEIDX~, IMAGEIDX+12, IMAGEIDX+13 |
| IPROCIDX1 | GROUP+132~, GROUP+134*, GROUP+140*, GROUP+141 |
| IPROCIDX2 | GROUP+132~, GROUP+134*, GROUP+148*, GROUP+149 |
| ISPECIDX | IMAGEIDX~, IMAGEIDX+6, IMAGEIDX+7 |
| ISPECIDX1 | GROUP+132~, GROUP+134*, GROUP+140*, GROUP+141, GROUP+153 |
| ISPECIDX2 | GROUP+132~, GROUP+134*, GROUP+148*, GROUP+149 |
| MAG2 | GROUP+49~, GROUP+69*, GROUP+70, GROUP+71, GROUP+72, GROUP+102~, GROUP+103*, GROUP+104, GROUP+105, GROUP+106 |
| >> MAGGP | GROUP+27*, GROUP+53*, GROUP+55, GROUP+57, GROUP+60, GROUP+61*, GROUP+64*, GROUP+65, GROUP+67*, GROUP+69 , GROUP+74, GROUP+90*, GROUP+92, GROUP+94, GROUP+95*, GROUP+98, GROUP+99*, GROUP+103, GROUP+108, GROUP+114 , GROUP+159, GROUP+173, TIUXLINK+2, TIUXLINK+5 |
| MAGGPP | GROUP+5~, GROUP+87*, GROUP+88*, GROUP+90 |
| >> MFGR | GROUP+21 |
| >> MODALITY | GROUP+120 |
| >> MODEL | GROUP+21 |
| MSG | TIUXLINK+8!, TIUXLINK+11 |
| MSG(1 | TIUXLINK+9* |
| MSG(2 | TIUXLINK+10* |
| MWLCONFIG | GROUP+132~, GROUP+137*, GROUP+138, GROUP+139 |
| NFIELDS | IMAGEIDX+1~, IMAGEIDX+3*, IMAGEIDX+5*, IMAGEIDX+8*, IMAGEIDX+11*, IMAGEIDX+14*, IMAGEIDX+18 |
| P | GROUP+6~, GROUP+65*, GROUP+67, GROUP+98* |
| RESULT | GROUP+7~, GROUP+124 |
| SERVICE | GROUP+8~, GROUP+130*, GROUP+131, GROUP+137 |
| SOPCLASP | GROUP+9~, GROUP+24*, GROUP+25, GROUP+67 |
| >> SOPCLASS | GROUP+24 |
| >> STUDYDAT | GROUP+14, GROUP+15 |
| >> STUDYTIM | GROUP+14, GROUP+15 |
| >> STUDYUID | GROUP+64 |
| TIUDFN | GROUP+35~, GROUP+37*, GROUP+38, GROUP+39 |
| TIUIEN | GROUP+10~, GROUP+31*, GROUP+32, GROUP+37, GROUP+39, GROUP+44, GROUP+48, GROUP+73, GROUP+74, TIUXLINK+2 |
| TIUXDIEN | GROUP+36~, GROUP+47*, GROUP+48*, GROUP+53, GROUP+74, TIUXLINK+1~, TIUXLINK+2, TIUXLINK+3, TIUXLINK+4, TIUXLINK+5 , TIUXLINK+10 |
| UNREAD | GROUP+132~, GROUP+145*, GROUP+146, GROUP+147 |
| X | GROUP+132~, GROUP+139*, GROUP+140, GROUP+147*, GROUP+148, GROUP+153*, GROUP+154 |
| Y | GROUP+132~, GROUP+153, GROUP+154 |
| Name | Field # of Occurrence |
|---|---|
| $T( | GROUP+39, GROUP+57, GROUP+74, GROUP+94, GROUP+108, TIUXLINK+11 |
