
  TYPE
    clt$check_parameters_procedure = ^procedure
           (    parameter_value_table: ^clt$parameter_value_table;
                which_parameter: clt$which_parameter;
            VAR status: ost$status);

*copyc clt$parameter_value_table
*copyc clt$which_parameter
*copyc ost$status
