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: %ZTBKC

Package: Kernel

Routine: %ZTBKC


Information

%ZTBKC ;SF/GJL - GLOBAL BLOCK COUNT ;05/24/2007 686246.738699

Source Information

Source file <ZTBKC.m>

Entry Points

Name Comments DBIA/ICR reference
READ
STRIP
QUOTES
SYNTAX
SYNTAX2
QQ ;Double question mark response
SHOW ;Show current selection
DSEL ;Ask directory
XTNDHELP ;Extended help
READY
DQ ;
QUIT
ALL ;All Globals in Directory
ALLEXIT
ALLM11 ;Directory at
ENCOUNT ; X = Full Global Reference: NAME(SUB1,...,SUBn)
; Surrounding/doubled quotes should have been removed from subscripts
; The count is not accurate for subscripts containing commas
EXIT

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"This version of the Block Count Utility does not support this version of Cache'"
  • Line Location: %ZTBKC+10
Function Call: WRITE
  • Prompt: !!,"Block Count for Global ^"
  • Line Location: READ+0
Function Call: WRITE
  • Prompt: %BS,"//"
  • Line Location: READ+0
Function Call: READ
  • Variable: X
  • Timeout: $S($D(DTIME):DTIME,1:300),!
  • Line Location: READ+1
Function Call: WRITE
  • Prompt: !,$C(7),"Wild cards not allowed as part of the global name."
  • Line Location: STRIP+3
Function Call: WRITE
  • Prompt: !,$C(7),"Only alphanumerics are allowed in global names."
  • Line Location: STRIP+7
Function Call: WRITE
  • Prompt: $S(Y=0:" doesn't exist.",1:"OK")
  • Line Location: STRIP+12
Function Call: WRITE
  • Prompt: !,"Enter: * for all globals in current directory, or"
  • Line Location: SYNTAX+0
Function Call: WRITE
  • Prompt: !,"Enter: a FULL Global Reference, e.g. ^DD(3,""GL""), or"
  • Line Location: SYNTAX+1
Function Call: WRITE
  • Prompt: !," ^ "
  • Line Location: SYNTAX+2
Function Call: WRITE
  • Prompt: "or NULL "
  • Condition for execution: %BS=""
  • Line Location: SYNTAX+2
Function Call: WRITE
  • Prompt: "to quit."
  • Line Location: SYNTAX+2
Function Call: WRITE
  • Prompt: !!,"Enter: ? for this help, or"
  • Line Location: SYNTAX+3
Function Call: WRITE
  • Prompt: !," ?? for more help."
  • Line Location: SYNTAX+4
Function Call: WRITE
  • Prompt: !,?5,"I'm sorry, but I don't understand your use of quotes."
  • Line Location: SYNTAX2+0
Function Call: WRITE
  • Prompt: !,"Please surround string subscripts with quotes and any quote"
  • Line Location: SYNTAX2+1
Function Call: WRITE
  • Prompt: !,"which is a part of the subscript should be doubled."
  • Line Location: SYNTAX2+2
Function Call: WRITE
  • Prompt: !!,?20,"You have not selected any globals.",!
  • Line Location: SHOW+3
Function Call: WRITE
  • Prompt: @IOF,!,"You have selected the following globals:",!
  • Line Location: SHOW+5
Function Call: WRITE
  • Prompt: !,?8,"^"_$P(%A,U)
  • Line Location: SHOW+7
Function Call: WRITE
  • Prompt: !!,?20,"You have not selected any globals.",!
  • Line Location: DSEL+3
Function Call: WRITE
  • Prompt: !
  • Line Location: DSEL+11
Function Call: WRITE
  • Prompt: !
  • Line Location: DSEL+13
Function Call: WRITE
  • Prompt: "."
  • Line Location: DSEL+14
Function Call: WRITE
  • Prompt: @IOF,!,?35,"More Help",!
  • Line Location: XTNDHELP+2
Function Call: WRITE
  • Prompt: !,?10,"Globals that contain commas in subscripts may not produce accurate"
  • Line Location: XTNDHELP+3
Function Call: WRITE
  • Prompt: !,?10,"block counts. Also, avoid specifying full global references"
  • Line Location: XTNDHELP+4
Function Call: WRITE
  • Prompt: !,?10,"that contain commas in the subscripts when entering globals"
  • Line Location: XTNDHELP+5
Function Call: WRITE
  • Prompt: !,?10,"at the 'Block Count for Global ^' prompt."
  • Line Location: XTNDHELP+6
Function Call: WRITE
  • Prompt: !,?10,""
  • Line Location: XTNDHELP+7
Function Call: WRITE
  • Prompt: !,?10,"After entering a double question mark ('??') response to the"
  • Line Location: XTNDHELP+8
Function Call: WRITE
  • Prompt: !,?10,"'Block Count for Global ^' prompt, enter 'S' for a listing"
  • Line Location: XTNDHELP+9
Function Call: WRITE
  • Prompt: !,?10,"of globals selected or 'D' to de-select globals from this list."
  • Line Location: XTNDHELP+10
Function Call: WRITE
  • Prompt: !
  • Line Location: XTNDHELP+11
Function Call: WRITE
  • Prompt: !!,?20,"No globals have been selected!!!",!
  • Line Location: READY+1
Function Call: WRITE
  • Prompt: !,"Output results on"
  • Line Location: READY+2
Function Call: WRITE
  • Prompt: "s"
  • Condition for execution: X>1
  • Line Location: DQ+1
Function Call: WRITE
  • Prompt: $C(7)," NOT AVAILABLE!!!!"
  • Line Location: ALLM11+1
Info |  Source |  Entry Points |  Interaction Calls