
SAB ABAP 如何程序调用录屏SHDB
SABABAP这是我录好的屏,但现在不知道在其它程序中如何调用此屏幕,望个位友们基于以下程序帮忙写个调用代码...若是百度上的批量物料例子就不用贴了,谢谢reportZM...
SAB ABAP 这是我录好的屏,但现在不知道在其它程序中如何调用此屏幕,望个位友们基于以下程序帮忙写个调用代码...
若是百度上的批量物料例子就不用贴了,谢谢
report ZMI02_DEL
no standard page heading line-size 255.
include bdcrecx1.
parameters: dataset(132) lower case.
*** DO NOT CHANGE - the generated data section - DO NOT CHANGE ***
*** Generated data section with specific formatting - DO NOT CHANGE ***
data: begin of record,
* data element: IBLNR
IBLNR_001(010),
* data element: GJAHR
GJAHR_002(004),
end of record.
*** End generated data section ***
start-of-selection.
perform open_dataset using dataset.
perform open_group.
do.
read dataset dataset into record.
if sy-subrc <> 0. exit. endif.
perform bdc_dynpro using 'SAPMM07I' '0701'.
perform bdc_field using 'BDC_CURSOR'
'RM07I-IBLNR'.
perform bdc_field using 'BDC_OKCODE'
'=DL'.
perform bdc_field using 'RM07I-IBLNR'
record-IBLNR_001.
perform bdc_field using 'RM07I-GJAHR'
record-GJAHR_002.
perform bdc_dynpro using 'SAPLSPO1' '0100'.
perform bdc_field using 'BDC_OKCODE'
'=YES'.
perform bdc_transaction using 'MI02'.
enddo.
perform close_group.
perform close_dataset using dataset.
录的是用MI02,删除凭证 展开
若是百度上的批量物料例子就不用贴了,谢谢
report ZMI02_DEL
no standard page heading line-size 255.
include bdcrecx1.
parameters: dataset(132) lower case.
*** DO NOT CHANGE - the generated data section - DO NOT CHANGE ***
*** Generated data section with specific formatting - DO NOT CHANGE ***
data: begin of record,
* data element: IBLNR
IBLNR_001(010),
* data element: GJAHR
GJAHR_002(004),
end of record.
*** End generated data section ***
start-of-selection.
perform open_dataset using dataset.
perform open_group.
do.
read dataset dataset into record.
if sy-subrc <> 0. exit. endif.
perform bdc_dynpro using 'SAPMM07I' '0701'.
perform bdc_field using 'BDC_CURSOR'
'RM07I-IBLNR'.
perform bdc_field using 'BDC_OKCODE'
'=DL'.
perform bdc_field using 'RM07I-IBLNR'
record-IBLNR_001.
perform bdc_field using 'RM07I-GJAHR'
record-GJAHR_002.
perform bdc_dynpro using 'SAPLSPO1' '0100'.
perform bdc_field using 'BDC_OKCODE'
'=YES'.
perform bdc_transaction using 'MI02'.
enddo.
perform close_group.
perform close_dataset using dataset.
录的是用MI02,删除凭证 展开
2个回答
展开全部
给你讲一下BDC的原理吧。
SHDB只是记录你做一系列的操作时程序记录的信息,不是说你用SHDB录一个屏以后要用程序去调的,它只是给你写程序作为一个参考。
在写BDC程序时,你需要参考一个系统结构BDCDATA定义一个内表,将你要执行的操作添加到这个内表里面去,然后再调用相应的t-code把这个内表的数据传进去。
填充这个内表时你就需要参照SHDB里面的格式,里面的每一个值对应的都是BDCDATA结构里面的一个字段。
SHDB只是记录你做一系列的操作时程序记录的信息,不是说你用SHDB录一个屏以后要用程序去调的,它只是给你写程序作为一个参考。
在写BDC程序时,你需要参考一个系统结构BDCDATA定义一个内表,将你要执行的操作添加到这个内表里面去,然后再调用相应的t-code把这个内表的数据传进去。
填充这个内表时你就需要参照SHDB里面的格式,里面的每一个值对应的都是BDCDATA结构里面的一个字段。
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询