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 |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: XBCOUNT

Package: IHS VA Utilities

Routine: XBCOUNT


Information

XBCOUNT ; IHS/ADC/GTH - COUNT ENTRIES IN FILEMAN FILE ; [ 02/07/97 3:02 PM ]

Source Information

Source file <XBCOUNT.m>

Call Graph

Call Graph Total: 1

Package Total Call Graph
VA Fileman 1 ^DIC  

Entry Points

Name Comments DBIA/ICR reference
START ;
ENT ;
LOOP ;
EOJ ;

External References

Name Field # of Occurrence
^DIC LOOP+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"This program counts primary entries for a FileMan file.",!
  • Line Location: START+2
Function Call: WRITE
  • Prompt: !
  • Line Location: LOOP+1
Function Call: WRITE
  • Prompt: !!,"DIC file entry invalid or does not exist!",!
  • Line Location: ENT+1
Function Call: WRITE
  • Prompt: !!,"Bad global!!",!
  • Line Location: ENT+3
Function Call: WRITE
  • Prompt: !!,"FileMan file ",FILE," contains ",CTR," entries. High DFN=",XBHI,!
  • Line Location: ENT+7
Function Call: WRITE
  • Prompt: !,"The 0th node says ",XBY,", ",XBX," respectively."
  • Line Location: ENT+9
Function Call: READ
  • Timeout: $G(DTIME,999)
  • Variable: ANS
  • Line Location: ENT+10
Function Call: WRITE
  • Prompt: !," Do you want me to fix it? (Y/N) Y//"
  • Line Location: ENT+10
Function Call: WRITE
  • Prompt: " Done"
  • Line Location: ENT+10
Routine Call
  • DIC
  • Line Location:
    • LOOP+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC - [#1] ENT+1, ENT+2

Label References

Name Line Occurrences
EOJ LOOP+4
LOOP ENT+1, ENT+3, ENT+11

Naked Globals

Name Field # of Occurrence
^(0 ENT+8, ENT+10*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ANS START+1~, ENT+10*, EOJ+1!
CTR START+1~, ENT+5*, ENT+6*, ENT+7, ENT+10, EOJ+1!
DIC LOOP+2*, EOJ+1!
DIC(0 LOOP+2*
DTIME ENT+10
FILE START+1~, LOOP+5*, ENT+1, ENT+2, ENT+7, EOJ+1!
GBL START+1~, ENT+2*, ENT+3, ENT+4*, ENT+6, ENT+8, ENT+10*, EOJ+1!
L START+1~, ENT+6*, EOJ+1!
NXT START+1~, ENT+5*, ENT+6*, ENT+8*, ENT+10*, EOJ+1!
U ENT+8, ENT+10
XBHI ENT+5*, ENT+6*, ENT+7, ENT+10, EOJ+1!
XBX ENT+8*, ENT+9, ENT+10, EOJ+1!
XBY ENT+8*, ENT+9, ENT+10, EOJ+1!
>> Y LOOP+4, LOOP+5
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All