
{ pdt install_config_bin (error, e : file = $errors
{                            status)

?? PUSH (LISTEXT := ON) ??

  VAR
    install_config_bin: [STATIC, READ, cls$pdt] clt$parameter_descriptor_table := [^install_config_bin_names,
      ^install_config_bin_params];

  VAR
    install_config_bin_names: [STATIC, READ, cls$pdt_names_and_defaults] array [1 .. 3] of
      clt$parameter_name_descriptor := [['ERROR', 1], ['E', 1], ['STATUS', 2]];

  VAR
    install_config_bin_params: [STATIC, READ, cls$pdt_parameters] array [1 .. 2] of clt$parameter_descriptor
      := [

{ ERROR E }
    [[clc$optional_with_default, ^install_config_bin_dv1], 1, 1, 1, 1, clc$value_range_not_allowed, [NIL,
      clc$file_value]],

{ STATUS }
    [[clc$optional], 1, 1, 1, 1, clc$value_range_not_allowed, [NIL, clc$variable_reference,
      clc$array_not_allowed, clc$status_value]]];

  VAR
    install_config_bin_dv1: [STATIC, READ, cls$pdt_names_and_defaults] string (7) := '$errors';

?? POP ??
