关闭

结束例程

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

结束例程一般是对数据经过转换后的一些处理,比如数据拆分,合并,或者到最后不需要的数据的删除等。

REFRESH  RESULT_PACKAGE.
DATA: WA_RESULT TYPE _TY_S_TG_1.
LOOP AT ITAB INTO WA_ITAB.
  WA_TG-/BIC/ZSM_OFF = WA_ITAB-ORG_ID.
*****1月
  WA_TG-CALMONTH2 = '01'.
  WA_TG-/BIC/ZSM_BPQTY = WA_ITAB-M1 .
  APPEND WA_TG TO ITAB_TG.
****2月
  WA_TG-CALMONTH2 = '02'.
  WA_TG-/BIC/ZSM_BPQTY = WA_ITAB-M2.
  APPEND WA_TG TO ITAB_TG.
****3月
  WA_TG-CALMONTH2 = '03'.
  WA_TG-/BIC/ZSM_BPQTY = WA_ITAB-M3.
  APPEND WA_TG TO ITAB_TG.
 ENDLOOP.

LOOP AT ITAB_TG INTO WA_TG.
  MOVE-CORRESPONDING WA_TG TO WA_RESULT.
  APPEND  WA_RESULT TO RESULT_PACKAGE.
ENDLOOP.

 

0
0

查看评论
* 以上用户言论只代表其个人观点,不代表CSDN网站的观点或立场
    个人资料
    • 访问:171824次
    • 积分:2630
    • 等级:
    • 排名:第13927名
    • 原创:85篇
    • 转载:24篇
    • 译文:0篇
    • 评论:16条
    文章分类
    最新评论