
  TYPE
    pft$group = record
      case group_type: pft$group_types of
      = pfc$public =
        ,
      = pfc$family =
        family_description: record
          family: ost$family_name,
        recend,
      = pfc$account =
        account_description: record
          family: ost$family_name,
          account: avt$account_name,
        recend,
      = pfc$project =
        project_description: record
          family: ost$family_name,
          account: avt$account_name,
          project: avt$project_name,
        recend,
      = pfc$user =
        user_description: record
          family: ost$family_name,
          user: ost$user_name,
        recend,
      = pfc$user_account =
        user_account_description: record
          family: ost$family_name,
          account: avt$account_name,
          user: ost$user_name,
        recend,
      = pfc$member =
        member_description: record
          family: ost$family_name,
          account: avt$account_name,
          project: avt$project_name,
          user: ost$user_name,
        recend,
      casend,
    recend;

*copyc avt$account_name
*copyc avt$project_name
*copyc ost$family_name
*copyc ost$user_name
*copyc pft$group_types
