
  PROCEDURE [XREF] fmp$setup_job_environment_info
    (    cycle_description_p: {input^} ^fmt$cycle_description;
         path_handle_p: ^fmt$path_handle;
         job_environment_information_p: {output^}
          ^fst$job_environment_information;
     VAR object_information_p: ^SEQ ( * ));

?? PUSH (LISTEXT := ON) ??
*copyc fmt$cycle_description
*copyc fmt$path_handle
*copyc fst$job_environment_information
?? POP ??

