news 2026/5/11 16:50:43

SAP ABAP程序提交后台JOB执行实例

作者头像

张小明

前端开发工程师

1.2k 24
文章封面图
SAP ABAP程序提交后台JOB执行实例

一、代码

当一个报表程序ALV数据过多,点击功能按钮执行过慢时可以选择提交后台JOB执行。如下为提交后台执行的form

FORM frm_submit_job . DATA: lv_jobname LIKE tbtcjob-jobname, lv_jobcount LIKE tbtcjob-jobcount, lt_stable TYPE TABLE OF rsparams. DATA: lv_str TYPE string. lv_jobname = sy-cprog. "程序名 CALL FUNCTION 'JOB_OPEN' EXPORTING jobname = lv_jobname IMPORTING jobcount = lv_jobcount EXCEPTIONS cant_create_job = 1 invalid_job_data = 2 jobname_missing = 3 OTHERS = 99. IF sy-subrc <> 0. MESSAGE ID sy-msgid TYPE 'E' NUMBER sy-msgno WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4. ENDIF. "获取当前选择屏幕值情况存临时变式 CALL FUNCTION 'RS_REFRESH_FROM_SELECTOPTIONS' EXPORTING curr_report = sy-cprog TABLES selection_table = lt_stable EXCEPTIONS not_found = 1 no_report = 2 OTHERS = 3. "用临时变式后台执行当前程序并返回 SUBMIT (sy-cprog) WITH SELECTION-TABLE lt_stable VIA JOB lv_jobname NUMBER lv_jobcount AND RETURN. IF sy-subrc = 0. CALL FUNCTION 'JOB_CLOSE' EXPORTING jobcount = lv_jobcount jobname = lv_jobname strtimmed = 'X' EXCEPTIONS OTHERS = 8. IF sy-subrc <> 0. MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4. ELSE. MESSAGE s112(bt) WITH lv_jobname 'Released'. "跳转SM37 CONCATENATE 'BTCH2170-JOBNAME=' lv_jobname INTO lv_str. CALL FUNCTION 'TH_CREATE_MODE' EXPORTING transaktion = 'SM37' del_on_eot = 0 parameters = lv_str EXCEPTIONS OTHERS = 4. ENDIF. ENDIF. ENDFORM. " FRM_SUBMIT_JOB

二、注意事项

2.1 选择屏幕勾选后台执行时

如下图,直接执行时因为主程序END-OF-SELECTION事件还未完全执行完,所以后台的JOB能获取到当前ALV的数据,可以不用再取数据,可直接执行功能并输出(注意输出ALV JOB假脱机才能看到执行情况,如下图2)。

2.2 按钮提交JOB时

当提交后台job为状态栏按钮时,sy-batch = 'X' 时也需要查询数据并且输出ALV,因为当前程序已经执行完,后台JOB无法获取当前程序数据。

版权声明: 本文来自互联网用户投稿,该文观点仅代表作者本人,不代表本站立场。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如若内容造成侵权/违法违规/事实不符,请联系邮箱:809451989@qq.com进行投诉反馈,一经查实,立即删除!
网站建设 2026/5/11 16:50:03

32、Windows Server 数据复制与加密技术全解析

Windows Server 数据复制与加密技术全解析 1. DFS 概述与应用 DFS(分布式文件系统)用于将相同内容分发到组织内的多个站点。但要注意,DFS 并非备份方案,因为一个文档中的错误会复制到所有其他位置。在配置 DFS 托管文件时,需思考文件是否真的需要复制到多个位置,若是,…

作者头像 李华
网站建设 2026/5/10 5:39:52

微振动如何做?

在电子洁净厂房的装修设计中&#xff0c;微振控制是确保精密设备稳定运行、保障产品质量的关键环节。为有效解决微振问题&#xff0c;需从场地选址、结构设计、设备选型与安装、施工管理、以及监测与维护等方面进行系统性规划。以下是具体措施&#xff0c;具体就随北京恒帆减振…

作者头像 李华
网站建设 2026/5/11 16:50:08

如何训练专属Embedding模型提升检索质量?

如何训练专属Embedding模型提升检索质量&#xff1f; 在构建智能问答系统时&#xff0c;你是否遇到过这样的情况&#xff1a;用户问“CRM工单怎么升级&#xff1f;”&#xff0c;系统却返回了“客户满意度调查流程”&#xff1b;或者提问“EHR系统登录失败怎么办”&#xff0c;…

作者头像 李华
网站建设 2026/5/10 18:35:48

新手必看:Vivado固化程序烧写硬件环境搭建

从零开始搞定FPGA程序固化&#xff1a;Vivado烧写实战全解析 你有没有遇到过这样的情况&#xff1f; 在Vivado里辛辛苦苦写完代码、综合实现、生成比特流&#xff0c;用JTAG下载到FPGA上功能一切正常。可一拔线、一断电——再上电&#xff0c;板子“瘫了”&#xff1f;LED不闪…

作者头像 李华
网站建设 2026/5/9 7:25:39

客户成功经理的得力助手:快速响应客户疑问

客户成功经理的得力助手&#xff1a;快速响应客户疑问 在客户成功团队的日常工作中&#xff0c;一个看似简单的问题却常常耗费大量时间&#xff1a;“我们上次是怎么给客户配置单点登录的&#xff1f;”“这个功能的 SLA 到底包含哪些场景&#xff1f;”面对不断迭代的产品文档…

作者头像 李华
网站建设 2026/5/10 16:40:11

高频段去耦电容阻抗特性:系统学习与应用

高频去耦电容的真相&#xff1a;为什么100nF比10μF更“能打”&#xff1f;你有没有遇到过这种情况——系统跑着跑着就复位&#xff0c;示波器一抓电源纹波&#xff0c;发现尖峰蹭蹭往上冲&#xff1f;换了更大容值的电容也没用&#xff0c;甚至更糟&#xff1f;别急&#xff0…

作者头像 李华