关闭

用ABAP实现SM36的设置后台JOB

556人阅读 评论(0) 收藏 举报
分类:

设置后台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.

1
0
查看评论
发表评论
* 以上用户言论只代表其个人观点,不代表CSDN网站的观点或立场

abap submit 的使用方法 不同情况

1、最普通的用法 *Code used to execute a report SUBMIT Zreport. 2、带select-options程序的Submit的用法 *C...
  • zeewjj
  • zeewjj
  • 2013-11-19 18:23
  • 5812

SAP后台执行大数据量报表(鹦鹉学舌篇)

适用场景:查询类报表。 适用人员:所有。 案例需求:如需要查询导出整年或者近几年的所有采购合同的执行情况表,由于此报表纵深查询了采购合同对应的采购订单以及发货信息,开票信息等多个环节,查询速度相当缓慢...
  • zhongguomao
  • zhongguomao
  • 2017-02-06 09:16
  • 1507

SAP ABAP程序优化-多线程并行处理

转载请标明出处:http://blog.csdn.net/wanglei880526/article/details/8949754 实际项目实施过程中,我们会遇到程序性能优化的问题,这里介绍一种方...
  • zhongguomao
  • zhongguomao
  • 2013-05-23 10:08
  • 8602

ABAP 在程序中启动后台JOB

DATA: lv_job_name         LIKE tbtco-jobname,     "作业名  ...
  • zhongguomao
  • zhongguomao
  • 2016-08-29 17:12
  • 845

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

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

ABAP 调用SM30维护程序

  • 2015-12-30 13:55
  • 102B
  • 下载

在HANA里设置后台Job

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

Hadoop实现AbstractJob简化Job设置

在 hadoop 中编写一个job一般都是采用下面的方式: Job job=new Job(); job.setXxx(); ... 这样感觉代码很多,而且参数还不好控制。比如,我想对...
  • lizhikelizhike
  • lizhikelizhike
  • 2013-09-10 18:36
  • 489

Job36行业招聘网收购并启用新域名36.cn

job36CEO王亮就在微博中表示:36.cn谈了5年,今年成功买下!希望job36.com行业招聘能够改为:36招聘,就象58同城,51交友,56视频一样响当当! 36.cn本身域名带来的访问量一天...
  • qingyuxufeng
  • qingyuxufeng
  • 2011-04-20 10:13
  • 423

【JOB】使用ABAP来操作JOB:Create,Insert Step以及Release

在ABAP中,我们有时候需要通过ABAP来定义JOB并执行它,也就是说,我们不使用SM36的GUI来创建Job。 自己亲身经历的一个case:我们有一个程序performance“很差”(并不是程序...
  • hackai886
  • hackai886
  • 2012-09-21 08:33
  • 3392
    个人资料
    • 访问:4349280次
    • 积分:61885
    • 等级:
    • 排名:第49名
    • 原创:1736篇
    • 转载:2520篇
    • 译文:101篇
    • 评论:327条
    博客专栏
    最新评论
    微信公众号
      为你推荐最新的博文~更有惊喜等着你