abap screen中,不管是控件标签条是否含向导创建的标签,后续如果要新增页签是不需要删了重画,只需要添加即可:https://www.cnblogs.com/JackeyLove/p/13576291.html?ivk_sa=1024320u
本质上添加页签就是在之前存在的页签上增加一个按钮,功能码和参考字段要和以前的一样
*&SPWIZARD: FUNCTION CODES FOR TABSTRIP 'TAB100' CONSTANTS: BEGIN OF c_tab100, tab1 LIKE sy-ucomm VALUE 'TAB100_FC1', tab2 LIKE sy-ucomm VALUE 'TAB100_FC2', tab3 LIKE sy-ucomm VALUE 'TAB100_FC3', “ADD END OF c_tab100. MODULE tab100_active_tab_set OUTPUT. tab100-activetab = g_tab100-pressed_tab. CASE g_tab100-pressed_tab. WHEN c_tab100-tab1. g_tab100-subscreen = '0101'. WHEN c_tab100-tab2. g_tab100-subscreen = '0102'. WHEN c_tab100-tab3. g_tab100-subscreen = '0103'."ADD WHEN OTHERS. *&SPWIZARD: DO NOTHING ENDCASE. ENDMODULE. MODULE tab100_active_tab_get INPUT. ok_code = sy-ucomm. CASE ok_code. WHEN c_tab100-tab1. g_tab100-pressed_tab = c_tab100-tab1. WHEN c_tab100-tab2. g_tab100-pressed_tab = c_tab100-tab2. WHEN c_tab100-tab3. g_tab100-pressed_tab = c_tab100-tab3. WHEN OTHERS. *&SPWIZARD: DO NOTHING ENDCASE. ENDMODULE.
原文地址:http://www.cnblogs.com/seven1314pp/p/16831146.html
1. 本站所有资源来源于用户上传和网络,如有侵权请邮件联系站长!
2. 分享目的仅供大家学习和交流,请务用于商业用途!
3. 如果你也有好源码或者教程,可以到用户中心发布,分享有积分奖励和额外收入!
4. 本站提供的源码、模板、插件等等其他资源,都不包含技术服务请大家谅解!
5. 如有链接无法下载、失效或广告,请联系管理员处理!
6. 本站资源售价只是赞助,收取费用仅维持本站的日常运营所需!
7. 如遇到加密压缩包,默认解压密码为"gltf",如遇到无法解压的请联系管理员!
8. 因为资源和程序源码均为可复制品,所以不支持任何理由的退款兑现,请斟酌后支付下载
声明:如果标题没有注明"已测试"或者"测试可用"等字样的资源源码均未经过站长测试.特别注意没有标注的源码不保证任何可用性