Chinaunix首页 | 论坛 | 博客
  • 博客访问: 481496
  • 博文数量: 199
  • 博客积分: 0
  • 博客等级: 民兵
  • 技术积分: 1902
  • 用 户 组: 普通用户
  • 注册时间: 2020-05-14 13:25
个人简介

代码5S

文章分类

全部博文(199)

文章存档

2021年(5)

2020年(194)

我的朋友

分类: 其他平台

2020-06-18 15:57:15

转载
 

点击(此处)折叠或打开

  1. *&---------------------------------------------------------------------*
  2. *& Report ZDEMO09
  3. *&
  4. *&---------------------------------------------------------------------*
  5. *&
  6. *&
  7. *&---------------------------------------------------------------------*
  8. report zdemo09.
  9. data:gv_bcy type banks,
  10.      gw_add type bapi1011_address,
  11.      gv_bck type bankk,
  12.      gw_return type bapiret2.
  13. gv_bcy = 'CN'.
  14. gv_bck = '10000000037'.
  15. gw_add-bank_name = 'TEST BANK1'.
  16. gw_add-bank_branch = 'TEST BANK2'.
  17. gw_add-region = '190'.
  18. call function 'BAPI_BANK_CREATE'
  19.   exporting
  20.     bank_ctry = gv_bcy
  21.     bank_key = gv_bck
  22.     bank_address = gw_add
  23.   importing
  24.     return = gw_return
  25.     bankkey = gv_bck.
  26. if gv_bck is not initial.
  27.   call function 'BAPI_TRANSACTION_COMMIT'
  28.     exporting
  29.       wait = 'X'.
  30.   write gv_bck.
  31. else.
  32.   call function 'BAPI_TRANSACTION_ROLLBACK'.
  33. endif.
阅读(2647) | 评论(0) | 转发(0) |
给主人留下些什么吧!~~