设置后台Job,更多功能请看函数组:BTCH

DATA: jobcount LIKE tbtcjob-jobcount.
DATA: abort TYPE c,
      finish TYPE c,
      prelim TYPE c,
      ready TYPE c,
      run TYPE c,
      sched TYPE c.

PARAMETERS: p_name LIKE tbtcjob-jobname OBLIGATORY DEFAULT 'Z_BARRY_TEST_JOB',
            p_date LIKE sy-datum OBLIGATORY,
            p_time LIKE sy-uzeit OBLIGATORY.
SELECT-OPTIONS s_rept FOR sy-repid NO INTERVALS OBLIGATORY .

START-OF-SELECTION.
CALL FUNCTION 'JOB_OPEN' "定义一个Job
    EXPORTING
      jobname          = p_name
    IMPORTING
      jobcount         = jobcount "Job id
    EXCEPTIONS
      cant_create_job = 1
      invalid_job_data = 2
      jobname_missing = 3
      OTHERS           = 4.
IF sy-subrc <> 0.
    MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
            WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.

LOOP AT s_rept .
    CALL FUNCTION 'JOB_SUBMIT' "Scheduled 这个Job
      EXPORTING
        authcknam               = sy-uname
        jobcount                = jobcount
        jobname                 = p_name
        report                  = s_rept-low
*        VARIANT                 = 'TEST'
      EXCEPTIONS
        bad_priparams           = 1
        bad_xpgflags            = 2
        invalid_jobdata         = 3
        jobname_missing         = 4
        job_notex               = 5
        job_submit_failed       = 6
        lock_failed             = 7
        program_missing         = 8
        prog_abap_and_extpg_set = 9
        OTHERS                  = 10.
    IF sy-subrc <> 0.
      MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
              WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
    ENDIF.
ENDLOOP.

CALL FUNCTION 'JOB_CLOSE' "Release 这个Job
    EXPORTING
      jobcount             = jobcount
      jobname              = p_name
      sdlstrtdt            = p_date
      sdlstrttm            = p_time
    EXCEPTIONS
      cant_start_immediate = 1
      invalid_startdate    = 2
      jobname_missing      = 3
      job_close_failed     = 4
      job_nosteps          = 5
      job_notex            = 6
      lock_failed          = 7
      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.
ENDIF.

CALL FUNCTION 'SHOW_JOBSTATE'
    EXPORTING
      jobcount         = jobcount
      jobname          = p_name
    IMPORTING
      aborted          = abort
      finished         = finish
      preliminary      = prelim
      ready            = ready
      running          = run
      scheduled        = sched
    EXCEPTIONS
      jobcount_missing = 1
      jobname_missing = 2
      job_notex        = 3
      OTHERS           = 4.
IF sy-subrc <> 0.
    MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
            WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.

WRITE : / 'Canceled              :' , abort ,
          / 'Finished              :' , finish,
          / 'Scheduled Temporarily :' , prelim,
          / 'Ready for Execution   :' , ready,
          / 'Active                :' , run,
          / 'Scheduling Released   :' , sched.

用ABAP实现SM36的设置后台JOB相关推荐

  1. SAP SM36 后台作业设置全解析

    SM36是设置SAP周期性运行的事务码 来测试一下,首先先写一个程序: 我有一个zzp_people2的数据表. DATA : INT1 TYPE I. DATA : ITAB LIKE ZZP_PE ...

  2. 14.6 设置后台线程

    1.默认都不是后台线程, 通过setDaemon():方法来设置后台线程. 通过   对象.setDaemon(true);设置为后台线程,true表示是后台线程,false表示不是后台线程. 2.j ...

  3. django-vue-admin前端设置后台接口地址为127.0.0.1产生跨域问题解决办法

    django-vue-admin前端设置后台接口地址为127.0.0.1产生跨域问题解决办法: 不能设置成127.0.0.1,设置成节点的ip地址即可解决. 应该是脚手架本身存在问题导致的.

  4. redis设置后台启动,关闭后台redis

    1:设置后台启动 1:拷贝解压目录下的redis.conf配置文件到安装目录的bin目录下> cp redis.conf /usr/local/redis/bin/ 2:修改安装路径下的redi ...

  5. 华为手机v20计算机有没有历史记录,华为v20怎么设置后台运行

    大家好,我是时间财富网智能客服时间君,上述问题将由我为大家进行解答. 华为v20即荣耀V20.以关闭后台为例,华为v20设置后台运行的方法有: 1.在使用虚拟导航的情况下,点击虚拟导航里方框形多功能键 ...

  6. opencart设置后台中文

    1.打开后台System->Localisation->Languages,添加简体中文 (1)中文简体 (2)zh-cn (3)zh_CN.UTF-8,zh_CN,zh-Hans-CN, ...

  7. ABAP 在程序中启动后台JOB

    DATA: lv_job_name         LIKE tbtco-jobname,     "作业名   lv_job_nr           LIKE tbtco-jobcoun ...

  8. SAP Vim和ABAP Editor的个人设置

    Vim vim打开文件后默认不显示行号: 打开文件: -/.vimrc 配置文件里加入一行set nu即可. 然后就能显示行号了: ABAP Editor 每个user SE80的配置存在表RSEUM ...

  9. SAP ABAP 使用内存参数设置SET /GET PARAMTER ID

    更多内容关注公众号:SAP Technical SET /GET PARAMTER ID使用SPA/GPA 参数--SAP内存参数设置 这是在外部程序之间传送数据的最常用方法.使用EXPORT/IMP ...

最新文章

  1. python 福利彩票_使用Python买福彩,5个数字,20选5,有没买过
  2. Python 杨辉三角形的简单实现
  3. 如何使用iToolab FixGo for mac修复iPhone/iPad的系统问题
  4. iSCSI又称为IP-SAN
  5. linux arm 64 hard float abi,ARMHF(hard-float ABI for ARM)
  6. 前端开发必须说的那些事之——同源策略(same origin policy)
  7. linux重启openfire服务,Centos下Openfire详细安装过程
  8. 2021-08-01创建查询关键字及数据类型
  9. office 办公软件使用笔记
  10. ChinaSoft 论坛巡礼 | CCF-华为胡杨林基金-系统软件专项论坛
  11. cocos2dx 精灵触摸
  12. anaconda安装python3.6_Windows10配置Anaconda+Python3.6+TensorFlow+PyCharm
  13. ACwing 1018 最低通行费
  14. 俄勒冈大学计算机科学专业,俄勒冈大学计算机与信息科学专业怎么样?高薪热门专业等你来...
  15. Android 镜像
  16. 已解决:‘ascii‘ codec can‘t encode characters in position 18-20: ordinal not in range(128)
  17. html生成无序列表,HTML的ul无序列表
  18. 分享一个动图制作软件,简单实用易操作,迅速得到你想要的GIF效果图
  19. 台湾精锐APEX行星减速机行业应用案例
  20. linux u盘合并分区,Linux U盘分区格式化 fdisk命令

热门文章

  1. 【pmcaff专栏】吴波:浅谈O2O行业的猎人与农夫
  2. 【pmcaff】 会员原创讨论贴:互联网产品部-如此的羁绊
  3. 高情商女神是怎样炼成的?直播EMUI9.0制胜法宝“陪伴实测”
  4. 如何限制某些用户发送Internet邮件
  5. WPF实例秀——不用属性也Binding
  6. 如何在Kubernetes中暴露服务访问
  7. jsonp+ajax实现浏览器跨域通信
  8. unity android 集成指南
  9. Adapter (适配器模式)
  10. 转:c# 根据当前时间获取,本周,本月,本季度,月初,月末,各个时间段