
{* ZCYPPDP  cyp$position_display_page *}

  PROCEDURE [XREF] cyp$position_display_page ALIAS 'ZCYPPDP'
   (    display_file: cyt$file;
        line_number: cyt$page_length;
    VAR status: ost$status);

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