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 |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: MAGDSTV1

Package: Imaging

Routine: MAGDSTV1


Information

MAGDSTV1 ;WOIFO/PMK - Study Tracker - VistA Query/Retrieve user ; Apr 25, 2022@09:21:50

Source Information

Source file <MAGDSTV1.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
Imaging 3 ($$YESNO,CONTINUE)^MAGDSTQ  DISPLAY^MAGDSTQ5  $$ENABLED^MAGDSTV1  
Kernel 1 ($$FMTE,$$NOW)^XLFDT  

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 MAGD MAGDSTT QUEUE DELETE  MAGDSTAB  MAGDSTAC  MAGDSTAD  MAGDSTAE  MAGDSTAF  MAGDSTQ  MAGDSTV1  

Entry Points

Name Comments DBIA/ICR reference
SOPUIDQ ; Called from batch compare/retrieve for a SOP Instance Query
; suppress text output when doing a batch query
SOPUIDR ; Called from batch retrieve for a SOP Instance Retrieval
; suppress text output when doing a batch retrieve
ENTRY(MODE,SHOWRRSL) ; called from ^MAGDSTQ for a VistA Q/R client
WAIT(CMOVEAET) ; wait up to ten minutes for response from DICOM Gateway
KILL ; truncate the DICOM VISTA Q/R REQUEST QUEUE file (#2006.541)
ENABLED() ; check if monitor is active - P305 PMK 03/15/2022

External References

Name Field # of Occurrence
$$YESNO^MAGDSTQ KILL+14
CONTINUE^MAGDSTQ ENTRY+5, WAIT+22, WAIT+50, WAIT+58
DISPLAY^MAGDSTQ5 ENTRY+36
$$ENABLED^MAGDSTV1 SOPUIDR+9
$$FMTE^XLFDT WAIT+46
$$NOW^XLFDT ENTRY+18, WAIT+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Illegal mode in ENTRY^"_$T(+0),": ",MODE
  • Line Location: ENTRY+4
Function Call: WRITE
  • Prompt: !,"Performing query on DICOM Gateway"
  • Line Location: ENTRY+33
Function Call: WRITE
  • Prompt: @IOBS," ",@IOBS
  • Line Location: ENTRY+44
Function Call: WRITE
  • Prompt: "Performing retrieve from """,QRSCP,""" from DICOM Gateway"
  • Line Location: ENTRY+45
Function Call: WRITE
  • Prompt: " (",GATEWAYHOSTNAME,")"
  • Line Location: ENTRY+46
Function Call: WRITE
  • Prompt: !
  • Line Location: WAIT+15
Function Call: WRITE
  • Prompt: !
  • Line Location: WAIT+16
Function Call: WRITE
  • Prompt: "*"
  • Line Location: WAIT+16
Function Call: WRITE
  • Prompt: !,"*** No DICOM Gateway Surrogate process is available for VistA Q/R Client"
  • Line Location: WAIT+17
Function Call: WRITE
  • Prompt: ?77,"***"
  • Line Location: WAIT+18
Function Call: WRITE
  • Prompt: !
  • Line Location: WAIT+19
Function Call: WRITE
  • Prompt: "*"
  • Line Location: WAIT+19
Function Call: WRITE
  • Prompt: !
  • Line Location: WAIT+20
Function Call: WRITE
  • Prompt: " (",GATEWAYHOSTNAME,")"
  • Line Location: WAIT+25
Function Call: WRITE
  • Prompt: "."
  • Line Location: WAIT+31
Function Call: WRITE
  • Prompt: !
  • Line Location: WAIT+40
Function Call: WRITE
  • Prompt: !
  • Line Location: WAIT+41
Function Call: WRITE
  • Prompt: "*"
  • Line Location: WAIT+41
Function Call: WRITE
  • Prompt: !,"*** The "
  • Line Location: WAIT+42
Function Call: WRITE
  • Prompt: $S(MODE="Q":"query",MODE="R":"retrieve")
  • Line Location: WAIT+43
Function Call: WRITE
  • Prompt: " was not completed by DICOM Gateway"
  • Line Location: WAIT+44
Function Call: WRITE
  • Prompt: " (",GATEWAYHOSTNAME,")"
  • Line Location: WAIT+45
Function Call: WRITE
  • Prompt: " ",$$FMTE^XLFDT(TIMESTAMP),?77,"***"
  • Line Location: WAIT+46
Function Call: WRITE
  • Prompt: !
  • Line Location: WAIT+47
Function Call: WRITE
  • Prompt: "*"
  • Line Location: WAIT+47
Function Call: WRITE
  • Prompt: !
  • Line Location: WAIT+48
Function Call: WRITE
  • Prompt: !!,"Error Message: "
  • Line Location: WAIT+56
Function Call: WRITE
  • Prompt: !,$G(^XTMP(MAGXTMP,HOSTNAME,$J,QRSTACK,"MESSAGE","MSG",I))
  • Line Location: WAIT+57
Function Call: WRITE
  • Prompt: !!,"The DICOM VISTA Q/R REQUEST QUEUE entries have already been deleted."
  • Line Location: KILL+4
Function Call: WRITE
  • Prompt: !!,"There is one entry in the DICOM VISTA Q/R REQUEST QUEUE."
  • Line Location: KILL+7
Function Call: WRITE
  • Prompt: !!,"There are "_X_" entries in the DICOM VISTA Q/R REQUEST QUEUE."
  • Line Location: KILL+11
Function Call: WRITE
  • Prompt: !!,"The DICOM VISTA Q/R REQUEST QUEUE file has been truncated."
  • Line Location: KILL+17
Function Call: WRITE
  • Prompt: !!,"The DICOM VISTA Q/R REQUEST QUEUE file has not been truncated."
  • Line Location: KILL+19

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^MAGDRMON ENABLED+1, ENABLED+2
^MAGDSTT(2006.541 - [#2006.541] ENTRY+11, ENTRY+12, ENTRY+14, ENTRY+17*, ENTRY+19*, ENTRY+23*, ENTRY+24*, ENTRY+26*, ENTRY+28*, ENTRY+29*
, ENTRY+30, KILL+2, KILL+15!, KILL+16*
^MAGDSTT(2006.543 - [#2006.543] ENTRY+41*
^TMP("MAG" SOPUIDR+6*, SOPUIDR+9*, SOPUIDR+10*, ENTRY+20, ENTRY+21
^XTMP( SOPUIDQ+4!, SOPUIDR+4!, ENTRY+7!, WAIT+7, WAIT+28, WAIT+33, WAIT+54, WAIT+57

Label References

Name Line Occurrences
$$WAIT ENTRY+35, ENTRY+39
ENTRY SOPUIDQ+5, SOPUIDR+12

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> ACNUMB SOPUIDR+6
BATCHQR SOPUIDQ+2~, SOPUIDQ+3*, SOPUIDR+2~, SOPUIDR+3*, ENTRY+33, ENTRY+36, ENTRY+42, WAIT+21, WAIT+25, WAIT+30
, WAIT+49, WAIT+55
CMOVEAET ENTRY+1~, ENTRY+35, ENTRY+39, ENTRY+41, WAIT~, WAIT+2*, WAIT+37*
DUZ ENTRY+19
GATEWAYHOSTNAME ENTRY+1~, ENTRY+46, WAIT+9*, WAIT+25, WAIT+45
>> HOSTNAME SOPUIDQ+4, SOPUIDR+4, ENTRY+7, ENTRY+19, WAIT+7, WAIT+28, WAIT+33, WAIT+54, WAIT+57
I ENTRY+1~, ENTRY+20*, ENTRY+23, ENTRY+24, ENTRY+27*, ENTRY+28, WAIT+1~, WAIT+6*, WAIT+28*, WAIT+57*
IEN2006541 ENTRY+1~, ENTRY+14*, ENTRY+15, ENTRY+19, ENTRY+23, ENTRY+24, ENTRY+26, ENTRY+28, WAIT+7, WAIT+28
, WAIT+33
>> IOBS ENTRY+44
J WAIT+1~, WAIT+16*, WAIT+19*, WAIT+41*, WAIT+47*
KEY ENTRY+1~, ENTRY+20*, ENTRY+21, ENTRY+23, ENTRY+24
>> MAGXTMP SOPUIDQ+4, SOPUIDR+4, ENTRY+7, ENTRY+19, WAIT+7, WAIT+28, WAIT+33, WAIT+54, WAIT+57
MODE ENTRY~, ENTRY+2*, ENTRY+3, ENTRY+4, ENTRY+19, ENTRY+32, ENTRY+38, WAIT+25, WAIT+43
PROMPT KILL+1~, KILL+8*, KILL+12*, KILL+14
>> QRSCP ENTRY+45
>> QRSTACK SOPUIDR+6, SOPUIDR+9, SOPUIDR+10, ENTRY+7, ENTRY+19, ENTRY+20, ENTRY+21, WAIT+7, WAIT+28, WAIT+33
, WAIT+54, WAIT+57
REQUESTDATETIME ENTRY+1~, ENTRY+18*, ENTRY+19, ENTRY+26
>> RUNNUMBER ENTRY+41
SHOWRRSL ENTRY~, ENTRY+8*, ENTRY+43, WAIT+59*
SUCCESS WAIT+1~, WAIT+2*, WAIT+6, WAIT+10*, WAIT+14, WAIT+34*, WAIT+36*, WAIT+59*, WAIT+62
TIMESTAMP WAIT+1~, WAIT+3*, WAIT+46
VALUE ENTRY+1~, ENTRY+21*, ENTRY+22*, ENTRY+23
X ENTRY+1~, ENTRY+47*, WAIT+1~, WAIT+7*, WAIT+8, WAIT+9, WAIT+33*, WAIT+35, WAIT+37, WAIT+54*
, WAIT+55, WAIT+57, KILL+1~, KILL+2*, KILL+3, KILL+6, KILL+11, KILL+14
ZERONODE ENTRY+1~, ENTRY+12*, ENTRY+13*, ENTRY+15*, ENTRY+16*, ENTRY+17, ENTRY+29

Marked Items

Name Field # of Occurrence
$T( ENTRY+4
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All