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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: MAGQE7

Package: Imaging

Routine: MAGQE7


Information

MAGQE7 ;WOIFO/LB - Imaging Utilities to support Monthly Report ; 18 Jan 2011 5:31 PM

Source Information

Source file <MAGQE7.m>

Entry Points

Name Comments DBIA/ICR reference
ACXREF(IEN,LAST) ;
INDEX(IEN,LAST) ;
FINDSITE(USER) ;Get the user's site - covered by IA 10060
BUILD ;if sent here there was no acquisition site or user's division is not set
PRINT ;Utility to print the exceptions in setting the AC cross reference in file 2006.95.
STARTPRT ;
HDR ;
LINE ;Display output
RESTART ;
SETXTMP ;
REINDEX ;

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Sorry, the XTMP global has been cleared, nothing to display. Quitting"
  • Line Location: PRINT+3
Function Call: WRITE
  • Prompt: !,"Exception list for entries in 2006.95 where an AC cross reference could not be set."
  • Line Location: PRINT+4
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+11
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: !?(IOM-$L(HEADING2)\2),HEADING2
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !?(IOM-$L(HEADING3)\2),HEADING3
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,?10,"___________________________________",!
  • Line Location: HDR+4
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
Function Call: WRITE
  • Prompt: !,"Nothing to process."
  • Line Location: RESTART+1
Function Call: WRITE
  • Prompt: !,"Last entry processed was IEN: "_IEN_", and indexing did complete."
  • Line Location: RESTART+4
Function Call: WRITE
  • Prompt: !,"Re-indexing scheduled TASK#: "_ZTSK
  • Line Location: REINDEX+12

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VA(200 - [#200] GETS^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call