Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Used in RPC |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: MAGDRPC9

Package: Imaging

Routine: MAGDRPC9


Information

MAGDRPC9 ;WOIFO/EDM/MLH/JSL/SAF/DAC/PMK/JSJ - Imaging RPCs ; Jun 23, 2022@15:30:40

Source Information

Source file <MAGDRPC9.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Imaging 3 $$GMRCACN^MAGDFCNV  CHK^MAGGSQI  $$GETFILE^MAGT7MA  
VA FileMan 2 $$FIND1^DIC  ($$GET1,GETS)^DIQ  
Kernel 1 ($$HDIFF,$$HTFM)^XLFDT  
Master Patient Index VistA 1 ($$GETICN,GETICN)^MPIF001  
Radiology Nuclear Medicine 1 $$ACCRPT^RAAPI  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 10

Package Total Caller Graph
Imaging 10 MAG DICOM GET EXPORT QUEUE STS  MAG DICOM GET ICN  MAG DICOM GET UID ROOT  MAG DICOM QUEUE INIT  MAG NEW SOP INSTANCE UID  MAG RAD GET NEXT RPT BY DATE  MAG RAD GET NEXT RPT BY PT  MAGDQR04  
MAGDRPC4  MAGDRPCA  

Entry Points

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

External References

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

Used in RPC

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

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

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

Label References

Name Line Occurrences
$$TIMEDIFF STATS+18
GETINFO IENLOOK+53
NEWUID QRNEWUID+39

Naked Globals

Name Field # of Occurrence
^( INIT+29, INIT+34
^(0 QRNEWUID+11

Local Variables

Legend:

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

Marked Items

Name Field # of Occurrence
$T(GETICN^MPIF001 GETICN+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Used in RPC |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All