
  PROCEDURE [XREF] pfp$get_set_list
    (VAR set_list: stt$set_list;
     VAR number_of_sets: stt$number_of_sets;
     VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc ost$status
*copyc stt$number_of_sets
*copyc stt$set_list
?? POP ??

