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 |
| 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 |