
{* ZCYPCPN  cyp$current_page_number *}

  FUNCTION [XREF] cyp$current_page_number ALIAS 'ZCYPCPN'
    (display_file: cyt$file): integer;

?? PUSH (LISTEXT := ON) ??
*copyc cyt$file
?? POP ??

