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 ; Nov 16, 2022@12:05:44

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

Package Total Caller Graph
Imaging 9 MAGD MAGDSTT QUEUE DELETE  MAGDSTAB  MAGDSTAC  MAGDSTAD  MAGDSTAE  MAGDSTAF  MAGDSTQ  MAGDSTV1  
MAGDSTV2  

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+17
CONTINUE^MAGDSTQ ENTRY+5, WAIT+22, WAIT+50, WAIT+58
DISPLAY^MAGDSTQ5 ENTRY+47
$$ENABLED^MAGDSTV1 SOPUIDR+9
$$FMTE^XLFDT WAIT+46
$$NOW^XLFDT ENTRY+29, 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+44
Function Call: WRITE
  • Prompt: @IOBS," ",@IOBS
  • Line Location: ENTRY+55
Function Call: WRITE
  • Prompt: "Performing retrieve from """,QRSCP,""" from DICOM Gateway"
  • Line Location: ENTRY+56
Function Call: WRITE
  • Prompt: " (",GATEWAYHOSTNAME,")"
  • Line Location: ENTRY+57
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+6
Function Call: WRITE
  • Prompt: !!,"There is one entry in the DICOM VISTA Q/R REQUEST QUEUE."
  • Line Location: KILL+10
Function Call: WRITE
  • Prompt: !!,"There are "_X_" entries in the DICOM VISTA Q/R REQUEST QUEUE."
  • Line Location: KILL+14
Function Call: WRITE
  • Prompt: !!,"The DICOM VISTA Q/R REQUEST QUEUE file has been truncated."
  • Line Location: KILL+20
Function Call: WRITE
  • Prompt: !!,"The DICOM VISTA Q/R REQUEST QUEUE file has not been truncated."
  • Line Location: KILL+22

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^MAGDRMON ENABLED+1, ENABLED+2
^MAGDSTT(2006.541 - [#2006.541] ENTRY+12, ENTRY+14, ENTRY+15, ENTRY+17*, ENTRY+20*, ENTRY+21*, ENTRY+23, ENTRY+25, ENTRY+28*, ENTRY+30*
, ENTRY+34*, ENTRY+35*, ENTRY+37*, ENTRY+39*, ENTRY+40*, ENTRY+41, KILL+2, KILL+4, KILL+18!, KILL+19*
, KILL+24
^MAGDSTT(2006.543 - [#2006.543] ENTRY+52*
^TMP("MAG" SOPUIDR+6*, SOPUIDR+9*, SOPUIDR+10*, ENTRY+31, ENTRY+32
^XTMP( SOPUIDQ+4!, SOPUIDR+4!, ENTRY+8!, WAIT+7, WAIT+28, WAIT+33, WAIT+54, WAIT+57

Label References

Name Line Occurrences
$$WAIT ENTRY+46, ENTRY+50
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+44, ENTRY+47, ENTRY+53, WAIT+21, WAIT+25, WAIT+30
, WAIT+49, WAIT+55
CMOVEAET ENTRY+1~, ENTRY+46, ENTRY+50, ENTRY+52, WAIT~, WAIT+2*, WAIT+37*
DIVISION ENTRY+13*, ENTRY+15, ENTRY+17, ENTRY+18, ENTRY+21, ENTRY+23, ENTRY+25, ENTRY+28, ENTRY+30, ENTRY+34
, ENTRY+35, ENTRY+37, ENTRY+39, ENTRY+40, KILL+1~, KILL+3*, KILL+4, KILL+18, KILL+19
DUZ ENTRY+30
DUZ(2 ENTRY+13, KILL+3
GATEWAYHOSTNAME ENTRY+1~, ENTRY+57, WAIT+9*, WAIT+25, WAIT+45
>> HOSTNAME SOPUIDQ+4, SOPUIDR+4, ENTRY+8, ENTRY+30, WAIT+7, WAIT+28, WAIT+33, WAIT+54, WAIT+57
I ENTRY+1~, ENTRY+31*, ENTRY+34, ENTRY+35, ENTRY+38*, ENTRY+39, WAIT+1~, WAIT+6*, WAIT+28*, WAIT+57*
IEN2006541 ENTRY+1~, ENTRY+25*, ENTRY+26, ENTRY+30, ENTRY+34, ENTRY+35, ENTRY+37, ENTRY+39, WAIT+7, WAIT+28
, WAIT+33
>> IOBS ENTRY+55
J WAIT+1~, WAIT+16*, WAIT+19*, WAIT+41*, WAIT+47*
KEY ENTRY+1~, ENTRY+31*, ENTRY+32, ENTRY+34, ENTRY+35
>> MAGXTMP SOPUIDQ+4, SOPUIDR+4, ENTRY+8, ENTRY+30, WAIT+7, WAIT+28, WAIT+33, WAIT+54, WAIT+57
MODE ENTRY~, ENTRY+2*, ENTRY+3, ENTRY+4, ENTRY+30, ENTRY+43, ENTRY+49, WAIT+25, WAIT+43
PROMPT KILL+1~, KILL+11*, KILL+15*, KILL+17
>> QRSCP ENTRY+56
>> QRSTACK SOPUIDR+6, SOPUIDR+9, SOPUIDR+10, ENTRY+8, ENTRY+30, ENTRY+31, ENTRY+32, WAIT+7, WAIT+28, WAIT+33
, WAIT+54, WAIT+57
REQUESTDATETIME ENTRY+1~, ENTRY+29*, ENTRY+30, ENTRY+37
>> RUNNUMBER ENTRY+52
SHOWRRSL ENTRY~, ENTRY+9*, ENTRY+54, 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+32*, ENTRY+33*, ENTRY+34
X ENTRY+1~, ENTRY+58*, WAIT+1~, WAIT+7*, WAIT+8, WAIT+9, WAIT+33*, WAIT+35, WAIT+37, WAIT+54*
, WAIT+55, WAIT+57, KILL+1~, KILL+4*, KILL+5, KILL+9, KILL+14, KILL+17
ZERONODE1 ENTRY+1~, ENTRY+14*, ENTRY+16*, ENTRY+18*, ENTRY+19*, ENTRY+20
ZERONODE2 ENTRY+1~, ENTRY+23*, ENTRY+24*, ENTRY+26*, ENTRY+27*, ENTRY+28, ENTRY+40

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