  PROCEDURE [XREF] rap$assemble_installation_path
    (    system_catalog: rat$path;
         subproduct_info_pointers: rat$subproduct_info_pointers;
         path_selection: rat$subproduct_install_paths;
     VAR assembled_path_p: ^pft$path;
     VAR sequence_p: ^SEQ( * );
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc ost$status
*copyc pft$path
*copyc rat$path
*copyc rat$subproduct_info_pointers
*copyc rat$subproduct_install_paths
?? POP ??
