Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
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>

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

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
Info |  Source |  Entry Points |  Interaction Calls