
{* ZCYPCC  cyp$current_column *}

  FUNCTION [XREF] cyp$current_column ALIAS 'ZCYPCC'
    (file: cyt$file): cyt$page_width;

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

