首先基本步骤还是简单介绍下 SHBD |
以
MI09
为例
回车进去后
先点新建
一直保证填写的数据在第一行
是为了防止一直往后填数据的时候丢掉数据，有时候仅仅是屏幕显示的问题，都有可能丢掉数据。一直点新建，可以保证数据永远在第一行录制
录完后，再点新建
然后再点保存
完成录制
至于后续跟进录屏生成或者自己写代码部分，不做赘述
附录：自己写bdc程序的时候用到的form代码
*------------------------------------------------------------------*
* 录入屏幕号
-->PV_PROGRAM 程序名
-->PV_DYNPRO 屏幕号
*------------------------------------------------------------------*
PV_PROGRAM
CLEAR GT_BDCDATA.
GT_BDCDATA-PROGRAM = PV_PROGRAM.
GT_BDCDATA-DYNPRO = PV_DYNPRO.
GT_BDCDATA-DYNBEGIN = 'X'.
APPEND GT_BDCDATA.
*-------------------------------------------------------------------*
*录入字段
* PV_FNAM 字段名称 PV_FVAL 字段值
*-------------------------------------------------------------------*
FORM FRM_BDC_FIELD USING PV_FNAM
PV_FVAL.
DATA: LV_VALUE TYPE CHAR20.
LV_VALUE = PV_FVAL.
CONDENSE: LV_VALUE.
CLEAR GT_BDCDATA.
GT_BDCDATA-FNAM = PV_FNAM.
GT_BDCDATA-FVAL = LV_VALUE.
APPEND GT_BDCDATA.
"frm_bdc_field
* BDC
INCLUDE STRUCTURE BDCDATA.
DATA: END OF GT_BDCDATA.
DATA: GT_MESSTAB LIKE BDCMSGCOLL OCCURS 0 WITH HEADER LINE.
CTU_PARAMS.
最后调用call transaction
LS_BDCOPT-DISMODE = 'N'. "N,A,E* 三种模式 测试使用A模式可以全屏跟踪
LS_BDCOPT-UPDMODE = 'S'. "S,L
LS_BDCOPT-CATTMODE = SPACE.
LS_BDCOPT-DEFSIZE = 'X'.
LS_BDCOPT-RACOMMIT = 'X'.
LS_BDCOPT-NOBINPT = 'X'.
LS_BDCOPT-NOBIEND = 'X'.
CALL TRANSACTION 'MI09' USING GT_BDCDATA[]
OPTIONS FROM LS_BDCOPT
MESSAGES INTO GT_MESSTAB [].
CLEAR GT_BDCDATA[].
CLEAR GT_MESSTAB [].