 TYPE
{ Form Attributes }

    fdt$form_attribute = record
      put_value_status: fdt$put_value_status {output} ,
      case key: fdt$change_form_key {input} of {input}

      = fdc$add_event =
        event_name: ost$name,
        event_label: ost$name,
        event_trigger: fdt$event_trigger,
        case event_action: fdt$event_action of
        = fdc$execute_command =
        p_event_command: ^fdt$event_command,
        casend,

     = fdc$add_event_v1 =
        event_name_v1: ost$name,
        event_label_v1: fdt$event_label_v1,
        event_trigger_v1: fdt$event_trigger,
        event_trigger_reassignment_v1: boolean,
        case event_action_v1: fdt$event_action of
        = fdc$execute_command =
        p_event_command_v1: ^fdt$event_command,
        casend,

      = fdc$add_form_comment =
        p_form_comment: ^fdt$comment,

      = fdc$add_display_definition =
        display_attribute: fdt$display_attribute_set,
        display_name: ost$name,

      = fdc$delete_all_displays =
        ,

      = fdc$delete_all_events =
        ,

      = fdc$delete_event, fdc$delete_display_definition =
        name: ost$name,

      = fdc$delete_form_comments =
        ,

      = fdc$design_display_attribute =
        design_display_attribute: fdt$display_attribute_set,

      = fdc$design_variable_name =
        design_variable_name: ost$name,

      = fdc$error_message_form =
        error_message_form: ost$name,

      = fdc$event_form =
        event_form_definition: fdt$event_form_definition,

      = fdc$fast_form_creation =
        fast_form_creation: boolean,

      = fdc$form_area =
        form_area: fdt$form_area,

      = fdc$form_display_attribute =
        form_display_attribute: fdt$display_attribute_set,

      = fdc$form_help =
        form_help: fdt$help_definition,

      = fdc$form_language =
        form_language: ost$natural_language,

      = fdc$form_name =
        form_name: ost$name,

      = fdc$form_processor =
        form_processor: fdt$form_processor,

      = fdc$help_message_form =
        help_message_form: ost$name,

      = fdc$hidden_editing =
        hidden_editing: boolean,

      = fdc$invalid_data_character =
        invalid_data_character: fdt$invalid_data_character,

      = fdc$message_form = {Same as fdc$error_message_form}
        message_form: ost$name,

      = fdc$unused_form_entry =
        ,

      = fdc$validate_variable_values =
        validate_variable_values: boolean,

      casend
    recend;

*copyc fdt$change_form_key
*copyc fdt$comment
*copyc fdt$display_attribute_set
*copyc fdt$event_action
*copyc fdt$event_command
*copyc fdt$event_form_definition
*copyc fdt$event_label_v1
*copyc fdt$event_trigger
*copyc fdt$form_area
*copyc fdt$form_processor
*copyc fdt$help_definition
*copyc fdt$invalid_data_character
*copyc fdt$put_value_status

*copyc ost$natural_language
*copyc ost$name
