
{ pdt install_configuration (input, i : file = $required
{                            error, e : file = $errors
{                            status)

?? PUSH (LISTEXT := ON) ??

  VAR
    install_configuration: [STATIC, READ, cls$pdt] clt$parameter_descriptor_table := [
      ^install_configuration_names, ^install_configuration_params];

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

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

{ INPUT I }
    [[clc$required], 1, 1, 1, 1, clc$value_range_not_allowed, [NIL, clc$file_value]],

{ ERROR E }
    [[clc$optional_with_default, ^install_configuration_dv2], 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_configuration_dv2: [STATIC, READ, cls$pdt_names_and_defaults] string (7) := '$errors';

?? POP ??
