
  PROCEDURE [XREF] stp$get_active_set_list
    (VAR active_set_list: stt$set_list;
     VAR actual_number_of_sets: stt$number_of_sets);

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