没有PARAMETER ID,想 call TRANSACTION

来源:互联网 发布:js设置css样式属性 编辑:程序博客网 时间:2024/05/18 11:28

一个需求是点击自写程序输出界面的一个按钮进入co11n货物移动的界面,其中就要求把生产订单号,产量,日期参数带上值。首先想到的是用
SET PARAMETER ID ‘ANR’ FIELD lw_cc_aufnr-aufnr.
call TRANSACTION ‘CO11N’ AND SKIP FIRST SCREEN .
但是,不幸发现产量没有PARAMETER ID,而且没有直接进入货物移动的界面,还要手工点击按钮或者再写code。最后的解决方法是,用bdc mode ‘E’:
“bdc程序
perform bdc1_dynpro using ‘SAPLCORU_S’ ‘0100′.
perform bdc1_field using ‘BDC_OKCODE’
‘/00′.
perform bdc1_field using ‘BDC_CURSOR’
‘AFRUD-AUFNR’.
perform bdc1_field using ‘AFRUD-AUFNR’
lw_cc_aufnr-aufnr.
perform bdc1_dynpro using ‘SAPLCORU_S’ ‘0100′.
perform bdc1_field using ‘BDC_OKCODE’
‘/00′.
perform bdc1_field using ‘AFRUD-AUFNR’
lw_cc_aufnr-aufnr.
perform bdc1_field using ‘BDC_CURSOR’
‘AFRUD-LMNGA’.
perform bdc1_field using ‘AFRUD-LMNGA’
lw_cc_cl.
perform bdc1_dynpro using ‘SAPLCORU_S’ ‘0100′.
perform bdc1_field using ‘BDC_OKCODE’
‘/00′.
perform bdc1_field using ‘AFRUD-AUFNR’
lw_cc_aufnr-aufnr.
perform bdc1_field using ‘AFRUD-LMNGA’
lw_cc_cl.
perform bdc1_dynpro using ‘SAPLCORU_S’ ‘0100′.
perform bdc1_field using ‘BDC_OKCODE’
‘=MB03′.
perform bdc1_field using ‘AFRUD-AUFNR’
lw_cc_aufnr-aufnr.
perform bdc1_field using ‘AFRUD-LMNGA’
lw_cc_cl.
perform bdc1_field using ‘BDC_CURSOR’
‘AFRUD-BUDAT’.
perform bdc1_field using ‘AFRUD-BUDAT’
lw_cc_budat.
perform bdc1_dynpro using ‘SAPLCOWB’ ‘0130′.
perform bdc1_field using ‘BDC_CURSOR’
‘COWB_COMP-CHARG(01)’.

CLEAR:gt_messtab[],gt_messtab.
CALL TRANSACTION ‘CO11N’ USING gt_bdcdata MODE ‘E’  UPDATE‘S’ MESSAGES
INTO gt_messtab.

PS:想得到过账后的凭证号,debug消息内表没有找到,用
GET PARAMETER ID ‘MBN’ FIELD lw_cc_mblnr.
APPEND lw_cc_mblnr-mblnr to lt_cc_mblnr.
ENDIF.

可以解决。
原创粉丝点击