Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
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>

Call Graph

Call Graph Total: 4

Package Total Call Graph
VA Fileman 2 ^%DT  ^DIK  
Kernel 1 $$FMTH^XLFDT  
Toolkit 1 PURGE^XTERSUM1  

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
Kernel 3 XUERTRP AUTO CLEAN  XUERTRP CLEAN  XUERTRP TYPE  

Entry Points

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

External References

Name Field # of Occurrence
^%DT EN2, EN2+2, TYPE+2
^DIK KILLDAY+3
$$FMTH^XLFDT EN2+3, TYPE+2
PURGE^XTERSUM1 AUTO+7

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
  • Timeout: DTIME
  • Variable: X
  • 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
  • Prompt: "Starting Date to DELETE ERRORS from: "
  • Formatting: !
  • Timeout: DTIME
  • Variable: X
  • Line Location: EN2+0
Function Call: READ
  • Prompt: "Ending Date to DELETE ERRORS to: "
  • Formatting: !
  • Timeout: DTIME
  • Variable: X
  • 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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZTER(1 - [#3.075] COUNT+2, COUNT+3*, COUNT+4!, TYPE+6, TYPE+7!, TYPE+10*, KRANGE+4, KILLDAY+3
^XTV(8989.3 - [#8989.3] AUTO+2, AUTO+6

Label References

Name Line Occurrences
COUNT EN1+6, EN2+4
EN1 EN1+5
EN2 EN2, EN2+2
KILLDAY KRANGE+4
KRANGE EN1+6, EN2+4, AUTO+7

Naked Globals

Name Field # of Occurrence
^( TYPE+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%DT XTERPUR+3~, EN2*, EN2+2*, TYPE+1~, TYPE+2*
%H KILLDAY~, KILLDAY+3
CNT TYPE+1~, TYPE+5*, TYPE+8*, TYPE+10
DA KILLDAY+2~, KILLDAY+3*
DIK KILLDAY+2~, KILLDAY+3*
DTIME EN1+5, EN2, EN2+1, TYPE+3
I XTERPUR+3~, COUNT+1~, COUNT+2*
IX TYPE+1~, TYPE+6*, TYPE+7
U EN1+5, EN2, EN2+1, COUNT+3, AUTO+2, AUTO+6
X XTERPUR+3~, EN1+5*, EN1+6*, EN2*, EN2+1*, EN2+2*, COUNT+1~, COUNT+2*, COUNT+3
XTDAT XTERPUR+3~, EN2*, EN2+2, EN2+3*, EN2+4, COUNT+1~, COUNT+2*, COUNT+3, COUNT+4*, TYPE+1~
, TYPE+2*, TYPE+6, TYPE+7, TYPE+10, KRANGE~, KRANGE+2, KRANGE+4
XTDAT1 XTERPUR+3~, EN2+2*, EN2+3*, EN2+4
XTDH KRANGE+1~, KRANGE+3*, KRANGE+4*
XTDT AUTO+1~, AUTO+6*, AUTO+7
XTST KRANGE~, KRANGE+3
XTSTR TYPE+1~, TYPE+3*, TYPE+4, TYPE+7
XUSX AUTO+1~, AUTO+2*, AUTO+4*, AUTO+6
Y EN2, EN2+2, TYPE+1~, TYPE+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All