计算打印页数到最后一页上

data g_line type i . "打印行数
data g_mod type i.
data g_times type i.
g_line = lines( gt_item ).
g_mod = g_line mod 10.
g_times = 10 - g_mod.

if g_mod is not initial. "填充空行
  do g_times times.
    append initial line to gt_item.
    enddo.
    endif.

s_page = g_line div 10 ."总页数
if g_line > 0 .
  s_page = s_page + 1.
endif.

合计到最后一页 添加一个可选的  参数SFSY-FORMPAGES = S_PAGE 
全局定义 S_PAGE  TYPE  CATS_TABIX