根据输入的日期查询期间

xiaoshizi928 · 发表于 2010/10/7 16:32:14

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。如果您注册时有任何问题请联系客服QQ： 83569622 　。

您需要登录才可以下载或查看，没有帐号？注册

x

TYPES : BEGIN OF tab_type,
      POPER TYPE T009B-POPER,
      END OF tab_type.
DATA : text1 TYPE datum,
   bumon1 TYPE num,
   butag1 TYPE num,
   itab TYPE TABLE OF tab_type.
DATA : wa_tab type tab_type.
   text1 = '20090229'.
  bumon1 = text1+4(2).
  butag1 = text1+6(2).
SELECT POPER
  FROM T009B
  INTO TABLE itab
  WHERE PERIV = 'DL' AND BUMON = bumon1 AND BUTAG = butag1.
LOOP AT itab INTO wa_tab.
  WRITE : / wa_tab-POPER.
ENDLOOP.
版本2：
TYPES : BEGIN OF tab_type,
      poper TYPE t009b-poper,
      END OF tab_type.
PARAMETERS text1 TYPE datum.
DATA : bumon1 TYPE num,
   butag1 TYPE num,
   itab TYPE TABLE OF tab_type.
DATA : wa_tab TYPE tab_type.
text1 = '20090229'.
bumon1 = text1+4(2).
butag1 = text1+6(2).
SELECT poper
  FROM t009b
  INTO TABLE itab
  WHERE PERIV = 'DL' AND BUMON = bumon1 AND BUTAG = butag1.
LOOP AT itab INTO wa_tab.
  WRITE : / wa_tab-poper.
ENDLOOP.

xiaoshizi928 · 发表于 2010/10/7 16:32:31

很好，非常好，谢谢

zhangxing_zx · 发表于 2011/4/2 12:57:55

感謝分享~謝謝

帐号		自动登录	找回密码
密码			注册

社区人物壹佰网重点话题	分享知识原创连载活动正式启动已有673人参加查看全部会员靓照旅行分享文学连载	壹佰读书会开始招收成员了
招聘求职壹佰网信息化选型平台	倾听用户的心声纵横四海谈IT如何提升企业管理管理小说连载《苏州桥》	如何获取努力值
原创连载－我来管管看 ERP分享+	推荐连载：[已结帖][分享知识原创连载]财务供应链项目新手实施手记：记录自己正	入门学习-致所有初学者

[ABAP资料区] 根据输入的日期查询期间

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。如果您注册时有任何问题请联系客服QQ： 83569622 　。

浏览过的版块

[ABAP资料区] 根据输入的日期查询期间

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。如果您注册时有任何问题请联系客服QQ： 83569622 。

浏览过的版块

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。如果您注册时有任何问题请联系客服QQ： 83569622 　。