Routine: MAGDSTAG

Information

MAGDSTAG ;WOIFO/PMK - Study Tracker - Automatic Retrieve Monitor; Aug 04, 2025@12:34:57

Name	Comments	DBIA/ICR reference
ENTRY	; Display Automatic Retrieve Status
HEADING	; display heading
STATS	;
DAYTIME(NOW)	;
IDLE(I,DONE)
ENABLED()	; check if monitor is active - P333 PMK 03/15/2022

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"The Automatic Retrieval Monitor is already running" Line Location: ENTRY+6
Function Call: WRITE	Prompt: @IOF Line Location: ENTRY+17
Function Call: WRITE	Prompt: @IOF Line Location: ENTRY+18
Function Call: WRITE	Prompt: !! Line Location: ENTRY+34
Function Call: WRITE	Prompt: !!,$$DAYTIME(TIMESTAMP)," ",ACNUMB,?34,"Sent from ",QRSCP,! Line Location: ENTRY+40
Function Call: WRITE	Prompt: @IOBS," ",@IOBS Line Location: ENTRY+44
Function Call: WRITE	Prompt: "No DICOM objects were retrieved" Line Location: ENTRY+47
Function Call: WRITE	Prompt: "DICOM objects retrieved: ",COMPLETED Line Location: ENTRY+48
Function Call: WRITE	Prompt: ! Condition for execution: K>1 Line Location: ENTRY+52
Function Call: WRITE	Prompt: A(K) Line Location: ENTRY+52
Function Call: WRITE	Prompt: ?TAB,X,!?TAB Line Location: HEADING+4
Function Call: WRITE	Prompt: "-" Line Location: HEADING+4
Function Call: WRITE	Prompt: ?34 Line Location: STATS+1
Function Call: WRITE	Prompt: "Total Retrieved: ",$G(COUNT("RETRIEVED"),0) Line Location: STATS+2
Function Call: WRITE	Prompt: " Fail:",$G(COUNT("FAILED"),0) Line Location: STATS+3
Function Call: WRITE	Prompt: " Warn:",$G(COUNT("WARNING"),0) Line Location: STATS+4
Function Call: WRITE	Prompt: ?78,$E("-\\|/",I),$C(8) Line Location: IDLE+2