 PROCEDURE [XREF] DFP$DISPLAY_SERVED_FAMILY_TABLE
   (VAR display_identifier: dft$display_identifier;
    VAR message_written: boolean;
    VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc ost$status
*copyc dft$display_identifier
?? POP ??
