
  PROCEDURE [XREF] clp$find_cmnd_or_func_in_prog
    (    command_or_function_name: ost$name;
         command_or_function: clt$command_or_function;
     VAR work_area {input, output} : ^clt$work_area;
     VAR local_file_name: amt$local_file_name;
     VAR ring_attributes: amt$ring_attributes;
     VAR search_info: clt$command_library_search_info;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc amt$local_file_name
*copyc amt$ring_attributes
*copyc clt$command_or_function
*copyc clt$command_library_search_info
*copyc clt$work_area
*copyc ost$name
*copyc ost$status
?? POP ??

