BDC录屏操作.docx
《BDC录屏操作.docx》由会员分享，可在线阅读，更多相关《BDC录屏操作.docx（13页珍藏版）》请在冰豆网上搜索。
BDC录屏操作
1.输入TCode：
SHDB进入BDC录制初始界面，该界面可以实现已创建的BDCSession信息的查看、删除及锁定等操作。
2.单击工具栏Newrecording按钮创建一个新的BDC，系统将弹出CreateRecording对话框，要求输入记录名称（此名称可以不用Y或Z开头来定义）和录制程序的事务码，本例以创建物料主数据MM01为例。
3.单击Startrecording按钮，程序直接跳转到事务码mm01下，
4.输入自定义的物料名、行业领域、物料类型后，按工具栏的继续按钮，系统将弹出SelectView列表，要求选择物料主档中所维护的具体视图，我们选“基本数据1”,单击继续。
5.进入物料信息维护界面，维护物料主数据，这里选填了8项。
基本计量单位、物料组、章节号、外部制造商和零件编号、制造商参数文件、中英文描述。
6.完成后点保存，界面自动跳转到如下图界面，红色圈住的地方就是我们需要填值的
7.点保存后，点返回，如下图：
8.点击工具栏按钮：
Program,出现下图对话框，输入程序名称，注意这里的名称一定要按Z或Y开头命名。
9.点继续，在下方的对话框中插入标题，然后点击源代码按钮。
10.输入开发类，本例是以STMP开发类，点击本地对象按钮
11.界面转到abap编辑界面
12.对生成的代码稍稍做下修改，如下
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,"物料组
zzata like mara-zzata,"章节
emnfr like lfa1-emnfr,"制造商
mfrpn like mara-mfrpn,"件号
mprof like mara-mprof,"参数文件
xchpf like mara-xchpf,"批次管理
end of wa.
data itab type table of wa with header line.
do 6 times.
itab-mbrsh = 'D'.
itab-mtart = '2'.
itab-maktx = '油料'.
itab-meins = 'EA'.
itab-matkl = '205'.
itab-zzata = sy-index * 2.
itab-emnfr = 'U0088'.
itab-mfrpn = sy-index * 1111.
itab-mprof = 'ZCCA'.
itab-xchpf = 'X'.
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'
'/00'.
perform bdc_field using 'MSICHTAUSW-KZSEL（01）'
record-KZSEL_01_003.
perform bdc_dynpro using 'SAPLMGMM' '0070'.
perform bdc_field using 'BDC_CURSOR'
'MSICHTAUSW-DYTXT（01）'.
perform bdc_field using 'BDC_OKCODE'
'/00'.
perform bdc_dynpro using 'SAPLMGMM' '0070'.
perform bdc_field using 'BDC_CURSOR'
'MSICHTAUSW-DYTXT（12）'.
perform bdc_field using 'BDC_OKCODE'
'/00'.
perform bdc_dynpro using 'SAPLMGMM' '0070'.
perform bdc_field using 'BDC_CURSOR'
'MSICHTAUSW-DYTXT（09）'.
perform bdc_field using 'BDC_OKCODE'
'=ENTR'.
perform bdc_field using 'MSICHTAUSW-KZSEL（09）'
record-KZSEL_09_004.
perform bdc_dynpro using 'SAPLMGMM' '0080'.
perform bdc_field using 'BDC_CURSOR'
'RMMG1-WERKS'.
perform bdc_field using 'BDC_OKCODE'
'=ENTR'.
perform bdc_field using 'RMMG1-WERKS'
record-WERKS_005.
perform bdc_dynpro using 'SAPLMGMM' '4004'.
perform bdc_field using 'BDC_OKCODE'
'SP21'.
perform bdc_field using 'MARA-MEINS'
itab-MEINS.
perform bdc_field using 'MARA-MATKL'
itab-MATKL.
perform bdc_field using 'MARA-MTPOS_MARA'
record-MTPOS_MARA_008.
perform bdc_field using 'MARA-ZZATA'
itab-ZZATA.
perform bdc_field using 'LFA1-EMNFR'
itab-EMNFR.
perform bdc_field using 'MARA-MFRPN'
itab-MFRPN.
perform bdc_field using 'MARA-MPROF'
itab-MPROF.
perform bdc_field using 'SKTEXT-SPRAS（02）'
record-SPRAS_02_013.
perform bdc_field using 'SKTEXT-MAKTX（01）'
record-MAKTX_01_014.
perform bdc_field using 'SKTEXT-MAKTX（02）'
record-MAKTX_02_015.
perform bdc_dynpro using 'SAPLMGMM' '4000'.
perform bdc_field using 'BDC_OKCODE'
'=BU'.
perform bdc_field using 'MAKT-MAKTX'
record-MAKTX_016.
perform bdc_field using 'BDC_CURSOR'
'MARA-XCHPF'.
perform bdc_field using 'MARA-MEINS'
record-MEINS_017.
perform bdc_field using 'MARA-XCHPF'
itab-XCHPF.
perform bdc_transaction using 'MM01'.
endloop.
perform close_group.
13.激活运行，
14.单选：
调用事务，然后执行。
很可惜，由于代码修改问题，执行结果如下：
15.用Tcode:
se12到MARA表里就可以查看刚批量添加的数据了。
升级会员 