
  PROCEDURE [XREF] clp$store_utility_dialog_info
    (    utility: clt$utility_name;
         commands: ^clt$command_table;
         functions: ^clt$function_processor_table;
         create_scratch_segment: boolean;
     VAR dialog_info: ^clt$utility_dialog_info;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc clt$command_table
*copyc clt$function_processor_table
*copyc clt$utility_dialog_info
*copyc clt$utility_name
*copyc ost$status
?? POP ??
