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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: AZHKDELF

Package: Local Area Programs

Routine: AZHKDELF


Information

AZHKDELF ;CHANGE DELETE FLAG FOR TOP NODE, WILL ALLOW YOU TO DELETE THE ENTRY IN THE GLOBAL [ 08/05/88 8:24 AM ]

Source Information

Source file <AZHKDELF.m>

Entry Points

Name Comments DBIA/ICR reference
AGAIN ;
RD1
RDSET0 ;
EOJ
ERROR ;
KILL
RDSET1
RDL

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This Routine disallows/allows DELETE ACCESS"
  • Line Location: AZHKDELF+4
Function Call: READ
  • Prompt: "Enter the Global Number "
  • Formatting: !
  • Timeout: DTIME
  • Variable: GN
  • Line Location: RDL+0
Function Call: WRITE
  • Prompt: !!,"GLOBAL DOES NOT EXIST, TRY AGAIN",$C(7)
  • Line Location: RDL+1
Function Call: WRITE
  • Prompt: !!,"Enter 1 to DISALLOW, 0 to ALLOW DELETE ACCESS "
  • Line Location: RD1+0
Function Call: WRITE
  • Prompt: !!,"You now have DELETE ACCESS for GLOBAL "_GN
  • Line Location: RDSET0+2
Function Call: WRITE
  • Prompt: !!,"You DO NOT have DELETE ACCESS for GLOBAL "_GN
  • Line Location: RDSET1+1
Function Call: WRITE
  • Prompt: !!,"REMEMBER TO RESET THE DELETE ACCESS",$C(7)
  • Line Location: EOJ+0
Function Call: WRITE
  • Prompt: !!,"Do you want to change another entry?"
  • Line Location: AGAIN+1
Function Call: WRITE
  • Prompt: !!,$C(7),"INVALID ENTRY",!!
  • Line Location: ERROR+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD( RDL+1, RDSET0+1*, RDSET1*

Label References

Name Line Occurrences
@( RD1+2
AGAIN RDSET1+1
EOJ RDSET0+2
KILL RDL
RD1 ERROR+2
RDL RDL+1, AGAIN+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DTIME AZHKDELF+3*, RDL, RD1+1, AGAIN+2
GN AZHKDELF+2*, RDL*, RDL+1, RDSET0+1, RDSET0+2, RDSET1, RDSET1+1, KILL!
OF AZHKDELF+2*, RD1+1*, RD1+2, KILL!
YN AZHKDELF+2*, AGAIN+2*, AGAIN+3, KILL!
Info |  Source |  Entry Points |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All