
  TYPE
    clt$pdt_header = record
      version: clt$declaration_version,
      generation_date_time: ost$date_time,
      command_or_function: clt$command_or_function,
      number_of_parameter_names: clt$parameter_name_count,
      number_of_parameters: clt$parameter_count,
      number_of_required_parameters: clt$parameter_count,
      number_of_advanced_parameters: clt$parameter_count,
      number_of_hidden_parameters: clt$parameter_count,
      number_of_var_parameters: clt$parameter_count,
      status_parameter_number: 0 .. clc$max_parameters,
      help_module_name: pmt$program_name,
    recend;

*copyc clc$max_parameters
*copyc clt$command_or_function
*copyc clt$declaration_version
*copyc clt$parameter_count
*copyc clt$parameter_name_count
*copyc ost$date_time
*copyc pmt$program_name
