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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: DGYMFIL2

Package: Registration

Routine: DGYMFIL2


Information

DGYMFIL2 ;ALB/MLI - Set File Access Codes for MAS files ; October 20, 1994

Source Information

Source file <DGYMFIL2.m>

Call Graph

Call Graph

Call Graph Total: 1

Package Total Call Graph
VA FileMan 1 ^DIR  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

protocol O screenman SM broker B event driver Ed print P extended action Ea limited protocol LP edit E server Se subscriber Su inquire I run routine RR action A

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Registration 1 DGYMFILE  

Entry Points

Name Comments DBIA/ICR reference
PRINT ; generate listing of existing vs recommended file access
HEADER ; print header for comparison report
LOAD ; load files into TMP global
FILES ; list of file numbers and names for MAS files w/recommended access
WRITE(X) ; write out the access codes in columns

External References

Name Field # of Occurrence
^DIR HEADER+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$S(CUR=REC:" ",1:"*"),+X
  • Line Location: PRINT+9
Function Call: WRITE
  • Prompt: ?8,$E(X,1,30)
  • Line Location: PRINT+9
Function Call: WRITE
  • Prompt: ?8,$E(X,1,30)
  • Line Location: PRINT+9
Function Call: WRITE
  • Prompt: !
  • Line Location: PRINT+10
Function Call: WRITE
  • Prompt: ?43,"Currently meets recommended levels"
  • Line Location: PRINT+11
Function Call: WRITE
  • Prompt: !,BRKLINE
  • Line Location: PRINT+13
Function Call: WRITE
  • Prompt: ?43,$P(X,"^",1),?51,$P(X,"^",2),?57,$P(X,"^",3),?65,$P(X,"^",4),?75,$P(X,"^",5)
  • Line Location: WRITE+4
Function Call: WRITE
  • Prompt: @IOF,!?29,"MAS File Access Report",?70,"PAGE: ",$J(PAGE,2)
  • Line Location: HEADER+4
Function Call: WRITE
  • Prompt: !!," File",?8,"File",?54,"File Access Type"
  • Line Location: HEADER+5
Function Call: WRITE
  • Prompt: !," Number",?8,"Name",?43,"DD",?49,"Read",?55,"Write",?63,"Delete",?73,"Laygo"
  • Line Location: HEADER+6
Function Call: WRITE
  • Prompt: !,LINE
  • Line Location: HEADER+7
Routine Call
  • DIR
  • Line Location:
    • HEADER+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC - [#1] PRINT+7, PRINT+9
^TMP($J LOAD+1*

Label References

Name Line Occurrences
HEADER PRINT+3, PRINT+8
WRITE PRINT+10, PRINT+12

Naked Globals

Name Field # of Occurrence
^("DEL" PRINT+7
^("LAYGO" PRINT+7
^("RD" PRINT+7
^("WR" PRINT+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BRKLINE PRINT+1~, PRINT+2*, PRINT+13
CUR PRINT+5~, PRINT+7*, PRINT+9, PRINT+10, PRINT+11
DIR HEADER+1~
DIR(0 HEADER+3*
DIRUT HEADER+1~
DTOUT HEADER+1~
DUOUT HEADER+1~
FLAG PRINT+1~, PRINT+2*, PRINT+3, PRINT+4, PRINT+8, HEADER+3*
I PRINT+1~, PRINT+4*, LOAD+1*
IOF HEADER+4
IOSL PRINT+8
IOST HEADER+3
LINE PRINT+1~, PRINT+2*, HEADER+7
PAGE PRINT+1~, PRINT+2*, HEADER+2*, HEADER+3, HEADER+4
REC PRINT+5~, PRINT+6*, PRINT+9, PRINT+11, PRINT+12
X PRINT+1~, PRINT+4*, PRINT+6, PRINT+7, PRINT+9*, WRITE~, WRITE+4, HEADER+1~, LOAD+1*
Y HEADER+1~, HEADER+3

Marked Items

Name Field # of Occurrence
$T(FILES+I PRINT+4, LOAD+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All