ITPub博客

首页 > Linux操作系统 > Linux操作系统 > 利用程序创建程序

利用程序创建程序

原创 Linux操作系统 作者:AntiDesert 时间:2012-05-31 15:13:54 0 删除 编辑
form. create_prgm
                  using p_jobgrp type ztjobgrps-jobgrp
                  changing p_prgnm type applname.
  data: CODE(72) OCCURS 10,
        lw_string type string,
        ls_string type string,
        o_index type ref to cl_index_base,
        o_indexes type ref to cl_indexes_base,
        tmp_ztinditem type ty_ztinditem,
        prgnm type applname .
  concatenate 'ZSGRP' p_jobgrp into prgnm.   "程序名
  p_prgnm = prgnm.
  concatenate 'PROGRAM' prgnm 'message-id zsum' '.' INTO lw_string
  SEPARATED BY space.
  APPEND lw_string to code.
  append 'INCLUDE ZS_OVERALL_SUMDATA_PUBLIC.' to code.
   append 'INCLUDE ZS_OVERALL_SUMDATA_LOC.' to code.
.........
 
  INSERT REPORT prgnm from code.
  SUBMIT (prgnm) AND RETURN.
endform.

来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/26168649/viewspace-731564/,如需转载,请注明出处,否则将追究法律责任。

下一篇: 创建后台作业
请登录后发表评论 登录
全部评论

注册时间:2011-08-14

  • 博文量
    10
  • 访问量
    11120