
{* ZCYPDST  cyp$display_standard_title *}

  PROCEDURE [XREF] cyp$display_standard_title ALIAS 'ZCYPDST'
       (file: cyt$file;
        title: string (* <= cyc$title_size);
        lines_after_title: cyt$page_length;
    VAR status: ost$status);

?? PUSH (LISTEXT := ON) ??
*copyc cyt$file
*copyc ost$status
*copyc cyt$new_page_procedure
*copyc cyt$page_length
*copyc cye$exception_conditions
?? POP ??
