MAGDIR81 ;WOIFO/PMK - Read a DICOM image file ; 03 Jul 2013 9:12 AM
Source file <MAGDIR81.m>
Package | Total | Call Graph |
---|---|---|
Imaging | 9 | (ERROR,RESULT)^MAGDIR8 ($$PIDCHECK,CONLKUP,LABLKUP,RADLKUP)^MAGDIR8A ($$DELETE,STORE)^MAGDIR8R $$GROUP^MAGDIR9A $$IMAGE^MAGDIR9B $$GROUP^MAGDIR9E $$GROUP^MAGDIR9F ERROR^MAGDIRVE MOVE^MAGDLBAA |
Kernel | 1 | $$FMTE^XLFDT |
Master Patient Index VistA | 1 | ($$GETICN,GETICN)^MPIF001 |
Registration | 1 | DEM^VADPT |
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 |
---|---|---|
ENTRY | ; process one image
|
|
NEWIMAGE() | ; processing for a new image
|
|
SAVEUID(MACHID,UID) | ; record the UID of the image being processed
|
|
GETUID(MACHID) | ; lookup the UID of the last image processed
|
|
MULTFRAM | ; Handle additional images in a multiframe object
; Get the information from the first image for the additional ones |
|
LOOKUP() | ; lookup the patient/study using cross-reference
|
|
ERRCHECK(FUNCTION,ROUTINE,MSG) | ; check the return code of the function
|
Name | Field # of Occurrence |
---|---|
ERROR^MAGDIR8 | ENTRY+61, ENTRY+78, NEWIMAGE+14 |
RESULT^MAGDIR8 | ENTRY+39, ENTRY+86 |
$$PIDCHECK^MAGDIR8A | NEWIMAGE+34 |
CONLKUP^MAGDIR8A | LOOKUP+6, LOOKUP+14, LOOKUP+30 |
LABLKUP^MAGDIR8A | LOOKUP+9, LOOKUP+19, LOOKUP+25 |
RADLKUP^MAGDIR8A | LOOKUP+4, LOOKUP+16, LOOKUP+27 |
$$DELETE^MAGDIR8R | NEWIMAGE+64 |
STORE^MAGDIR8R | NEWIMAGE+45 |
$$GROUP^MAGDIR9A | NEWIMAGE+50 |
$$IMAGE^MAGDIR9B | ENTRY+76 |
$$GROUP^MAGDIR9E | NEWIMAGE+53 |
$$GROUP^MAGDIR9F | NEWIMAGE+56 |
ERROR^MAGDIRVE | NEWIMAGE+61, LOOKUP+38 |
MOVE^MAGDLBAA | NEWIMAGE+42 |
$$GETICN^MPIF001 | ENTRY+84 |
GETICN^MPIF001 | ENTRY+84 |
DEM^VADPT | MULTFRAM+32 |
$$FMTE^XLFDT | NEWIMAGE+23 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^MAG(2005 - [#2005] | ENTRY+50, NEWIMAGE+22, NEWIMAGE+24, MULTFRAM+5, MULTFRAM+6, MULTFRAM+7 |
^MAG(2005.83 - [#2005.83] | ENTRY+53 |
^MAG(2006.532 - [#2006.532] | MULTFRAM+26 |
^MAGD(2006.5715 - [#2006.5715] | SAVEUID+2, SAVEUID+3, SAVEUID+4, SAVEUID+5, SAVEUID+9*, SAVEUID+10*, SAVEUID+11*, SAVEUID+12, SAVEUID+14*, GETUID+2 , GETUID+3 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ACNUMB | ENTRY+22~, ENTRY+30*, LOOKUP+2* |
ARG2 | ENTRY+22~, ENTRY+41*, ENTRY+42, ENTRY+43, ENTRY+44, ENTRY+45, ENTRY+46, ENTRY+47 |
>> ARGS | ENTRY+26, ENTRY+27, ENTRY+28, ENTRY+29, ENTRY+30, ENTRY+31, ENTRY+32, ENTRY+33, ENTRY+34, ENTRY+35 , ENTRY+36 |
CASENUMB | ENTRY+22~, ENTRY+30*, LOOKUP+2 |
CASETEXT | NEWIMAGE+36~, NEWIMAGE+40* |
COLUMNS | NEWIMAGE+36~, NEWIMAGE+40* |
D0 | SAVEUID+1~, SAVEUID+2*, SAVEUID+4*, SAVEUID+7, SAVEUID+10, SAVEUID+11, SAVEUID+14, GETUID+1~, GETUID+2*, GETUID+3 |
>> DATETIME | MULTFRAM+12* |
>> DCMPID | MULTFRAM+9* |
DFN | ENTRY+84, MULTFRAM+10*, LOOKUP+1!, LOOKUP+5, LOOKUP+7, LOOKUP+10, LOOKUP+15, LOOKUP+17, LOOKUP+20, LOOKUP+26 , LOOKUP+28, LOOKUP+31 |
DIQUIET | MULTFRAM+3~, MULTFRAM+32* |
ENTRY+22~, ENTRY+36* | |
ERRCODE | ENTRY+58, ENTRY+59*, ENTRY+60, ENTRY+61, ENTRY+76*, ENTRY+77, ENTRY+78, NEWIMAGE+32*, NEWIMAGE+49, NEWIMAGE+50* , NEWIMAGE+52, NEWIMAGE+53*, NEWIMAGE+55, NEWIMAGE+56*, ERRCHECK+1~, ERRCHECK+2*, ERRCHECK+3, ERRCHECK+8 |
ERRORMSG | NEWIMAGE+1~, NEWIMAGE+4, NEWIMAGE+15*, NEWIMAGE+20* |
FILEDATA | ENTRY+2~ |
FILEDATA("ABSTRACT" | ENTRY+74* |
FILEDATA("ACQ | UISITION DEVICE" , MULTFRAM+24* |
FILEDATA("EXTENSION" | ENTRY+68*, ENTRY+72* |
FILEDATA("MODALITY" | MULTFRAM+13* |
FILEDATA("OBJ | ECT TYPE" , ENTRY+67*, ENTRY+71* |
FILEDATA("PACKAGE" | MULTFRAM+19* |
FILEDATA("PAR | ENT FILE PTR" , MULTFRAM+16*, ENT FILE" , MULTFRAM+14*, ENT IEN" , MULTFRAM+15* |
FILEDATA("PROC/EVENT" | MULTFRAM+22* |
FILEDATA("RAD | PROC PTR" , MULTFRAM+18*, REPORT" , MULTFRAM+17* |
FILEDATA("SOP | CLASS POINTER" , MULTFRAM+27* |
FILEDATA("SPEC/SUBSPEC" | MULTFRAM+23* |
FILEDATA("TYPE" | ENTRY+53*, MULTFRAM+21* |
FIRSTDCM | ENTRY+3~ |
FROMPATH | ENTRY+22~, ENTRY+28*, NEWIMAGE+12, NEWIMAGE+18 |
FUNCTION | ERRCHECK~, ERRCHECK+2 |
GMRCIEN | ENTRY+4~ |
I | ENTRY+20~, ENTRY+83*, NEWIMAGE+5~, NEWIMAGE+6*, NEWIMAGE+12*, NEWIMAGE+13*, NEWIMAGE+18*, NEWIMAGE+19*, NEWIMAGE+24*, NEWIMAGE+25* , NEWIMAGE+26*, ERRCHECK+4~, ERRCHECK+5*, ERRCHECK+6* |
IMAGEUID | ENTRY+22~, ENTRY+43*, ENTRY+50, NEWIMAGE+7, NEWIMAGE+26, NEWIMAGE+29, NEWIMAGE+64 |
IMAGNAME | ENTRY+22~, ENTRY+33* |
IMAGNUMB | ENTRY+22~, ENTRY+34* |
IMGSVC | ENTRY+22~, ENTRY+27*, NEWIMAGE+49, NEWIMAGE+52, NEWIMAGE+55, NEWIMAGE+60, LOOKUP+3, LOOKUP+7*, LOOKUP+10*, LOOKUP+13 , LOOKUP+17*, LOOKUP+20*, LOOKUP+24, LOOKUP+28*, LOOKUP+31*, LOOKUP+37 |
IMPORTER | ENTRY+5~, ENTRY+32*, NEWIMAGE+41, NEWIMAGE+64 |
INAME | MULTFRAM+3~, MULTFRAM+8*, MULTFRAM+9 |
INSTLOC | ENTRY+23~, ENTRY+35* |
INSTNAME | ENTRY+23~, ENTRY+28* |
>> IREQUEST | ENTRY+37*, ENTRY+41 |
LASTDCM | ENTRY+6~ |
LASTIMG | ENTRY+23~, ENTRY+44* |
LOCATION | ENTRY+23~, ENTRY+26* |
LRDFN | ENTRY+7~ |
LRI | ENTRY+8~ |
LRSS | ENTRY+9~ |
MACHID | ENTRY+23~, ENTRY+27*, NEWIMAGE+7, NEWIMAGE+29, NEWIMAGE+64, SAVEUID~, SAVEUID+2, SAVEUID+10, SAVEUID+11, GETUID~ , GETUID+2 |
MAG0 | ENTRY+20~, MULTFRAM+3~, MULTFRAM+5*, MULTFRAM+8, MULTFRAM+10, MULTFRAM+11 |
MAG1 | ENTRY+20~, MULTFRAM+5* |
MAG100 | MULTFRAM+3~, MULTFRAM+6*, MULTFRAM+24 |
MAG2 | ENTRY+20~, MULTFRAM+5*, MULTFRAM+12, MULTFRAM+14, MULTFRAM+15, MULTFRAM+16, MULTFRAM+28 |
MAG40 | MULTFRAM+3~, MULTFRAM+6*, MULTFRAM+19, MULTFRAM+21, MULTFRAM+22, MULTFRAM+23 |
MAGGP | ENTRY+11~, MULTFRAM+11* |
MAGIEN | ENTRY+12~, ENTRY+50*, ENTRY+55, NEWIMAGE+4, NEWIMAGE+13, NEWIMAGE+19, NEWIMAGE+22, NEWIMAGE+24, MULTFRAM+5, MULTFRAM+6 , MULTFRAM+7 |
MAGPACS | MULTFRAM+3~, MULTFRAM+7*, MULTFRAM+17, MULTFRAM+18 |
MEDATA | ENTRY+1~ |
MEDIA | ENTRY+10~, ENTRY+47* |
MFGR | ENTRY+23~, ENTRY+45*, NEWIMAGE+36~, NEWIMAGE+40* |
MIDCM | ENTRY+13~ |
MODALITY | ENTRY+23~, ENTRY+32*, MULTFRAM+13 |
MODEL | ENTRY+23~, ENTRY+45*, NEWIMAGE+36~, NEWIMAGE+40* |
MODIEN | NEWIMAGE+36~, NEWIMAGE+40* |
MODPARMS | ENTRY+23~, ENTRY+33*, ENTRY+66 |
MSG | ENTRY+61, ENTRY+76, ENTRY+78, NEWIMAGE+6!, NEWIMAGE+14, NEWIMAGE+38!, NEWIMAGE+50, NEWIMAGE+53, NEWIMAGE+56, NEWIMAGE+59! , NEWIMAGE+61, LOOKUP+36!, LOOKUP+38, ERRCHECK~ |
MSG( | NEWIMAGE+12*, NEWIMAGE+13*, NEWIMAGE+18*, NEWIMAGE+19*, NEWIMAGE+24*, NEWIMAGE+25*, NEWIMAGE+26*, ERRCHECK+6* |
MSG("" | ERRCHECK+5 |
MSG(1 | NEWIMAGE+39*, NEWIMAGE+60*, LOOKUP+37* |
MULTFRAM | ENTRY+24~, ENTRY+35*, ENTRY+55 |
OFFSET | NEWIMAGE+36~, NEWIMAGE+40* |
OLDPATH | ENTRY+14~, ENTRY+47*, NEWIMAGE+64 |
>> OPCODE | ENTRY+37*, ENTRY+38, ENTRY+39 |
ORIGINDX | ENTRY+15~, ENTRY+46* |
PID | ENTRY+24~, ENTRY+29* |
PIDCHECK | NEWIMAGE+2~, NEWIMAGE+34*, NEWIMAGE+35, NEWIMAGE+39 |
PNAMEDCM | ENTRY+24~, ENTRY+29* |
PNAMEVAH | ENTRY+16~, MULTFRAM+9* |
PROCDESC | ENTRY+17~, MULTFRAM+28*, MULTFRAM+30* |
QUIT | ENTRY+20~ |
RADATA | ENTRY+18~ |
>> REQUEST( | ENTRY+37, ENTRY+41 |
>> RETURN | ENTRY+81 |
ROUTINE | ERRCHECK~, ERRCHECK+6 |
ROUTRULE | ENTRY+24~, ENTRY+44* |
ROWS | NEWIMAGE+36~, NEWIMAGE+40* |
SERIEUID | ENTRY+24~, ENTRY+42* |
SERINUMB | ENTRY+24~, ENTRY+34* |
SOPCLASP | MULTFRAM+4~, MULTFRAM+26*, MULTFRAM+27 |
SOPCLASS | ENTRY+24~, ENTRY+43*, MULTFRAM+26 |
STAMP | ENTRY+24~, ENTRY+46* |
STATUS | ENTRY+24~, ENTRY+26* |
STUDYDAT | ENTRY+25~, ENTRY+31* |
STUDYTIM | ENTRY+25~, ENTRY+31* |
STUDYUID | ENTRY+25~, ENTRY+42* |
SYSTITLE | ENTRY+25~, ENTRY+36* |
UID | SAVEUID~, SAVEUID+14 |
VADM | ENTRY+19~ |
VADM( | ENTRY+83 |
X | ENTRY+20~, ENTRY+81*, ENTRY+83*, ENTRY+84*, ENTRY+85*, ENTRY+86, NEWIMAGE+5~, NEWIMAGE+22*, NEWIMAGE+23*, NEWIMAGE+25 , SAVEUID+1~, SAVEUID+5*, SAVEUID+6*, SAVEUID+7*, SAVEUID+8*, SAVEUID+9 |