  TYPE
    dft$family_access_kinds = (dfc$remote_file_access, dfc$remote_login_access,
          dfc$job_leveling_access),
    dft$family_access = set of dft$family_access_kinds;

