smartforms分页打印VIP专享VIP免费

1 功能： 根据内表，若数据条目很多，可将数据分页打印。 2 实现步骤： 2.1 创建“表单” 2.1.1 初始屏幕 输入 TCODE：smartforms，进入初始屏幕，点击“创建”，进入创建 2.1.2 创建过程 表格接口：定义输入参数，本程序中，有两个输入参数：需打印的内表数据和每页打印的行数。 全局定义：定义打印格式中需要的全局变量，有：总行数g_linesall，当前行标g_cu rrentline， 本页已打印输出的行数g_lines，总页数g_pagesall，当前页数g_pages.同时在“初始化”下，对这些变量初始：g_linesall 等于内表的行数，g_cu rrentline 初始化为1，g_lines 初始化为1， 根据每页打印行数和总行数，计算出需要打印的总页数，保存到g_pagesall，g_pages 初始化为0. 2.1.3 设计页和窗口 包括一个主窗口，多个次级窗口 2.1.4 具体设计—标题 窗口下添加一个“文本”元素，文本元素中输入要显示的信息，如本例中“学生信息” 2.1.5 具体设计—列标题 列表题的个数，根据实际需要确定，本例中是三个，分别是“学号”、“姓名”、“性别”。窗口下首先简历一个“模板”，然后确定列数，每一列对于那个的建立一个“本文”元素。 2.1.6 具体设计—主数据显示区 首先建立一个外层循环，用于循环输出数据。 2.1.6.1 主数据显示 在循环下，建立一个“模板”，模板为一行三列，对应内表的三列数据。 2.1.6.2 程序行 在循环下，模板后建立程序行 整理变量值： 判断当前页的行数 g_lines 的行数是否达到每页行数的限制，若达到，则设置页数+1。否则，判断当前行 g_cu rrentline 是否是全部数据的最后一行，若是，则根据需要补充空行，将空行数据保存到内表中。最后 g_cu rrentline+1. 2.1.6.3 循环补空行 循环保存空行的内表，补空行 2.1.6.4 建立“条件” 建立“条件”，在“TURE”下，建立“命令行”，跳转新页。 2.1.7 脚标 建立一个“文本”元素，输出格式为第&页/共&页，此格式在程序行中拼写 3 实现结果展示 此例中一共是1 0 条数据，每页显示行数需要输入，最后一页不满，需要补空行。本例中格式简单，在实际中，可根据需要设计布局 3.1 每页限制 4 行 3.2 每页限制 5 行