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

Package: Imaging

Routine: MAGDCCU1


Information

MAGDCCU1 ;WOIFO/EdM - Failed Images Maintenance ; 01/03/2007 10:54

Source Information

Source file <MAGDCCU1.m>

Entry Points

Name Comments DBIA/ICR reference
REMOFAIL ; Remove all entries for a specific retired DICOM Gateway
REMOXMIT ; Remove all entries for a specific retired DICOM Gateway
RENAFAIL ; Rename all entries for a specific replaced DICOM Gateway
RENAXMIT ; Rename all entries for a specific replaced DICOM Gateway
GETGW(EXIST,WHERE) ; Get the name of a DICOM Gateway
WARN(NAME)

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,N," Entr",$S(N=1:"y",1:"ies")," removed.",!
  • Line Location: REMOFAIL+23
Function Call: WRITE
  • Prompt: !!,N," Entr",$S(N=1:"y",1:"ies")," removed.",!
  • Line Location: REMOXMIT+20
Function Call: WRITE
  • Prompt: !,"Old and new names should be different..."
  • Line Location: RENAFAIL+5
Function Call: WRITE
  • Prompt: !!,N," Entr",$S(N=1:"y",1:"ies")," renamed.",!
  • Line Location: RENAFAIL+16
Function Call: WRITE
  • Prompt: !,"Old and new names should be different..."
  • Line Location: RENAXMIT+5
Function Call: WRITE
  • Prompt: !!,N," Entr",$S(N=1:"y",1:"ies")," renamed.",!
  • Line Location: RENAXMIT+17
Function Call: WRITE
  • Prompt: !,"Enter the ",TYPE," ",TBL," of the DICOM Gateway: "
  • Line Location: GETGW+8
Function Call: READ
  • Variable: X
  • Timeout: $G(DTIME,300)
  • Line Location: GETGW+9
Function Call: WRITE
  • Prompt: !,"Enter the appropriate name for the DICOM Gateway."
  • Line Location: GETGW+13
Function Call: WRITE
  • Prompt: !,"The ""Host Name"" is the name of the computer that is assigned"
  • Line Location: GETGW+14
Function Call: WRITE
  • Prompt: !,"by the site's IRM and that follows official naming rules."
  • Line Location: GETGW+15
Function Call: WRITE
  • Prompt: !,"The ""System Title"" is the name that is assigned by the staff"
  • Line Location: GETGW+16
Function Call: WRITE
  • Prompt: !,"who operates the DICOM Gateway."
  • Line Location: GETGW+17
Function Call: WRITE
  • Prompt: !
  • Line Location: GETGW+18
Function Call: WRITE
  • Prompt: !!,"WARNING: this operation will irrevocably remove all entries"
  • Line Location: WARN+1
Function Call: WRITE
  • Prompt: !,"for the DICOM Gateway named """,NAME,"""."
  • Line Location: WARN+2
Function Call: WRITE
  • Prompt: !!,"Are you certain you wish to remove these entries? No//"
  • Line Location: WARN+3
Function Call: READ
  • Variable: X
  • Timeout: $G(DTIME,300)
  • Line Location: WARN+4
Info |  Source |  Entry Points |  Interaction Calls