用ABAP实现SM36的设置后台JOB

原创 2016年08月29日 17:16:16

设置后台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 在程序中启动后台JOB

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

SAP ABAP 的常用debug方式

SAP ABAP 的常用debug方式: 1. 直接在程序中设断点 在se38里面打上breakpoint,程序运行到该处即进入debug模式 2.background Job的debug 进...

Delphi7高级应用开发随书源码

  • 2003年04月30日 00:00
  • 676KB
  • 下载

调试后台作业的方法

有一些情况下,我们需要调试后台作业。 首先我们在SM37中找到这个已release的后台作业,选择它; 然后输入事务码:JDBG, 回车进入调试环境,单步调试或者打断点调试。...

用ABAP实现SM36的设置后台JOB

*&———————————————————————**& Report Z_BARRY_SET_JOB **& **&———————————————————————**& 设置后台Job,更多功能请看...
  • zeewjj
  • zeewjj
  • 2012年10月12日 12:27
  • 1843

SAP 如何定义后台job

SAP 如何定义后台job   有两种方法 1是se38执行可执行程序后,菜单栏‘程序’--->'后台执行',输入输出设备,ENTER两次后,选择开始时间(立刻执行,或定义日期时间,也可周期执行。。)...

ABAP用表格维护生成器维护数据sm30

之前做过一个这样的例子,但是在老师的指导下,觉得挺简单的 后来业务需要,需再做一个配置表,居然死活不成功 最后,经过多方面的努力,终于成功 现把步骤具体得记录下来,JUST FYI 1 用se11新建...

ABAP 调用SM30维护程序

  • 2015年12月30日 13:55
  • 102B
  • 下载

在HANA里设置后台Job

文字版(CSDN的图片上传太不方便了,实在没辙,最后就用为知笔记另存为了一张超大图片。。): HANA Schedule Background Job 序 最近在做BW&HANA的项目...

Hadoop实现AbstractJob简化Job设置

在 hadoop 中编写一个job一般都是采用下面的方式: Job job=new Job(); job.setXxx(); ... 这样感觉代码很多,而且参数还不好控制。比如,我想对...
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:用ABAP实现SM36的设置后台JOB
举报原因:
原因补充:

(最多只允许输入30个字)