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 |  Used in RPC |  FileMan Files Accessed Via FileMan Db Call  | All
Print Page as PDF
Routine: MAGQBU6A

Package: Imaging

Routine: MAGQBU6A


Information

MAGQBU6A ;WIOFO/RMP Utility to find possible incorrect Image issues with the Import Queue File. ; 14 Oct 2010 10:12 AM

Source Information

Source file <MAGQBU6A.m>

Entry Points

Name Comments DBIA/ICR reference
GETRL(LIST) ; Get Redundant List (of shares)
DSPNL ; Display the original Network Location file
REPNAM ;Report residual duplicate names
RLOC(LIST,RESULT) ; Delete Network Location file entry
GRP(GRPIEN,PLACE,RESULT) ;
GRPEN(DUPIEN) ;
RLOCA(RESULT,RLOC) ; Delete Network Location file entry
; [RPC:MAGQ DEL NLOC ]
REQDUP ; Are there duplicate .01 entries? If so rename by adding A,B, etc.
RESTART ;
PRINT ;Print out the entries in files 2005 and 2005.1 whose fields were modified by the redundant share job
STARTPRT ;
HDR ;
LINE ;Display output
ERR ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Nothing to process, global does not exist."
  • Line Location: RESTART+9
Function Call: WRITE
  • Prompt: !,"No duplicate shares information available."
  • Line Location: RESTART+12
Function Call: WRITE
  • Prompt: !,"Sorry, the XTMP global has been cleared, nothing to display. Quitting"
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: !,"Image files 2005, 2005.1 & 2006.035 whose network location was reset as a result of redundant network location entries."
  • Line Location: PRINT+3
Function Call: WRITE
  • Prompt: !!,$S(+$D(ZTSK):">>> Job has been queued. The task number is "_ZTSK_".",1:">>> Unable to queue this job.")
  • Line Location: PRINT+10
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !?2,HEADING," Page: ",PAGE
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !,?10,"___________________________________",!
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,"File: "_FILE_" entry: "_IEN_" was modified by changing "_TEXT
  • Line Location: LINE+2
Function Call: WRITE
  • Prompt: !,"Press RETURN to continue or '^' to exit: "
  • Line Location: LINE+4
Function Call: READ
  • Variable: ANS
  • Timeout: DTIME
  • Line Location: LINE+5

Used in RPC

RPC Name Call Tags
MAGQ DEL NLOC RLOCA

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^MAG(2005.2 - [#2005.2] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  Used in RPC |  FileMan Files Accessed Via FileMan Db Call  | All