
  PROCEDURE [XREF] dfp$store_served_family_entry
    (    served_family_table_entry: dft$served_family_table_entry;
     VAR served_family_table_index: dft$served_family_table_index;
     VAR status: ost$status);
?? PUSH (LISTEXT := ON) ??
*copyc dft$served_family_table
*copyc dft$served_family_table_index
*copyc ost$status
?? POP ??
