?? RIGHT := 110 ??
MODULE fmm$tables;
?? PUSH (LISTEXT := ON) ??
*copyc oss$job_paged_literal
?? POP ??

?? TITLE := 'NOS/VE :  File Management' ??
?? NEWTITLE := '  [XDCL] COMMON VARIABLE DECLARATIONS', EJECT ??
{}
{   This module contains static variables for basic access method routines.}
{}

  VAR
    {Selector for fmc$entry_free used for #SCAN }
    fmv$entry_free_selector: [XDCL, READ, #GATE, oss$job_paged_literal] packed array [0 .. 255] of boolean :=
          [REP 32 of FALSE, TRUE, REP 223 of FALSE];

  VAR
    {Selector for fmc$entry_assigned used for #SCAN }
    fmv$entry_assigned_selector: [XDCL, READ, #GATE, oss$job_paged_literal] packed array [0 .. 255] of
          boolean := [REP 65 of FALSE, TRUE, REP 190 of FALSE];

MODEND fmm$tables;

