  PROCEDURE [XREF] dfp$get_family_access
    (    family: ost$family_name;
     VAR family_known: boolean;
     VAR family_access: dft$family_access;
     VAR server_state: dft$server_state;
     VAR leveler_status: jmt$jl_job_leveler_status);

?? PUSH (LISTEXT := ON) ??
*copyc dfe$error_condition_codes
*copyc dft$family_access
*copyc dft$server_state
*copyc jmt$jl_job_leveler_status
*copyc ost$user_identification
?? POP ??
