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 - Imaging RPCs ; 22 Aug 2019 8:38 AM

Source Information

Source file <MAGDRPC9.m>

Call Graph

Call Graph

Call Graph Total: 7

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

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

Package Total Caller Graph
Imaging 8 MAG DICOM GET ICN  MAG DICOM GET UID ROOT  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(IMAGE,DBTYPE) ; Get updated UID for Query/Retrieve
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
CLEAN ; Overflow from MAGDRPC4
; P180 DAC - Moved global locking to calling routine MAGDRPC4
IENLOOK ; Overflow from MAGDRPC4
; lookup image by the IEN
GETINFO(INFO,TIUIEN) ; scan the TIU document and try to extract the accession number

External References

Name Field # of Occurrence
$$GET1^DIQ IENLOOK+29, IENLOOK+34, IENLOOK+42, IENLOOK+45, IENLOOK+46, IENLOOK+47, IENLOOK+51
GETS^DIQ GETINFO+5
$$GMRCACN^MAGDFCNV IENLOOK+44
CHK^MAGGSQI IENLOOK+5, IENLOOK+9
$$GETFILE^MAGT7MA GETINFO+10
$$GETICN^MPIF001 GETICN+1
GETICN^MPIF001 GETICN+1
$$ACCRPT^RAAPI IENLOOK+22
$$HTFM^XLFDT QRNEWUID+15

Used in RPC

RPC Name Call Tags
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

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^GMR(123 - [#123] 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+5, QRNEWUID+33, IENLOOK+8, IENLOOK+13
IENLOOK+15
^MAGD(2006.15 - [#2006.15] UIDROOT+1, QRNEWUID+21
^MAGDICOM(2006.563 - [#2006.563] QRNEWUID+12, QRNEWUID+13, QRNEWUID+31*, QRNEWUID+32
^MAGDOUTP(2006.574 - [#2006.574] CLEAN+4, CLEAN+6, CLEAN+8, CLEAN+11*, CLEAN+12*, CLEAN+13!, CLEAN+16!, CLEAN+17!, CLEAN+18, CLEAN+20*
CLEAN+22, CLEAN+24, CLEAN+25!, CLEAN+26!, CLEAN+27!, CLEAN+28, CLEAN+30*
^MAGV(2005.64 - [#2005.64] NEWUID+21, NEWUID+24, NEWUID+34, NEWUID+38, NEWUID+39!, NEWUID+40*, NEWUID+41*, NEWUID+43, QRNEWUID+8, QRNEWUID+33
^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
GETINFO IENLOOK+53
NEWUID QRNEWUID+34

Naked Globals

Name Field # of Occurrence
^(0 QRNEWUID+8, CLEAN+11*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ACNUMB IENLOOK+2~, IENLOOK+24*, IENLOOK+36, IENLOOK+44*, IENLOOK+48
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, 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
D2 NEXT+1~, NEXT+9*, NEXT+14*, NEXT+15*, NEXT+16*, NEXT+17, NEXT+18*, NEXT+24, NEXT+25
DATE QRNEWUID+1~, QRNEWUID+15*, QRNEWUID+24
DATETIME IENLOOK+21~, IENLOOK+26*, IENLOOK+27, IENLOOK+30
DBTYPE NEWUID~, NEWUID+2*, NEWUID+5, NEWUID+20, QRNEWUID~, QRNEWUID+2*, QRNEWUID+4, QRNEWUID+7, QRNEWUID+33, QRNEWUID+34
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+15*, QRNEWUID+16
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+24
ERROR GETINFO+3~
ERRSTAT GETINFO+2~*, GETINFO+10*
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+11
GMRCIEN IENLOOK+40~, IENLOOK+44*, IENLOOK+45, IENLOOK+46, IENLOOK+47
GROUPIEN IENLOOK+2~, IENLOOK+8*, IENLOOK+9, IENLOOK+10, IENLOOK+15
H QRNEWUID+17~, QRNEWUID+18*, QRNEWUID+19
I QRNEWUID+1~, QRNEWUID+26*, CLEAN+3, IENLOOK+21~, IENLOOK+32*, IENLOOK+33, IENLOOK+34, GETINFO+3~, GETINFO+6*
IENS GETINFO+3~, GETINFO+4*, GETINFO+5, GETINFO+6
IMAGE NEWUID~, NEWUID+3*, NEWUID+6, NEWUID+22, NEWUID+23, QRNEWUID~, QRNEWUID+3*, QRNEWUID+5, QRNEWUID+8, QRNEWUID+33
, QRNEWUID+34
INFO IENLOOK+21~, IENLOOK+22, GETINFO~
INFO("ACNUMB" GETINFO+7, GETINFO+8*, GETINFO+9
INFO("DATE" GETINFO+13*
INFO("LAB" GETINFO+10*, GETINFO+11*
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+13*, QRNEWUID+27, QRNEWUID+28
>> LOC CLEAN+6*, CLEAN+12, CLEAN+13, CLEAN+17
LRSS GETINFO+3~, GETINFO+9*, GETINFO+10
M QRNEWUID+17~, QRNEWUID+18*, QRNEWUID+19
MODIFIER IENLOOK+2~, IENLOOK+31*, IENLOOK+34*, IENLOOK+36, IENLOOK+47*, IENLOOK+48
NAME NEXT+1~
NEW NEWUID~, NEWUID+4*, NEWUID+9, NEWUID+13, NEWUID+33, NEWUID+37, QRNEWUID+1~, QRNEWUID+5*, QRNEWUID+8*, QRNEWUID+10
NEWSTS CLEAN+2~, CLEAN+3*, CLEAN+10, CLEAN+11, CLEAN+12
NEXTUID QRNEWUID+1~, QRNEWUID+21*, QRNEWUID+22, QRNEWUID+24*, QRNEWUID+26*, QRNEWUID+27, QRNEWUID+28*, QRNEWUID+29*, QRNEWUID+31, QRNEWUID+34
>> 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+33*, QRNEWUID+34
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+34, QRNEWUID+35, NEXT~, NEXT+10*, NEXT+12*, NEXT+21*, NEXT+24*, NEXT+25*
, NXTPTRPT~, NXTPTRPT+2*, NXTPTRPT+3*, NXTPTRPT+5*, GETICN~, GETICN+1*
OUT(1 IENLOOK+6*, IENLOOK+10*, IENLOOK+19*, IENLOOK+23*, IENLOOK+37*, IENLOOK+49*, IENLOOK+58*, IENLOOK+61*, IENLOOK+63*
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
PRI CLEAN+2~, CLEAN+6*, CLEAN+12, CLEAN+13, CLEAN+17
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 CLEAN+2~, CLEAN+7*, CLEAN+26
S QRNEWUID+17~, QRNEWUID+18*, QRNEWUID+19
S0 CLEAN+2~, CLEAN+3*, CLEAN+4, CLEAN+6, CLEAN+8, CLEAN+11, CLEAN+12, CLEAN+13, CLEAN+16, CLEAN+17
CLEAN+18, CLEAN+20, CLEAN+22, CLEAN+24, CLEAN+25, CLEAN+26
S1 CLEAN+2~, CLEAN+3*, CLEAN+4, CLEAN+8, CLEAN+11, CLEAN+12, CLEAN+13, CLEAN+16, CLEAN+17
SEED NEXT~, NEXT+8*, NEXT+9
>> SENT( CLEAN+3
SOPREC NEWUID+1~, NEWUID+24*, NEWUID+25, NEWUID+26, NEWUID+28, NEWUID+39*, NEWUID+40*, NEWUID+41
STS CLEAN+2~, CLEAN+8*, CLEAN+13, CLEAN+17
STUDYDAT IENLOOK+2~, IENLOOK+30*, IENLOOK+36, IENLOOK+45*, IENLOOK+48
STUID CLEAN+2~, CLEAN+24*, CLEAN+27
TEXT GETINFO+3~
TEXT(8925 GETINFO+6
TIME QRNEWUID+1~, QRNEWUID+19*, QRNEWUID+24
TIUIEN GETINFO~, GETINFO+4
X NEWUID+1~, NEWUID+9*, NEWUID+12, NEWUID+14*, NEWUID+33*, NEWUID+36, NEWUID+38*, QRNEWUID+1~, QRNEWUID+15*, QRNEWUID+16*
, QRNEWUID+18, CLEAN+6*, CLEAN+7, CLEAN+18*, CLEAN+19*, CLEAN+20, CLEAN+28*, CLEAN+29*, CLEAN+30, 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+13
X(0 IENLOOK+5, IENLOOK+6, IENLOOK+9, IENLOOK+10
Y QRNEWUID+1~, IENLOOK+2~

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