
  PROCEDURE [XREF] rap$set_file_retention
    (    file: fst$file_reference;
         retention_period: pft$retention;
     VAR status: ost$status);


?? PUSH (LISTEXT := ON) ??
*copyc fst$file_reference
*copyc pft$retention
*copyc ost$status
?? POP ??
