本文主要是介绍SAP ABAP BDC录屏 保姆级教程,希望对大家解决编程问题提供一定的参考价值,需要的开发者们随着小编来一起学习吧!
ME47修改报价请求中项目的信息记录更新这个字段.
1.输入TCODE: SHDB
2.点击创建记录
3.输入记录(也就是一个名称)和事务码(就是你想录的那个tcode的事务码),最后点击开始,之后就会跳到该事务码的初始屏幕上去了,然后就按照正常去操作,尽量一步到位不要有多余的操作!!
4.我的目的是为了修改报价请求中项目的信息记录更新这个字段.
5.然后先进入到项目总览,可以看到我这个有两个项目,但是如果你直接双击进去修改(如下面的第6条),就会出现点击那个项目就只修改那个项目;
正确的操作是看下图中箭头指向的那个项目(最初的是第一条的项目号),此时我们把它删除了,重新输入一条项目号(这里输入第2条),然后再回车(这时你会看到只有1条项目了),再去双击第1条,再进去修改;这样你就实现动态的修改所有的项目了.
6.需要大家注意的是,但我们在双击项目的时候,才会进入到这里.
7.保存之后就会进入到这里,可以看到你所执行的所有步骤,主要的就是这四个步骤.
8.然后点击保存退出,回到SHDB
的初始界面
9.然后点击程序,然后输入程序名,然后确定,然后回到 SE38
找到你那个程序名;
10.这个程序是可以正常执行的,可以观察看看.
现在我们只需要看DO
循环中的子程序.
观察可以发现,DO
循环中只有三个子程序:bdc_dynpro
,bdc_field
和bdc_transaction
.
这三个子程序的作用分别就是:处理屏幕,处理字段和调用并执行事务码.
DO.READ DATASET dataset INTO record.IF sy-subrc <> 0. EXIT. ENDIF.PERFORM bdc_dynpro USING 'SAPMM06E' '0305'.PERFORM bdc_field USING 'BDC_CURSOR''RM06E-ANFNR'.PERFORM bdc_field USING 'BDC_OKCODE''/00'.PERFORM bdc_field USING 'RM06E-ANFNR'record-anfnr_001.PERFORM bdc_dynpro USING 'SAPMM06E' '0323'.PERFORM bdc_field USING 'BDC_CURSOR''RM06E-EBELP'.PERFORM bdc_field USING 'BDC_OKCODE''/00'.PERFORM bdc_field USING 'RM06E-EBELP'record-ebelp_002.PERFORM bdc_dynpro USING 'SAPMM06E' '0323'.PERFORM bdc_field USING 'BDC_CURSOR''RM06E-ANFPS(01)'.PERFORM bdc_field USING 'BDC_OKCODE''=DETA'.PERFORM bdc_field USING 'RM06E-EBELP'record-ebelp_003.PERFORM bdc_dynpro USING 'SAPMM06E' '0311'.PERFORM bdc_field USING 'BDC_CURSOR''EKPO-SPINF'.PERFORM bdc_field USING 'BDC_OKCODE''=BU'.PERFORM bdc_field USING 'EKPO-EMATN'record-ematn_004.PERFORM bdc_field USING 'EKPO-LGORT'record-lgort_005.PERFORM bdc_field USING 'EKPO-TXZ01'record-txz01_006.PERFORM bdc_field USING 'RM06E-ANMNG'record-anmng_007.PERFORM bdc_field USING 'EKPO-AGDAT'record-agdat_008.PERFORM bdc_field USING 'RM06E-EEIND'record-eeind_009.PERFORM bdc_field USING 'RM06E-LPEIN'record-lpein_010.PERFORM bdc_field USING 'EKPO-SPINF'record-spinf_011.PERFORM bdc_field USING 'EKPO-BPUMN'record-bpumn_012.PERFORM bdc_field USING 'EKPO-BPUMZ'record-bpumz_013.PERFORM bdc_transaction USING 'ME47'.ENDDO.
11.首先看一下图中这个结构BDCDATA
,标准描述就是:批输入:新表格字段结构
,这个结构就是处理BDC数据的主要结构.
-
PROGRAM :就是程序名,当前屏幕所在的程序,如图:(对比下面的代码去观察)
-
DYNPRO :屏幕编号
-
DYNBEGIN:启动 ‘X’ 不启动 ‘’
-
FNAM:字段名
-
FVAL:字段值
12.然后我们再看这两个子程序:bdc_dynpro
和bdc_field
现在数据都在bdcdata
内表中了.
bdc_transaction
这个子程序,我们用另一种方式去处理.
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.
13.下面就是具体的参数赋值了.
FORM frm_bdc_me47 USING ps_alv TYPE zmmr030_a.DATA opt TYPE ctu_params.IF sy-subrc <> 0. EXIT. ENDIF.PERFORM bdc_dynpro USING 'SAPMM06E' '0305'.PERFORM bdc_field USING 'BDC_CURSOR' 'RM06E-ANFNR'.PERFORM bdc_field USING 'BDC_OKCODE' '/00'.PERFORM bdc_field USING 'RM06E-ANFNR' ps_alv-ebeln. "报价请求PERFORM bdc_dynpro USING 'SAPMM06E' '0323'.PERFORM bdc_field USING 'BDC_CURSOR' 'RM06E-EBELP'.PERFORM bdc_field USING 'BDC_OKCODE' '/00'.PERFORM bdc_field USING 'RM06E-EBELP' ps_alv-ebelp.PERFORM bdc_dynpro USING 'SAPMM06E' '0323'.PERFORM bdc_field USING 'BDC_CURSOR' 'RM06E-ANFPS(01)'.PERFORM bdc_field USING 'BDC_OKCODE' '=DETA'.PERFORM bdc_field USING 'RM06E-EBELP' ps_alv-ebelp.PERFORM bdc_dynpro USING 'SAPMM06E' '0311'.PERFORM bdc_field USING 'EKPO-SPINF' 'B'."信息记录更PERFORM bdc_field USING 'BDC_OKCODE' '=BU'.opt-dismode = 'E'.opt-defsize = 'X'.*这里就是处理bdc数据了.(调用并执行事务码)TRY.CALL TRANSACTION 'ME47' WITH AUTHORITY-CHECK "(调用的事务码)USING bdcdata OPTIONS FROM opt . "(调用选项)CATCH cx_sy_authorization_error ##NO_HANDLER .ENDTRY.ENDFORM.
end.
这篇关于SAP ABAP BDC录屏 保姆级教程的文章就介绍到这儿,希望我们推荐的文章对编程师们有所帮助!