MAGDRPC9 ;WOIFO/EDM/MLH/JSL/SAF/DAC/PMK/JSJ - Imaging RPCs ; Jun 23, 2022@15:30:40
Source file <MAGDRPC9.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 |
|---|---|---|
| UIDROOT(OUT) | ; RPC = MAG DICOM GET UID ROOT
|
|
| NEWUID(OUT,OLD,NEW,IMAGE,DBTYPE) | ; RPC = MAG NEW SOP INSTANCE UID
|
|
| QRNEWUID(IDX,DBTYPE) | ; Get updated UID for Query/Retrieve - P280 DAC - Modified to reflect that index can be Image or SOP
|
|
| NEXT(OUT,SEED,DIR) | ; RPC = MAG RAD GET NEXT RPT BY DATE
|
|
| NXTPTRPT(OUT,DFN,RARPT1,DIR) | ; RPC = MAG RAD GET NEXT RPT BY PT
|
|
| GETICN(OUT,DFN) | ; RPC = MAG DICOM GET ICN
|
|
| INIT(OUT,LOCATION,COUNTONLY) | ; RPC = MAG DICOM QUEUE INIT (moved from ^MAGDRPC4)
|
|
| IENLOOK | ; Overflow from MAGDRPC4
; lookup image by the IEN |
|
| GETINFO(INFO,TIUIEN) | ; scan the TIU document and try to extract the accession number
|
|
| STATS(OUT,SITE) | ; RPC = MAG DICOM GET EXPORT QUEUE STS
|
|
| TIMEDIFF(T1,T2) | ; formatted time difference
|
| Name | Field # of Occurrence |
|---|---|
| $$FIND1^DIC | GETINFO+10 |
| $$GET1^DIQ | INIT+54, IENLOOK+29, IENLOOK+34, IENLOOK+42, IENLOOK+45, IENLOOK+46, IENLOOK+47, IENLOOK+51, GETINFO+11 |
| GETS^DIQ | GETINFO+5 |
| $$GMRCACN^MAGDFCNV | IENLOOK+44 |
| CHK^MAGGSQI | IENLOOK+5, IENLOOK+9 |
| $$GETFILE^MAGT7MA | GETINFO+12 |
| $$GETICN^MPIF001 | GETICN+1 |
| GETICN^MPIF001 | GETICN+1 |
| $$ACCRPT^RAAPI | IENLOOK+22 |
| $$HDIFF^XLFDT | TIMEDIFF+2, TIMEDIFF+4 |
| $$HTFM^XLFDT | QRNEWUID+18 |
| RPC Name | Call Tags |
|---|---|
| MAG DICOM QUEUE INIT | INIT |
| MAG DICOM GET ICN | GETICN |
| MAG NEW SOP INSTANCE UID | NEWUID |
| MAG RAD GET NEXT RPT BY DATE | NEXT |
| MAG RAD GET NEXT RPT BY PT | NXTPTRPT |
| MAG DICOM GET UID ROOT | UIDROOT |
| MAG DICOM GET EXPORT QUEUE STS | STATS |
| FileNo | Call Tags |
|---|---|
| ^GMR(123 - [#123] | GET1^DIQ |
| ^DIC(4 - [#4] | GET1^DIQ |
| ^LRO(68 - [#68] | FIND1^DIC, GET1^DIQ |
| ^RAMIS(71 - [#71] | GET1^DIQ |
| ^RAMIS(71.2 - [#71.2] | GET1^DIQ |
| ^TIU(8925 - [#8925] | GET1^DIQ, GETS^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^MAG(2005 - [#2005] | NEWUID+8, NEWUID+10, NEWUID+14, NEWUID+15*, NEWUID+16*, NEWUID+18, QRNEWUID+7, QRNEWUID+37, IENLOOK+8, IENLOOK+13 , IENLOOK+15 |
| ^MAGD(2006.15 - [#2006.15] | UIDROOT+1, QRNEWUID+24 |
| ^MAGDICOM(2006.563 - [#2006.563] | QRNEWUID+15, QRNEWUID+16, QRNEWUID+34*, QRNEWUID+35 |
| ^MAGDOUTP(2006.567 | INIT+36! |
| ^MAGDOUTP(2006.574 - [#2006.574] | INIT+3, INIT+8, INIT+17, INIT+18!, INIT+19*, INIT+20, INIT+28, INIT+29, INIT+33, INIT+34 , INIT+37!, INIT+39!, INIT+40!, INIT+41!, INIT+42!, INIT+47, INIT+49*, INIT+50*, INIT+55, STATS+9 , STATS+12, STATS+13, STATS+14, STATS+15 |
| ^MAGV(2005.64 - [#2005.64] | NEWUID+21, NEWUID+24, NEWUID+34, NEWUID+38, NEWUID+39!, NEWUID+40*, NEWUID+41*, NEWUID+43, QRNEWUID+11, QRNEWUID+37 |
| ^RADPT - [#70] | NEXT+16, NEXT+24, IENLOOK+28, IENLOOK+32, IENLOOK+33 |
| ^RADPT("AR" | NEXT+11, NEXT+13, NEXT+14, NEXT+18, NEXT+20 |
| ^RARPT - [#74] | IENLOOK+25 |
| ^RARPT("C" | NXTPTRPT+3, NXTPTRPT+5 |
| Name | Line Occurrences |
|---|---|
| $$TIMEDIFF | STATS+18 |
| GETINFO | IENLOOK+53 |
| NEWUID | QRNEWUID+39 |
| Name | Field # of Occurrence |
|---|---|
| ^( | INIT+29, INIT+34 |
| ^(0 | QRNEWUID+11 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ABBR | GETINFO+3~, GETINFO+9*, GETINFO+10 |
| ACNUMB | INIT+1~, INIT+31*, INIT+41, IENLOOK+2~, IENLOOK+24*, IENLOOK+36, IENLOOK+44*, IENLOOK+48 |
| COUNT | INIT+1~, INIT+47*, INIT+48*, INIT+49, STATS+1~ |
| COUNT( | STATS+16*, STATS+19*, STATS+26, STATS+27, STATS+29 |
| COUNTONLY | INIT~, INIT+4*, INIT+9, INIT+30, INIT+45 |
| D0 | NEWUID+1~, NEWUID+6*, NEWUID+7, NEWUID+8, NEWUID+15, NEWUID+16, NEWUID+21*, NEWUID+22, NEWUID+23*, NEWUID+24 , NEWUID+25, NEWUID+39, NEWUID+40, NEWUID+41, INIT+1~, INIT+29*, INIT+33, INIT+34, INIT+36, INIT+37 , INIT+39, INIT+40, INIT+41, INIT+42, IENLOOK+2~, IENLOOK+13*, IENLOOK+14, IENLOOK+15*, IENLOOK+18, IENLOOK+19 , IENLOOK+22, IENLOOK+25, IENLOOK+36, IENLOOK+42, IENLOOK+48, IENLOOK+51, IENLOOK+53, IENLOOK+55, IENLOOK+61, STATS+1~ , STATS+12*, STATS+13, STATS+14, STATS+15, STATS+16, STATS+19, STATS+26*, STATS+27, STATS+29 |
| D1 | INIT+1~, INIT+34*, INIT+36, INIT+37, STATS+1~, STATS+14*, STATS+15 |
| D2 | NEXT+1~, NEXT+9*, NEXT+14*, NEXT+15*, NEXT+16*, NEXT+17, NEXT+18*, NEXT+24, NEXT+25 |
| DATE | QRNEWUID+1~, QRNEWUID+18*, QRNEWUID+27 |
| DATETIME | IENLOOK+21~, IENLOOK+26*, IENLOOK+27, IENLOOK+30 |
| DBTYPE | NEWUID~, NEWUID+2*, NEWUID+5, NEWUID+20, QRNEWUID~, QRNEWUID+2*, QRNEWUID+4, QRNEWUID+5, QRNEWUID+6, QRNEWUID+9 , QRNEWUID+37, QRNEWUID+39 |
| DFN | NEXT+1~, NEXT+9*, NEXT+11*, NEXT+13*, NEXT+14, NEXT+16, NEXT+18*, NEXT+19, NEXT+20*, NEXT+24 , NEXT+25, NXTPTRPT~, NXTPTRPT+1*, NXTPTRPT+2, NXTPTRPT+3, NXTPTRPT+5, GETICN~, GETICN+1, IENLOOK+2~ |
| DH | QRNEWUID+1~, QRNEWUID+18*, QRNEWUID+19 |
| DIR | NEXT~, NEXT+8*, NEXT+11, NEXT+13, NEXT+14, NEXT+15, NEXT+16, NEXT+18, NEXT+20, NXTPTRPT~ , NXTPTRPT+4*, NXTPTRPT+5 |
| DUZ(2 | QRNEWUID+27 |
| ERROR | GETINFO+3~ |
| ERRSTAT | GETINFO+2~*, GETINFO+12* |
| EXAMDATE | NEXT+1~, NEXT+9*, NEXT+11*, NEXT+12, NEXT+13, NEXT+14*, NEXT+16, NEXT+18, NEXT+20*, NEXT+21 , NEXT+24, NEXT+25 |
| FAIL | QRNEWUID+1~ |
| FILE | GETINFO+1~ |
| FILE("NAME" | GETINFO+13 |
| GMRCIEN | IENLOOK+40~, IENLOOK+44*, IENLOOK+45, IENLOOK+46, IENLOOK+47 |
| GROUPIEN | IENLOOK+2~, IENLOOK+8*, IENLOOK+9, IENLOOK+10, IENLOOK+15 |
| H | QRNEWUID+20~, QRNEWUID+21*, QRNEWUID+22 |
| I | QRNEWUID+1~, QRNEWUID+29*, IENLOOK+21~, IENLOOK+32*, IENLOOK+33, IENLOOK+34, GETINFO+3~, GETINFO+6* |
| IDX | QRNEWUID~, QRNEWUID+4, QRNEWUID+5, QRNEWUID+39 |
| IENS | GETINFO+3~, GETINFO+4*, GETINFO+5, GETINFO+6 |
| IMAGE | NEWUID~, NEWUID+3*, NEWUID+6, NEWUID+22, NEWUID+23, QRNEWUID+4*, QRNEWUID+7, QRNEWUID+37 |
| IMAGEDB | INIT+1~, INIT+32*, INIT+42 |
| INFO | IENLOOK+21~, IENLOOK+22, GETINFO~ |
| INFO("ACNUMB" | GETINFO+7, GETINFO+8*, GETINFO+9 |
| INFO("DATE" | GETINFO+15* |
| INFO("LAB" | GETINFO+12*, GETINFO+13* |
| INFO(1 | IENLOOK+24 |
| L | NEWUID+1~, NEWUID+9*, NEWUID+12, NEWUID+33*, NEWUID+36 |
| LABINFO | IENLOOK+40~, IENLOOK+53, IENLOOK+54 |
| LABINFO("ACNUMB" | IENLOOK+55 |
| LABINFO("DATE" | IENLOOK+56 |
| LABINFO("LAB" | IENLOOK+57 |
| LASTUID | QRNEWUID+1~, QRNEWUID+16*, QRNEWUID+30, QRNEWUID+31 |
| LOCATION | INIT~, INIT+2, INIT+7, INIT+29, INIT+37, INIT+54 |
| LRAA | GETINFO+3~, GETINFO+10*, GETINFO+11 |
| LRSS | GETINFO+3~, GETINFO+11*, GETINFO+12 |
| M | QRNEWUID+20~, QRNEWUID+21*, QRNEWUID+22 |
| MODIFIER | IENLOOK+2~, IENLOOK+31*, IENLOOK+34*, IENLOOK+36, IENLOOK+47*, IENLOOK+48 |
| N | INIT+1~, INIT+8*, INIT+10, INIT+11, INIT+22, INIT+27*, INIT+30*, INIT+44, INIT+45, INIT+47 , INIT+51 |
| NAME | NEXT+1~ |
| NEW | NEWUID~, NEWUID+4*, NEWUID+9, NEWUID+13, NEWUID+33, NEWUID+37, QRNEWUID+1~, QRNEWUID+7*, QRNEWUID+11*, QRNEWUID+13 |
| NEXTUID | QRNEWUID+1~, QRNEWUID+24*, QRNEWUID+25, QRNEWUID+27*, QRNEWUID+29*, QRNEWUID+30, QRNEWUID+31*, QRNEWUID+32*, QRNEWUID+34, QRNEWUID+39 |
| NOUT | STATS+1~, STATS+6*, STATS+8*, STATS+28*, STATS+29 |
| NOW | STATS+1~, STATS+8*, STATS+18 |
| >> NUMBER | IENLOOK+3*, IENLOOK+5, IENLOOK+8, IENLOOK+13, IENLOOK+18, IENLOOK+36, IENLOOK+48, IENLOOK+55 |
| OLD | NEWUID~, NEWUID+3*, NEWUID+4, NEWUID+7, NEWUID+21, NEWUID+28, NEWUID+30, QRNEWUID+1~, QRNEWUID+37*, QRNEWUID+39 |
| ORIGSOP | NEWUID+1~, NEWUID+26*, NEWUID+27, NEWUID+28, NEWUID+29 |
| OUT | UIDROOT~, UIDROOT+1*, NEWUID~, NEWUID+7*, NEWUID+8*, NEWUID+11*, NEWUID+12*, NEWUID+13*, NEWUID+14*, NEWUID+15 , NEWUID+16, NEWUID+22*, NEWUID+25*, NEWUID+28*, NEWUID+29*, NEWUID+30*, NEWUID+35*, NEWUID+36*, NEWUID+37*, NEWUID+38* , NEWUID+40, QRNEWUID+1~, QRNEWUID+39, QRNEWUID+40, NEXT~, NEXT+10*, NEXT+12*, NEXT+21*, NEXT+24*, NEXT+25* , NXTPTRPT~, NXTPTRPT+2*, NXTPTRPT+3*, NXTPTRPT+5*, GETICN~, GETICN+1*, INIT~, INIT+2*, INIT+3*, INIT+11* , INIT+12*, INIT+14*, INIT+21*, INIT+22*, INIT+27*, INIT+45*, INIT+51*, INIT+54*, STATS~, STATS+2! |
| OUT( | STATS+6*, STATS+29* |
| OUT(1 | IENLOOK+6*, IENLOOK+10*, IENLOOK+19*, IENLOOK+23*, IENLOOK+37*, IENLOOK+49*, IENLOOK+58*, IENLOOK+61*, IENLOOK+63*, STATS+4* , STATS+28* |
| OUT(2 | IENLOOK+18*, IENLOOK+37*, IENLOOK+49*, IENLOOK+58* |
| P | IENLOOK+2~, IENLOOK+13*, IENLOOK+14, IENLOOK+15*, IENLOOK+18, IENLOOK+19, IENLOOK+20, IENLOOK+36, IENLOOK+39, IENLOOK+48 , IENLOOK+55, IENLOOK+61, IENLOOK+63 |
| PRIORITY | INIT+1~, INIT+31*, INIT+37, STATS+1~, STATS+9*, STATS+12, STATS+14 |
| PROC | IENLOOK+21~ |
| PROCNAME | IENLOOK+2~, IENLOOK+29*, IENLOOK+36, IENLOOK+46*, IENLOOK+48 |
| RADPT0 | IENLOOK+21~, IENLOOK+28*, IENLOOK+29 |
| RADPT1 | IENLOOK+21~, IENLOOK+26*, IENLOOK+28, IENLOOK+32, IENLOOK+33 |
| RADPT2 | IENLOOK+21~, IENLOOK+27*, IENLOOK+28, IENLOOK+32, IENLOOK+33 |
| RADPT3 | IENLOOK+21~, IENLOOK+27*, IENLOOK+28, IENLOOK+32, IENLOOK+33 |
| RARPT0 | IENLOOK+21~, IENLOOK+25*, IENLOOK+26 |
| RARPT1 | NXTPTRPT~, NXTPTRPT+4*, NXTPTRPT+5 |
| REQUESTDATETIME | INIT+1~, INIT+32*, INIT+40 |
| RETURN | TIMEDIFF+1~, TIMEDIFF+4*, TIMEDIFF+7*, TIMEDIFF+10*, TIMEDIFF+12*, TIMEDIFF+13 |
| S | QRNEWUID+20~, QRNEWUID+21*, QRNEWUID+22 |
| SEED | NEXT~, NEXT+8*, NEXT+9 |
| SITE | STATS~, STATS+4, STATS+9, STATS+12, STATS+14 |
| >> SOPIX | QRNEWUID+5*, QRNEWUID+11, QRNEWUID+37 |
| SOPREC | NEWUID+1~, NEWUID+24*, NEWUID+25, NEWUID+26, NEWUID+28, NEWUID+39*, NEWUID+40*, NEWUID+41 |
| STATE | INIT+1~, INIT+35*, INIT+37, STATS+1~, STATS+11*, STATS+12, STATS+14, STATS+16, STATS+19, STATS+27* , STATS+29 |
| STUDYDAT | IENLOOK+2~, IENLOOK+30*, IENLOOK+36, IENLOOK+45*, IENLOOK+48 |
| STUDYUID | INIT+1~, INIT+33*, INIT+42 |
| T1 | TIMEDIFF~, TIMEDIFF+2, TIMEDIFF+4 |
| T2 | TIMEDIFF~, TIMEDIFF+2, TIMEDIFF+4 |
| TEXT | GETINFO+3~ |
| TEXT(8925 | GETINFO+6 |
| TIME | QRNEWUID+1~, QRNEWUID+22*, QRNEWUID+27, STATS+1~, STATS+17*, STATS+18 |
| TIMEDIFF | TIMEDIFF+1~, TIMEDIFF+2*, TIMEDIFF+3, TIMEDIFF+6, TIMEDIFF+7, TIMEDIFF+9, TIMEDIFF+10, TIMEDIFF+12 |
| TIUIEN | GETINFO~, GETINFO+4 |
| WAIT | STATS+1~, STATS+18*, STATS+19 |
| X | NEWUID+1~, NEWUID+9*, NEWUID+12, NEWUID+14*, NEWUID+33*, NEWUID+36, NEWUID+38*, QRNEWUID+1~, QRNEWUID+18*, QRNEWUID+19* , QRNEWUID+21, INIT+1~, INIT+29*, INIT+31, INIT+32, IENLOOK+2~, IENLOOK+5, IENLOOK+9, IENLOOK+13*, IENLOOK+15* , IENLOOK+22*, IENLOOK+23, IENLOOK+33*, IENLOOK+34, IENLOOK+36*, IENLOOK+37, IENLOOK+42*, IENLOOK+43, IENLOOK+44, IENLOOK+48* , IENLOOK+49, IENLOOK+51*, IENLOOK+52, IENLOOK+55*, IENLOOK+56*, IENLOOK+57*, IENLOOK+58, GETINFO+3~, GETINFO+6*, GETINFO+7 , GETINFO+8, GETINFO+15, STATS+1~, STATS+15*, STATS+17 |
| X(0 | IENLOOK+5, IENLOOK+6, IENLOOK+9, IENLOOK+10 |
| Y | QRNEWUID+1~, INIT+1~, INIT+34*, INIT+35, IENLOOK+2~, STATS+1~, STATS+13*, STATS+16 |
| Name | Field # of Occurrence |
|---|---|
| $T(GETICN^MPIF001 | GETICN+1 |