ABAP BDC录屏

原创 已于 2024-02-24 08:37:39 修改
· 770 阅读 · 12 ·
版权
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
文章标签：

#ABAP #SAP

于 2024-02-24 08:36:21 首次发布

目录

BDC录屏

创建程序

输入程序名称，点击创建按钮：
在这里插入图片描述
输入程序的标题，选择类型为”可执行程序“，点击”保存“：
在这里插入图片描述
选择包名，点击保存：
在这里插入图片描述
选择请求号，点击“确定”：
在这里插入图片描述

程序履历
*&---------------------------------------------------------------------*
*& Report Z_TEST_BDC_LHY
*&---------------------------------------------------------------------*
*& TYPE：Report
*& Description：BDC录屏测试
*& Creator：Hongyu.Liu
*& Created On：2024年2月20日
*&---------------------------------------------------------------------*
*                           Change History
* ----------        -------------       -------------      -------------
*   Version          Date                Change By           Description
* ----------        -------------       -------------      -------------
*   N                2024.2.20           Hongyu.Liu          创建
*&---------------------------------------------------------------------* 
REPORT Z_TEST_BDC_LHY.

SHDB录屏

1.输入TCode：SHDB进入BDC录制初始界面

2.单击工具栏 “新建”按钮创建一个新的BDC，系统将弹出Create Recording对话框，要求输入记录名称(此名称可以不用Y或Z开头来定义)和录制程序的事务码，本例以创建物料主数据MM01为例。

在这里插入图片描述
填写消息：
在这里插入图片描述
完成后点保存，界面自动跳转到如下图界面，红色圈住的地方就是我们在录屏的过程中填入的值，接下来在程序中需要动态的进行修改。
在这里插入图片描述
在这里插入图片描述
点保存后，点返回，如下图：
在这里插入图片描述
点击“返回”：
在这里插入图片描述
点击“程序”：
在这里插入图片描述
选中，点击程序：
在这里插入图片描述
输入程序的名称，点击“继续”：
在这里插入图片描述
输入标题，点击“源代码”：
在这里插入图片描述
选择包，点击保存：
在这里插入图片描述
选择请求号，点击“继续”按钮：
在这里插入图片描述
界面转到abap编辑界面
在这里插入图片描述

编辑代码

在第一阶段中生成的代码，在实际的应用中并不是所有都需要用到，下图中红色框圈出来的部分是我们需要用实际业务中的变量进行代替的。
步骤大概如下：
①从数据库或本地文件中获取到需要进行操作的数据
②Loop循环需要操作的数据，每一条需要进行操作的数据需要进行一次BDC（构建BDC 数据 + Call Transaction）
③在SHDB中生成的代码，我们只需要留下红色框中的代码（包括Form 中代码），并将原来录屏中输入的定值变更为loop内表中的值，整理后复制到自己需要用到BDC的程序中进行②操作即可。
如下图所示：
在这里插入图片描述
在这里插入图片描述
https://blog.youkuaiyun.com/ylxb166/article/details/117416437

在这里插入图片描述

在这里插入图片描述

完整程序

*&---------------------------------------------------------------------*
*& Report Z_TEST_BDC_LHY
*&---------------------------------------------------------------------*
*& TYPE：Report
*& Description：BDC录屏测试
*& Creator：Hongyu.Liu
*& Created On：2024年2月20日
*&---------------------------------------------------------------------*
*                           Change History
* ----------        -------------       -------------      -------------
*   Version          Date                Change By           Description
* ----------        -------------       -------------      -------------
*   N                2024.2.20           Hongyu.Liu          创建
*&---------------------------------------------------------------------*
REPORT z_test_bdc_lhy.
"PARAMETERS: dataset(132) LOWER CASE.

"INCLUDE bdcrecx1.
"INCLUDE bdcrecx1_s.

START-OF-SELECTION.
 TYPES:BEGIN OF wa,
   mbrsh LIKE mara-mbrsh,   "行业领域
   mtart LIKE mara-mtart,   "物料类型
   maktx LIKE makt-maktx,   "物料描述
   meins LIKE mara-meins,   "计量单位
   matkl LIKE mara-matkl,   "物料组
   mtpos_mara LIKE mara-mtpos_mara, "普通项目类别组
  END OF wa.
 DATA itab TYPE TABLE OF wa WITH HEADER LINE.
 DATA:bdcdata LIKE bdcdata    OCCURS 0 WITH HEADER LINE.  "用来存储屏幕字段参数值,传递录屏参数
 DATA:messtab LIKE bdcmsgcoll OCCURS 0 WITH HEADER LINE.  "记录执行BDC过程中产生的消息
 DATA:p_mode TYPE c .
 DO 10 TIMES.
    itab-mbrsh = 'M'. "行业领域
    itab-mtart = 'Z300'. "物料类型
    itab-maktx = 'BDC测试物料lhy-' && sy-index && '-' &&  sy-datum && '-' && sy-uzeit. "物料描述
    itab-meins = 'EA'. "单位
    itab-matkl = '0107'. "物料组
    itab-mtpos_mara = 'NORM'. "普通项目类别组
    APPEND itab.
 ENDDO.

START-OF-SELECTION.
 "PERFORM open_group.
 LOOP AT itab.
    PERFORM bdc_dynpro      USING 'SAPLMGMM' '0060'.
    PERFORM bdc_field       USING 'BDC_CURSOR'
                                  'RMMG1-MTART'.
    PERFORM bdc_field       USING 'BDC_OKCODE'
                                  '=ENTR'.
    PERFORM bdc_field       USING 'RMMG1-MBRSH'
                                  itab-mbrsh.
    PERFORM bdc_field       USING 'RMMG1-MTART'
                                  itab-mtart.
    PERFORM bdc_dynpro      USING 'SAPLMGMM' '0070'.
    PERFORM bdc_field       USING 'BDC_CURSOR'
                                  'MSICHTAUSW-DYTXT(01)'.
    PERFORM bdc_field       USING 'BDC_OKCODE'
                                  '=ENTR'.
    PERFORM bdc_field       USING 'MSICHTAUSW-KZSEL(01)'
                                  'X'.
    PERFORM bdc_dynpro      USING 'SAPLMGMM' '4004'.
    PERFORM bdc_field       USING 'BDC_OKCODE'
                                  '=BABA'.
    PERFORM bdc_field       USING 'BDC_CURSOR'
                                  'MAKT-MAKTX'.
    PERFORM bdc_field       USING 'MAKT-MAKTX'
                                  itab-maktx.
    PERFORM bdc_field       USING 'BDC_CURSOR'
                                  'MARA-MATKL'.
    PERFORM bdc_field       USING 'MARA-MEINS'
                                  itab-meins.
    PERFORM bdc_field       USING 'MARA-MATKL'
                                  itab-matkl.
    PERFORM bdc_field       USING 'MARA-MTPOS_MARA'
                                  itab-mtpos_mara.
    PERFORM bdc_dynpro      USING 'SAPLSPO1' '0300'.
    PERFORM bdc_field       USING 'BDC_OKCODE'
                                  '=CANC'.
    PERFORM bdc_dynpro      USING 'SAPLMGMM' '4004'.
    PERFORM bdc_field       USING 'BDC_OKCODE'
                                  '=BU'.
    PERFORM bdc_field       USING 'BDC_CURSOR'
                                  'MAKT-MAKTX'.
    PERFORM bdc_field       USING 'MAKT-MAKTX'
                                  itab-maktx.
    PERFORM bdc_field       USING 'MARA-MEINS'
                                  itab-meins.
    PERFORM bdc_field       USING 'MARA-MATKL'
                                  itab-matkl.
    PERFORM bdc_field       USING 'MARA-MTPOS_MARA'
                                  itab-mtpos_mara.
    REFRESH: messtab[].

    p_mode = 'N'.
	"执行BDC，事务代码是MM01，p_mode模式是“不显示屏幕”，A代表“异步的”，messtab用于存放消息 
    CALL TRANSACTION 'MM01'  USING bdcdata
                       MODE   p_mode
                       UPDATE 'A'
                       MESSAGES INTO messtab.
 ENDLOOP.

*----------------------------------------------------------------------*
*        Start new screen                                              *
*----------------------------------------------------------------------*
FORM bdc_dynpro USING program dynpro.
  CLEAR bdcdata.
  bdcdata-program  = program.
  bdcdata-dynpro   = dynpro.
  bdcdata-dynbegin = 'X'.
  APPEND bdcdata.
ENDFORM.

*----------------------------------------------------------------------*
*        Insert field                                                  *
*----------------------------------------------------------------------*
FORM bdc_field USING fnam fval.
*  IF fval <> nodata.
    CLEAR bdcdata.
    bdcdata-fnam = fnam.
    bdcdata-fval = fval.
    APPEND bdcdata.
*  ENDIF.
ENDFORM.

执行程序

点击“执行”按钮，生成的物料如下：
在这里插入图片描述

SAP_ABAP_BDC录屏案例
java_zhong1990的专栏
08-30 1062
SHDB --> 新建记录-->输入录制的tcode :BP,-->执行录屏操作-->录制结果封装成函数
ABAP BDC录屏及遇到的问题
热门推荐
02-02 1万+
BDC录屏TCODE：SHDB 我做的是固定资产过账这块，TCODE-F-90。 录屏的过程千万不能出错，有警告没关系。 录完凭，生成源代码，在这个基础上修改。 report ZASSET        no standard page heading line-size 255. include bdcrecx1. parameters: dataset(132) lowe
【SAP】ABAP开发——BDC录屏
Mona_1220的博客
04-06 2670
1.输入SHDB 2.点击 New recording设置参数进行录屏。 3.根据需要录屏的内容对录屏代码进行适当修改进行批处理。 DATA: bdcdata LIKE bdcdata OCCURS 0 WITH HEADER LINE. DATA: messtab LIKE bdcmsgcoll OCCURS 0 WITH HEADER LINE. PERFORM...
[SAP ABAP] BDC录屏
Hudas的博客
01-16 639
本文主要讲解SAP ABAP中的BDC录屏的相关知识点
SAP ABAP BDC 录屏开发
最新发布
Li958172829的博客
03-14 1399
SAP ABAP BDC 录屏开发
SAP ABAP SHDB BDC录屏 保姆级教程
Sunflower
11-06 5511
正确的操作是看下图中箭头指向的那个项目(最初的是第一条的项目号),此时我们把它删除了,重新输入一条项目号(这里输入第2条),然后再回车(这时你会看到只有1条项目了),再去双击第1条,再进去修改;3.输入记录(也就是一个名称)和事务码(就是你想录的那个tcode的事务码),最后点击开始,之后就会跳到该事务码的初始屏幕上去了,然后就按照正常去操作,尽量一步到位不要有多余的操作!PROGRAM :就是程序名,当前屏幕所在的程序,如图:(对比下面的代码去观察)9.然后点击程序,然后输入程序名,然后确定,然后回到。
SAP ABAP BDC的录制
LikZ_WM的博客
11-23 535
录制结束之后，点击保存 P_BUKRS、P_GJAHR、P_MONAT、P_XREF2-LOW、P_RADI01是录制时，屏幕输入的数据。
SAP BDC技术 录屏
03-06
在SAP系统里，由于某种原因，可能需要重复输入数据，（数据不同，但是操作是相同的，典型的情形就是切换系统的时候，旧系统的数据 需要导入SAP）...
ABAP BDC录屏怎么搞
03-08
嗯，用户想了解如何在SAP ABAP中实现BDC录屏的方法或教程。首先，我需要回忆一下BDC的基本概念和步骤。BDC，即批量数据通信，通常用于批量导入数据到SAP系统，而录屏是其中一种方法，通过记录用户操作生成ABAP代码。...
BDC录屏操作.pdf
10-05
BDC录屏操作.pdf
【SAP Abap】记录一次完整的BDC录屏开发
XLevon的博客
10-25 8231
记录一次完整的BDC录屏开发
5分钟包教包会，超详细超简单的SAP BDC录屏技术.docx
06-05
手把手教你使用BDC，无需编程 基础，抛弃LSMW，用最简单的方式实现业务顾问的录屏操作，简单上手，只需几分钟轻松学会。
SAP BDC 录屏及 ABAP 调用 BDC
qq_41757790的博客
07-05 1203
SAP BDC 的使用及 ABAP 程序调用 BDC
BDC录屏
weixin_44193137的博客
12-07 436
1.输入TCode：SHDB SHDB进入BDC录制初始界面，该界面可以实现已创建BDC Session信息的查看、删除及锁定等操作 2.创建一个新的BDC 单击工具栏 Newrecording 按钮创建一个新的BDC，系统将弹出Create Recording对话框，要求输入记录名称(此名称可以不用Y或Z开头来定义)和录制程序的事务码，本例以创建物料主数据MM01为例。 3.单击Startrecording 按钮，程序直接跳转到事务码mm01下， 4.输入参数 自定义的物料名和行业领域，物料类型后，按
关于BDC录屏
昊宇的笔记本
09-19 953
PERFORM frm_set_default_value USING 'CK11N' . PERFORM frm_dynpro USING 'SAPLCKDI' '4610' 'X'. PERFORM frm_dynpro USING '' 'BDC_OKCODE' '/0...
SAP 录屏 BDC
逍遥游
07-13 1666
事物代码：SHDB 点击开始记录，开始进行录屏操作。 选中该条记录，生成程序。 根据生成的代码，进行整理的时候，可以调用系统封装过的函数，也可以自己进行归纳，抽离代码。 ...
BDC录屏笔记1
XSY520_的博客
03-23 223
REPORT ZTS_XSY_TEST10. INCLUDE zsy_xy_tcus. "记录程序运行日志 INCLUDE ZTS_XSY_TEST10TOP. INCLUDE ZTS_XSY_TEST10FORM. INITIALIZATION. * 增加图标 * TYPE-POOLS ICON. WRITE ICON_CHANGE_TEXT AS ICON TO SSCRFIELDS-FUNCTXT_O1+0(4). SSCRFIELDS-FUNCTXT_O1+4(*) = '@0
BDC录屏 EPIC_PROC，银企直连
weixin_55593130的博客
03-25 717
目的：用户希望用BDC实现，自动创建EPIC_PROC银企直连的"付款建议"按钮功能 (本想实现以下步骤，创建付款状态，但无法实现) 难点：EPIC_PROC事务码直接录屏没办法捕捉到该按钮(失败了很多次) 解决方法：创建一个新程序，调用标准函数 EPIC_PR_SEL_POPUP，对该事务码进行BDC录屏 解释：EPIC_PR_SEL_POPUP 该函数是通过debug事务码EPIC_PROC的时候，定位到，弹出"付款建议"窗口时，是调用的该函数，所以我们可以绕过前边步骤，直接调用该函数.
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值