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

Package: Imaging

Routine: MAGIP333


Information

MAGIP333 ;WOIFO/PMK - Install code for MAG*3.0*333; Jan 15, 2026@08:41:46

Source Information

Source file <MAGIP333.m>

Entry Points

Name Comments DBIA/ICR reference
ERROR ;
PRE ;
KILL20061211 ; kill the Q/R CHECK DIVISION field in file 2006.1
; P305 incorrrectly set the field #211 information to 8;E1,1
; This neeeds to be reset to 8;1
KILL2006541 ; kill the DICOM VISTA Q/R REQUEST QUEUE (file #2006.541) DD
; Killing the old DD is necessary to add the DIVISION
KILLTRMENU ; remove the TeleReader Menu
; The TeleReader Menu will be reinstalled with DISPLAY ORDER=85
POS ;
SET20061212 ; Set field 212
; setting these fields will set the delimiter for 212
SETTRMENU ; Reinstall TeleReader Menu with DISPLAY ORDER=85 - P349 PMK 01/14/2026
UPDATE() ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!," Removal of Telereader Menu: ",$S(STATUS:"Success",1:"Failure")
  • Line Location: KILLTRMENU+4
Function Call: WRITE
  • Prompt: !!," Reinstall of Telereader Menu: ",$S(STATUS:"Success",1:"Failure")
  • Line Location: SETTRMENU+3
Info |  Source |  Entry Points |  Interaction Calls