
{   This common deck contains the type declarations for the attributes
{ used in the descriptive file label.  Each field has a source
{ variable associated with it, describing where the value origianated.

  TYPE
    bat$descriptive_file_attributes = record
      application_info: pft$application_info,
      application_info_source: amt$attribute_source,
      global_access_mode: pft$usage_selections,
      global_access_mode_source: amt$attribute_source,
      global_file_name: ost$binary_unique_name,
      global_file_name_source: amt$attribute_source,
      global_share_mode: pft$share_selections,
      global_share_mode_source: amt$attribute_source,
      internal_cycle_name: ost$binary_unique_name,
      internal_cycle_name_source: amt$attribute_source,
      permanent_file: boolean,
      permanent_file_source: amt$attribute_source,
    recend;

*copyc osd$unique_name
*copyc amt$attribute_source
*copyc amt$file_byte_address
*copyc ost$binary_unique_name
*copyc pft$application_info
*copyc pft$share_selections
*copyc pft$usage_selections
