SAP-ABAP:SMARTFORMS复杂逻辑实现:条件显隐、循环表格、全局变量与子例程调用

SAP-ABAP:SMARTFORMS复杂逻辑实现:条件显隐、循环表格、全局变量与子例程调用 SMARTFORMS复杂逻辑实现条件显隐、循环表格、全局变量与子例程调用爱喝水的鱼丶· 2026年7月 · 系列SMARTFORMS/ADOBE表单开发8篇· 功能进阶篇第1篇前言在前两篇文章中我们系统学习了SMARTFORMS和ADOBE表单的基础开发流程。本篇将聚焦SMARTFORMS的进阶开发技巧解决实际业务中常见的复杂需求。SMARTFORMS 进阶条件显隐不同单据/不同状态循环表格与分页Main Window Table全局变量跨窗口/累计计算子例程调用金额大写/复杂逻辑Conditions 标签页配置Repeat table header 每页重复Global Data 定义与读写Form Routines 定义Program Lines 调用本篇核心内容章节核心主题解决的业务问题一、条件显隐窗口/字段的条件显示配置不同订单类型显示不同模板二、循环表格与分页Main Window与Table配合多页打印、页眉重复显示三、全局变量表单内部数据传递跨窗口数据共享、累计计算四、子例程调用Program Lines节点金额小写转大写、复杂逻辑处理五、综合实战完整复杂表单示例采购订单多页打印全流程前置知识开始本篇前建议你已掌握SMARTFORMS基础概念窗口、文本节点、表格节点表单接口参数定义Importing/TablesABAP驱动程序的基本调用流程一、条件显隐窗口与字段的动态显示1.1 条件显隐概述条件显隐是SMARTFORMS中最常用的进阶功能用于根据业务数据动态控制窗口或字段的显示/隐藏。场景条件说明不同订单类型显示不同模板AUART字段NB类型显示普通采购模板ZNB类型显示直运采购模板审核状态显示水印LOEKZ字段已审核订单显示已审核水印特定供应商显示额外条款LIFNR字段特定供应商显示特殊协议条款大额订单显示审批区域NETWR金额超过10万元显示审批签字区1.2 条件配置方法条件配置主要通过节点属性面板的Conditions标签页实现。操作步骤选中需要设置条件的节点窗口/文本/表格等切换到右侧属性面板的Conditions标签页点击添加条件按钮设置条件表达式条件表达式格式 字段名 比较运算符 值 示例 IS_EKKO-AUART NB GV_NETWR 100000 IS_EKKO-LOEKZ L1.3 采购订单条件显隐示例场景说明根据采购订单类型AUART显示不同的表头区域NB标准采购订单显示普通采购信息ZNB直运采购订单显示直运物流信息SA框架协议显示协议有效期表单结构设计HEADER固定显示公司Logo和标题MAIN 主窗口包含条件窗口CONDITIONAL_NB条件IS_EKKO-AUART NB、CONDITIONAL_ZNB条件IS_EKKO-AUART ZNB、CONDITIONAL_SA条件IS_EKKO-AUART SAAPPROVAL 窗口条件GV_NETWR 100000仅大额订单显示审批签字区对于复杂条件逻辑可设置多个条件并用AND/OR连接。1.4 条件显隐常见问题问题原因解决方案条件不生效字段值类型不匹配检查字段类型字符类型需加引号条件语法错误使用了非法运算符使用SMARTFORMS支持的比较运算符变量为空导致条件失败变量未初始化在驱动程序中初始化变量条件窗口位置错误窗口类型不正确条件窗口应为Secondary Window类型二、循环表格与分页实现2.1 表格分页核心概念SMARTFORMS的表格分页能力依赖于Main Window主窗口。只有在Main Window中的内容才能自动分页。Main Window唯一可自动分页Table 表格节点必须放在此处自动产生新页容纳超出内容Secondary Window不能自动分页适用于固定区域表头/表尾每页自动重复显示⚠️关键规则表格节点必须放在Main Window中2.2 采购订单多页打印示例需求说明当采购订单行项目超过一页时需要表头在每页重复显示、表格数据跨页连续显示、汇总金额在最后一页显示、页脚在每页显示。表单结构HEADER_WINDOWSecondary公司Logo 订单标题MAIN_WINDOWMain表格ITEMS数据源IT_EKPO包含表头行勾选Repeat table header on every page、数据行、汇总行FOOTER_WINDOWSecondary页码 签字区关键属性配置表头行☑ Repeat table header on every page表格☑ Allow pagination汇总行置于表格最后一行仅末页显示2.3 分页常见问题问题原因解决方案表格不分页放在了Secondary Window中将表格移到Main Window表头不重复未设置Repeat属性勾选Repeat table header on every page汇总行每页显示放在了数据行区域将汇总行设置为表格最后一行表格数据截断主窗口高度不够增加主窗口高度或减小表格行高三、全局变量表单内部数据传递3.1 全局变量概念全局变量是SMARTFORMS表单内部的数据存储单元用于在不同窗口、不同节点之间传递数据。定义位置Form Interface →Global Data标签页。作用范围为整个表单生命周期从表单激活到打印完成。典型用途GV_TOTAL累计金额GV_ITEM_COUNT项目数量GV_FIRST_PAGE是否首页标志LV_TAX_AMOUNT税额计算结果LS_CURRENT当前行项目结构类型为LINE OF EKPO或具体结构类型3.2 全局变量使用示例累计计算表格数据行的Program Lines节点GV_TOTAL GV_TOTAL IT_EKPO-NETWR. GV_ITEM_COUNT GV_ITEM_COUNT 1.跨窗口显示页脚窗口的文本节点合计金额: GV_TOTAL(CurrencyISO)条件判断条件: GV_FIRST_PAGE X 说明: 仅在首页显示此窗口3.3 全局变量初始化可在表单初始化的Program Lines节点中初始化GV_TOTAL 0. GV_ITEM_COUNT 0. GV_FIRST_PAGE X.也可通过表单接口的Importing参数从驱动程序传入初始值。3.4 全局变量常见问题问题原因解决方案变量值不更新未在Program Lines中赋值使用GV_VAR value赋值变量类型不匹配类型定义错误检查并修改变量类型初始值未设置忘记初始化在Program Lines或接口中初始化四、子例程调用Program Lines节点实战4.1 Program Lines节点概述Program Lines是SMARTFORMS中嵌入ABAP代码的节点支持大部分ABAP语句、可读写全局变量和接口参数、可调用功能模块在表单处理时按顺序执行。不支持屏幕操作相关语句如WRITE、INPUT等。4.2 金额小写转大写实现⚠️重要提示SMARTFORMS中FORM…ENDFORM子例程不能在Program Lines节点中定义必须在Form Interface → Form Routines标签页中定义。Program Lines中只能通过PERFORM调用已定义的子例程。子例程定义位置Form Interface →Form Routines标签页。说明以下为简化版实现代码覆盖到万级的常用金额转换。如需支持亿级以上可在此基础上扩展单位映射表。*------------------------------------------------------------------* * 子例程: 金额小写转大写简化版 * 定义位置: Form Interface → Form Routines 标签页 *------------------------------------------------------------------* FORM amount_to_chinese USING pv_amount TYPE p CHANGING pv_result TYPE string. DATA: lv_int_part TYPE p LENGTH 16 DECIMALS 0. DATA: lv_dec_amt TYPE p LENGTH 16 DECIMALS 2. DATA: lv_str TYPE string. * 中文数字映射使用CASE确保健壮性 DATA: lv_cn_digit TYPE string. DATA: lv_cn_unit TYPE string. * 单位映射表 TYPES: BEGIN OF ty_unit_map, idx TYPE i, unit TYPE string, END OF ty_unit_map. DATA: lt_units TYPE TABLE OF ty_unit_map. lt_units VALUE #( ( idx 0 unit ) 个位 ( idx 1 unit 拾 ) 十位 ( idx 2 unit 佰 ) 百位 ( idx 3 unit 仟 ) 千位 ( idx 4 unit 万 ) 万位 ). * 分离整数和小数 lv_int_part pv_amount. lv_dec_amt pv_amount - lv_int_part. * 处理整数部分 IF lv_int_part 0. pv_result 零元. ELSE. WRITE lv_int_part TO lv_str. CONDENSE lv_str NO-GAPS. DATA: lv_result TYPE string. DATA: lv_len TYPE i. lv_len STRLEN( lv_str ). DO lv_len TIMES. DATA: lv_digit_char TYPE c. DATA: lv_unit_idx TYPE i. lv_digit_char lv_strsy-index(1). 使用CASE语句转换数字避免字符算术运算的兼容性问题 CASE lv_digit_char. WHEN 0. lv_cn_digit 零. WHEN 1. lv_cn_digit 壹. WHEN 2. lv_cn_digit 贰. WHEN 3. lv_cn_digit 叁. WHEN 4. lv_cn_digit 肆. WHEN 5. lv_cn_digit 伍. WHEN 6. lv_cn_digit 陆. WHEN 7. lv_cn_digit 柒. WHEN 8. lv_cn_digit 捌. WHEN 9. lv_cn_digit 玖. ENDCASE. 计算单位位置从右向左 lv_unit_idx lv_len - sy-index. 获取对应单位 READ TABLE lt_units INTO DATA(ls_unit) WITH KEY idx lv_unit_idx. IF sy-subrc 0. lv_cn_unit ls_unit-unit. ELSEIF lv_unit_idx 5 OR lv_unit_idx 9. lv_cn_unit 万. ENDIF. lv_result lv_result lv_cn_digit lv_cn_unit. ENDDO. CONCATENATE lv_result 元 INTO pv_result. ENDIF. * 处理小数部分角和分 IF lv_dec_amt 0. DATA: lv_jiao_char TYPE c. DATA: lv_fen_char TYPE c. DATA: lv_dec_str TYPE string. WRITE lv_dec_amt TO lv_str. CONDENSE lv_str NO-GAPS. lv_jiao_char lv_str1(1). lv_fen_char lv_str2(1). CASE lv_jiao_char. WHEN 0. lv_dec_str 零. WHEN 1. lv_dec_str 壹角. WHEN 2. lv_dec_str 贰角. WHEN 3. lv_dec_str 叁角. WHEN 4. lv_dec_str 肆角. WHEN 5. lv_dec_str 伍角. WHEN 6. lv_dec_str 陆角. WHEN 7. lv_dec_str 柒角. WHEN 8. lv_dec_str 捌角. WHEN 9. lv_dec_str 玖角. ENDCASE. IF lv_fen_char 0. CASE lv_fen_char. WHEN 1. CONCATENATE lv_dec_str 壹分 INTO lv_dec_str. WHEN 2. CONCATENATE lv_dec_str 贰分 INTO lv_dec_str. WHEN 3. CONCATENATE lv_dec_str 叁分 INTO lv_dec_str. WHEN 4. CONCATENATE lv_dec_str 肆分 INTO lv_dec_str. WHEN 5. CONCATENATE lv_dec_str 伍分 INTO lv_dec_str. WHEN 6. CONCATENATE lv_dec_str 陆分 INTO lv_dec_str. WHEN 7. CONCATENATE lv_dec_str 柒分 INTO lv_dec_str. WHEN 8. CONCATENATE lv_dec_str 捌分 INTO lv_dec_str. WHEN 9. CONCATENATE lv_dec_str 玖分 INTO lv_dec_str. ENDCASE. ENDIF. CONCATENATE pv_result lv_dec_str INTO pv_result. ELSE. CONCATENATE pv_result 整 INTO pv_result. ENDIF. ENDFORM.在Program Lines中调用子例程PERFORM amount_to_chinese USING GV_TOTAL CHANGING GV_AMOUNT_CN.4.3 Program Lines最佳实践原则说明示例简洁性代码尽量简洁复杂逻辑放驱动程序简单计算在表单内复杂查询在驱动程序可读性添加必要的注释* 累加金额到全局变量效率避免在循环内执行数据库查询数据查询放驱动程序表单只处理显示健壮性处理异常情况检查变量是否为空再使用五、综合实战复杂采购订单表单5.1 需求概述基于前四章的技术实现一个功能完整的采购订单打印表单多页自动分页、条件显隐、全局变量累计、金额小写转大写、页眉页脚每页重复、仅末页显示汇总。5.2 表单结构设计ZMM_PURCHASE_ORDER_V2 表单结构 ├── Form Interface │ ├── Importing: IV_EBELN, IS_EKKO, GV_NETWR │ └── Tables: IT_EKPO ├── Global Data │ ├── GV_TOTAL (累计金额) │ ├── GV_ITEM_COUNT (项目计数) │ ├── GV_AMOUNT_CN (大写金额) │ ├── GV_TAX_AMOUNT (税额) │ └── GV_APPROVAL_REQUIRED (需审批标志) └── Page: PAGE1 ├── HEADER (Secondary) - 每页显示 ├── MAIN (Main Window) │ ├── Program Lines: 初始化 │ ├── CONDITIONAL_WINDOW_NB (条件: IS_EKKO-AUART NB) │ ├── CONDITIONAL_WINDOW_ZNB (条件: IS_EKKO-AUART ZNB) │ ├── TABLE: ITEMS │ │ ├── Row 0: 表头 (Repeat on every page) │ │ ├── Row 1: 数据 (累计GV_TOTAL) │ │ └── Row 2: 汇总 (计算税额、调子例程) │ ├── TAX_WINDOW (税额显示) │ └── AMOUNT_CN_WINDOW (大写金额显示) └── FOOTER (Secondary) - 每页显示 └── APPROVAL_WINDOW (条件: GV_APPROVAL_REQUIRED X)5.3 完整Program Lines代码初始化GV_TOTAL 0. GV_ITEM_COUNT 0. GV_AMOUNT_CN . GV_TAX_AMOUNT 0. GV_APPROVAL_REQUIRED .数据行处理GV_TOTAL GV_TOTAL IT_EKPO-NETWR. GV_ITEM_COUNT GV_ITEM_COUNT 1.汇总行处理GV_TAX_AMOUNT GV_TOTAL * 0.13. IF GV_TOTAL 100000. GV_APPROVAL_REQUIRED X. ENDIF. PERFORM amount_to_chinese USING GV_TOTAL CHANGING GV_AMOUNT_CN.六、总结与附录6.1 本篇知识点汇总主题核心要点关键技术条件显隐基于数据动态控制显示Conditions标签页、多条件组合循环表格分页Main Window自动分页表格Repeat属性、跨页显示全局变量跨窗口数据共享Global Data定义、Program Lines读写子例程调用封装复杂逻辑Form Routines定义、PERFORM调用6.2 开发最佳实践原则建议优先级简单逻辑表单内实现复杂逻辑驱动程序实现可读性变量命名规范添加注释性能避免表单内频繁数据库查询可维护性使用子例程封装逻辑6.3 常见问题排查清单问题类型排查步骤条件不生效检查条件表达式语法 → 确认字段值类型 → 验证变量已初始化表格不分页确认在Main Window中 → 检查Allow pagination属性 → 验证数据源全局变量不更新检查Program Lines是否执行 → 确认变量类型正确 → 验证赋值位置子例程不调用检查子例程定义在Form Routines中 → 确认参数类型匹配 → 验证PERFORM语法附录条件表达式语法运算符说明示例等于FIELD X不等于FIELD / 大于/小于AMOUNT 1000 / 大于等于/小于等于STATUS 1AND / OR与/或COND1 AND COND2下一篇预告《ADOBE表单样式定制JavaScript脚本、动态样式、二维码/条形码嵌入开发》爱喝水的鱼丶· ABAP技术专栏 · 2026年7月