MAGUXRF ;WOIFO/SRR/SG/NST - Imaging MUMPS cross-references ; 29 Oct 2010 2:23 PM
Source file <MAGUXRF.m>
Package | Total | Call Graph |
---|---|---|
VA FileMan | 2 | UPDATE^DIE $$EXTERNAL^DILFD |
Kernel | 1 | $$NOW^XLFDT |
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 |
Package | Total | Caller Graph |
---|---|---|
Imaging | 3 | MAGGTID ^MAG(2005.1 ACTIONS |
Name | Comments | DBIA/ICR reference |
---|---|---|
SETACT | ||
KILLACT | ||
AC(SETKIL) | ||
SETPX | ; Set PACS switch on; check fields first
; Write checks |
|
KILPX | ; Stop PACS system
|
|
SETPDPX | ; Set P(atient) D(ate) PX(procedure)
|
|
SET | ||
4 | ||
KILPDPX | ; Kill
|
|
SETPPXD | ; #5:Set (patient=X=DFN); #6:PX(procedure); #15:DT(procedure date/time)
; Xref for patient field#5=Patient name (in form of DFN) ; ^MAG(2005,"APPXDT",X,PX,reverseDT)="" |
|
SETUP | ; Set up for patient Xref's-for field #5l
|
|
KILPPXD | ;#5:KILL (PATIENT=X=DFN); #6:PX(PROCEDURE); #15:DT(PROCEDURE DATE/TIME)
|
|
SETPPXD6 | ;#5:SET (PATIENT=X=DFN); #6:PX(PROCEDURE); #15:DT(PROCEDURE DATE/TIME)
|
|
SETUP6 | ; Set up for procedure xref-field#6
|
|
KILPPXD6 | ;#5:KILL (PATIENT=X=DFN); #6:PX(PROCEDURE); #15:DT(PROCEDURE DATE/TIME)
|
|
SETPPXD5 | ;#5:SET (PATIENT=X=DFN); #6:PX(PROCEDURE); #15:DT(PROCEDURE DATE/TIME)
|
|
SETUP5 | ; Set up for date/time procedure field #15
|
|
KILPPXD5 | ;#5:SET (PATIENT=X=DFN); #6:PX(PROCEDURE); #15:DT(PROCEDURE DATE/TIME)
|
|
SETDCM | ; Set the cross reference for DICOM SERIES NUM
; and DICOM IMAGE NUM fields of the OBJECT GROUP Multiple |
|
KILLDSN | ; Kill the cross reference for DICOM SERIES NUM
|
|
KILLDIN | ; Kill the DICOM IMAGE NUM cross reference
; of the OBJECT GROUP Multiple |
|
BOTHNUM(MAGDSN,MAGDIN) | ;
|
|
AUDIT(FILE,IENS,FLDLST,SUBFILE,X1,X2) | ;
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^MAG(2005 - [#2005] | SETPDPX+2*, SET, KILPDPX+2!, SETPPXD+5*, SETPPXD+6*, SETUP+1, KILPPXD+3!, KILPPXD+4!, SETPPXD6+4*, SETPPXD6+5* , SETUP6+1, KILPPXD6+3!, KILPPXD6+4!, SETPPXD5+5*, SETPPXD5+6*, SETUP5+1, KILPPXD5+3!, KILPPXD5+4!, SETDCM+4, SETDCM+5* , KILLDSN+3, KILLDSN+4!, KILLDIN+4, KILLDIN+5!, BOTHNUM+1, BOTHNUM+2 |
^MAG(2005.02 - [#2005.02] | AC+3, AC+4, AC+6*, AC+7! |
^MAG(2006.1 - [#2006.1] | SETPX+2*, KILPX+1! |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ACTION | AC~, AC+4*, AC+5*, AC+6, AC+7 |
AIENS | AUDIT+8~, AUDIT+15*, AUDIT+16, AUDIT+17, AUDIT+18, AUDIT+21, AUDIT+26 |
CDT | SETPPXD+3~, SETUP+1*, SETUP+2, SETUP+4, KILPPXD+1~, SETPPXD6+2~, SETUP6+1*, SETUP6+2, SETUP6+4, KILPPXD6+1~ , KILPPXD5+1~ |
>> DA | AC+4, SETPDPX+2, SET, KILPDPX+2, SETPPXD+5, SETPPXD+6, SETUP+1, KILPPXD+3, KILPPXD+4, SETPPXD6+4 , SETPPXD6+5, SETUP6+1, KILPPXD6+3, KILPPXD6+4, SETPPXD5+5, SETPPXD5+6, SETUP5+1, KILPPXD5+3, KILPPXD5+4, SETDCM+4 , SETDCM+5, KILLDSN+3, KILLDSN+4, KILLDIN+4, KILLDIN+5, BOTHNUM+1, BOTHNUM+2 |
>> DA(1 | AC+3, AC+4, SETDCM+4, SETDCM+5, KILLDSN+3, KILLDSN+4, KILLDIN+4, KILLDIN+5, BOTHNUM+1, BOTHNUM+2 |
DFN | SETPDPX+1, SETPDPX+2, SET+2*, KILPDPX+1, KILPDPX+2, SETPPXD6+2~, SETPPXD6+4, SETPPXD6+5, SETUP6+1*, SETUP6+3 , KILPPXD6+1~, KILPPXD6+3, KILPPXD6+4, SETPPXD5+3~, SETPPXD5+5, SETPPXD5+6, SETUP5+1*, SETUP5+3, KILPPXD5+1~, KILPPXD5+3 , KILPPXD5+4 |
>> DIERR | AUDIT+25 |
DUZ | AUDIT+18 |
ER | SETPPXD+3~, SETPPXD+4, SETUP+2*, SETUP+3*, KILPPXD+1~, KILPPXD+2, SETPPXD6+2~, SETPPXD6+3, SETUP6+2*, SETUP6+3* , KILPPXD6+1~, KILPPXD6+2, SETPPXD5+3~, SETPPXD5+4, SETUP5+2*, SETUP5+3*, KILPPXD5+1~, KILPPXD5+2 |
EXTVAL | AUDIT+8~, AUDIT+24*, AUDIT+25*, AUDIT+26 |
FILE | AUDIT~, AUDIT+24 |
FLD | AUDIT+8~, AUDIT+12*, AUDIT+17, AUDIT+24 |
FLDLST | AUDIT~, AUDIT+11, AUDIT+12 |
I | AUDIT+8~, AUDIT+12*, AUDIT+13, AUDIT+15 |
IENS | AUDIT~, AUDIT+15 |
INTVAL | AUDIT+8~, AUDIT+13*, AUDIT+20, AUDIT+21, AUDIT+24, AUDIT+26 |
MAG | AC+8! |
MAGACT1 | AC+8! |
MAGDIN | SETDCM+2~, SETDCM+3, SETDCM+5, KILLDSN+1~, KILLDSN+2, KILLDSN+4, KILLDIN+2~, KILLDIN+3, BOTHNUM~, BOTHNUM+2* , BOTHNUM+5 |
MAGDSN | SETDCM+2~, SETDCM+3, SETDCM+5, KILLDSN+1~, KILLDSN+2, KILLDIN+2~, KILLDIN+3, KILLDIN+5, BOTHNUM~, BOTHNUM+1* , BOTHNUM+5 |
MAGFDA | AUDIT+8~, AUDIT+29 |
MAGFDA( | AUDIT+16*, AUDIT+17*, AUDIT+18*, AUDIT+21*, AUDIT+26* |
MAGMETH | AC+8! |
MAGMSG | AUDIT+8~ |
>> MAGNOFMAUDIT | AUDIT+3 |
NF | AUDIT+8~, AUDIT+11*, AUDIT+12 |
NOW | AUDIT+8~, AUDIT+9*, AUDIT+16 |
>> PDT | SETPDPX+1, SETPDPX+2, SET+1*, KILPDPX+1, KILPDPX+2 |
PX | SETPDPX+2, 4*, KILPDPX+2, SETPPXD+3~, SETPPXD+5, SETPPXD+6, SETUP+1*, SETUP+3, KILPPXD+1~, KILPPXD+3 , KILPPXD+4, SETPPXD5+3~, SETPPXD5+5, SETPPXD5+6, SETUP5+1*, SETUP5+2, KILPPXD5+3, KILPPXD5+4 |
RDT | SETPPXD+3~, SETPPXD+5, SETPPXD+6, SETUP+4*, KILPPXD+1~, KILPPXD+3, KILPPXD+4, SETPPXD6+2~, SETPPXD6+4, SETPPXD6+5 , SETUP6+4*, KILPPXD6+1~, KILPPXD6+3, KILPPXD6+4, SETPPXD5+3~, SETPPXD5+5, SETPPXD5+6, SETUP5+4*, KILPPXD5+3, KILPPXD5+4 |
ROUTINE | AC~, AC+5*, AC+6 |
SETKIL | AC~, AC+6, AC+7 |
SUBFILE | AUDIT~, AUDIT+16, AUDIT+17, AUDIT+18, AUDIT+21, AUDIT+26 |
TYPE | AC~, AC+3*, AC+6, AC+7 |
U | SET+1, SET+2, 4, SETUP+1, SETUP6+1, SETUP5+1, BOTHNUM+1, BOTHNUM+2 |
>> X | SETPPXD+5, SETPPXD+6, KILPPXD+3, KILPPXD+4, SETPPXD6+4, SETPPXD6+5, KILPPXD6+3, KILPPXD6+4, SETUP5+4, KILLDSN+4 , KILLDIN+5 |
>> X0 | SET*, SET+2, 4 |
X1 | AUDIT~ |
X1( | AUDIT+13 |
X1(1 | AUDIT+6 |
X2 | SET*, SET+1, AUDIT~ |
X2( | AUDIT+13 |
X2(1 | AUDIT+6 |
>> Z | SETDCM+4*, SETDCM+5, KILLDSN+3*, KILLDSN+4, KILLDIN+4*, KILLDIN+5 |