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

Package: Toolkit

Routine: XTERPUR


Information

XTERPUR ;ISC-SF.SEA/JLI - DELETE ENTRIES FROM ERROR TRAP ;02/11/11

Source Information

Source file <XTERPUR.m>

Entry Points

Name Comments DBIA/ICR reference
EN1
EN2
COUNT ;Update FM zero node counts
TYPE ;To purge a type of error.
AUTO ;Auto clean of error over ZTQPARAM days ago.
KRANGE(XTST,XTDAT) ;Kill error trap before this date
KILLDAY(%H) ;Kill all errors on one day

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"To Remove ALL entries except the last N days, simply enter the number N at the"
  • Line Location: EN1+0
Function Call: WRITE
  • Prompt: !,"prompt. OTHERWISE, enter return at the first prompt, and a DATE at the"
  • Line Location: EN1+1
Function Call: WRITE
  • Prompt: !,"second prompt. If no ending date is entered at the third prompt, then only"
  • Line Location: EN1+2
Function Call: WRITE
  • Prompt: !,"the date specified will be deleted. If an ending date is entered that range",!,"of dates INCLUSIVE will be deleted from the error log.",!!
  • Line Location: EN1+3
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: EN1+5
Function Call: WRITE
  • Prompt: !!,"Number of days to leave in error trap: "
  • Line Location: EN1+5
Function Call: WRITE
  • Prompt: !?5,"Enter a number (zero or greater) of days to be left in the Error Log.",!,"A RETURN will result in a request for dates"
  • Line Location: EN1+5
Function Call: WRITE
  • Prompt: !!?10,"DONE"
  • Line Location: EN1+6
Function Call: READ
  • Formatting: !
  • Prompt: "Starting Date to DELETE ERRORS from: "
  • Variable: X
  • Timeout: DTIME
  • Line Location: EN2+0
Function Call: READ
  • Formatting: !
  • Prompt: "Ending Date to DELETE ERRORS to: "
  • Variable: X
  • Timeout: DTIME
  • Line Location: EN2+1
Function Call: WRITE
  • Prompt: $C(7)," ??"
  • Line Location: EN2+1
Function Call: WRITE
  • Prompt: $C(7)," ?? CAN NOT BE EARLIER"
  • Line Location: EN2+3
Function Call: WRITE
  • Prompt: !
  • Line Location: TYPE+5
Function Call: WRITE
  • Prompt: "-"
  • Line Location: TYPE+7
Function Call: WRITE
  • Prompt: "."
  • Line Location: TYPE+8

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^%ZTER(1 - [#3.075] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call