刚才的所有操作就会生成BDC程序，其实包含你所输入的数据，以及你所操作的功能码
参考生成的程序，调用BDC进行数据操作。具体生成的代码如下：
report ZZZZ
       no standard page heading line-size 255.

include bdcrecx1.

parameters: dataset(132) lower case.
***    DO NOT CHANGE - the generated data section - DO NOT CHANGE    ***
*
*   If it is nessesary to change the data section use the rules:
*   1.) Each definition of a field exists of two lines
*   2.) The first line shows exactly the comment
*       '* data element: ' followed with the data element
*       which describes the field.
*       If you don't have a data element use the
*       comment without a data element name
*   3.) The second line shows the fieldname of the
*       structure, the fieldname must consist of
*       a fieldname and optional the character '_' and
*       three numbers and the field length in brackets
*   4.) Each field must be type C.
*
*** Generated data section with specific formatting - DO NOT CHANGE  ***
data: begin of record,
* data element: KSCHA
        KSCHL_001(004),
* data element: EKORG
        EKORG_002(004),
* data element: WERKS_D
        WERKS_003(004),
* data element: ELIFN
        LIFNR_004(010),
* data element: EMLIF
        ZZEMLIF_005(010),
* data element: MATNR
        MATNR_01_006(018),
* data element: KODATAB
        DATAB_007(010),
* data element: KODATBI
        DATBI_008(010),
* data element: KSTBM
        KSTBM_01_009(019),
* data element: KSTBM
        KSTBM_02_010(019),
* data element: KBETR
        KBETR_01_011(016),
* data element: KBETR
        KBETR_02_012(016),
* data element: KODATAB
        DATAB_013(010),
* data element: KODATBI
        DATBI_014(010),
      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 'SAPMV13A' '0100'.
perform bdc_field       using 'BDC_CURSOR'
                              'RV13A-KSCHL'.
perform bdc_field       using 'BDC_OKCODE'
                              '/00'.
perform bdc_field       using 'RV13A-KSCHL'
                              record-KSCHL_001.
perform bdc_dynpro      using 'SAPMV13A' '1506'.
perform bdc_field       using 'BDC_CURSOR'
                              'KOMG-MATNR(01)'.
perform bdc_field       using 'BDC_OKCODE'
                              '/00'.
perform bdc_field       using 'KOMG-EKORG'
                              record-EKORG_002.
perform bdc_field       using 'KOMG-WERKS'
                              record-WERKS_003.
perform bdc_field       using 'KOMG-LIFNR'
                              record-LIFNR_004.
perform bdc_field       using 'KOMG-ZZEMLIF'
                              record-ZZEMLIF_005.
perform bdc_field       using 'KOMG-MATNR(01)'
                              record-MATNR_01_006.
perform bdc_dynpro      using 'SAPMV13A' '1506'.
perform bdc_field       using 'BDC_CURSOR'
                              'TEXT_DEFAULT-TEXT(01)'.
perform bdc_field       using 'BDC_OKCODE'
                              '=PSTF'.
perform bdc_dynpro      using 'SAPMV13A' '0303'.
perform bdc_field       using 'BDC_CURSOR'
                              'KONM-KBETR(02)'.
perform bdc_field       using 'BDC_OKCODE'
                              '/00'.
perform bdc_field       using 'RV13A-DATAB'
                              record-DATAB_007.
perform bdc_field       using 'RV13A-DATBI'
                              record-DATBI_008.
perform bdc_field       using 'KONM-KSTBM(01)'
                              record-KSTBM_01_009.
perform bdc_field       using 'KONM-KSTBM(02)'
                              record-KSTBM_02_010.
perform bdc_field       using 'KONM-KBETR(01)'
                              record-KBETR_01_011.
perform bdc_field       using 'KONM-KBETR(02)'
                              record-KBETR_02_012.
perform bdc_dynpro      using 'SAPMV13A' '0303'.
perform bdc_field       using 'BDC_CURSOR'
                              'KONM-KSTBM(01)'.
perform bdc_field       using 'BDC_OKCODE'
                              '=SICH'.
perform bdc_field       using 'RV13A-DATAB'
                              record-DATAB_013.
perform bdc_field       using 'RV13A-DATBI'
                              record-DATBI_014.
perform bdc_transaction using 'MEK1'.

enddo.

perform close_group.
perform close_dataset using dataset.

代码说明：

代码中红色部分就是生成的BDC操作，你可以根据需要进行必要的修改，以实现你需要的功能。

代码中蓝色的部分就是需要提供的输入值，你可以把值上传到BDC RECORD中，也可以从程序的内表中

读取你所需要填入的值。如果是只导入数据，比如是主数据导入 ，就可以把数据先上传到内表中，然后进行BDC操作。

如果是调用事务码进行某些操作，只要把数据填到适当的位置就可以了。
代码中黄色的部分是指当前正在处理的程序名以及屏幕号。

代码中紫色的部分是指当前光标所在的位置。即屏幕上第几行的哪个字段上。也就是当前是往这个字段填值。

代码中“表名－字段名（编号）”是指当前是在往屏幕上的这个字段的第几行填值。在这里，如果有多行需要数据输入，可以采用循环的方式进行，但是循环的时候需要用concatenate字符串连接来实现（）内编号的递增。保证填入数据的正确性。这是一个细致的工作，但是只要按步骤来，应该不会出错的。

例如表itab中存放着所有需要的数据。并且屏幕上需要输入5行数据,每行三个字段。这时我们可以这样实现。

data: t1,t2,t3. "注t1,t2,t3与每行的三个字段类型相一致

data m type c.

perform bdc_dynpro using '程序名' '屏幕号'.    "进入屏幕

perform bdc_field using 'BDC_CURSOR' '表名-字段名(01)'.

perform bdc_field using 'BDC_OKCODE' '功能码'.

loop at itab into wa.

m = sy-tabix.

concatenate '表名-字段名(' m ')' into t1.

concatenate '表名-字段名(' m ')' into t2.

concatenate '表名-字段名(' m ')' into t3.

perform bdc_field using  t1 wa-t1.

perform bdc_field using  t2 wa-t2.

perform bdc_field using  t3 wa-t3.

endloop.

对于多行输入或者从一个屏幕进入另一个屏幕之后需要多行输入的可以使用这种循环嵌套的方法实现

减少了代码重复。对于数据量很小的可以直接逐行填值。

代码中灰色部分“BDC_OKCODE“ ”/00“等是指你所操作的功能码。包括回车，保存，双击等。分清功能码也是一项非常重要的工作。当这些工作都做完之后。所需要的bdcdata也就生成了。这时只需要使用bdcdata调用事务码就可以了。

CALL TRANSACTION 'MEK1' USING bdcdata MODE 'E' UPDATE 'S'
            MESSAGES INTO itab_msg.

三、问题

当然，有时会遇到这样的情况，就是在遇到金额或者单位或者数量时，往往会出现错误提示：输入的字段比实际字段长。这时我们想明明输入的值和字段字义是一样的，为什么会出现这种错误提示呢？
其实这是做BDC的时候最需要注意的事，因为字段类型虽然一样，但是我们保存到BDCDaTA中的时候，数值等是按照默认长度保存的，但是我们输入的时候需要都这些多余的字符串删除掉，这时我们就需要对数据进行处理，有两种处理方法，一种就是用SHIFT移位操作删除多余的字符串，也可以通过修改子例程BDC_FIELD来实现。 假设我们需要输入金额，用第二种方法来实现，就可以这么修改子例程BDC_FIELD。
  DATA: it LIKE bsid-dmbtr,
        fval2(13) TYPE c.
  IF fval <> it.
    MOVE fval TO fval2.
    CLEAR bdcdata.
    bdcdata-fnam = fnam.
    bdcdata-fval = fval2.
    APPEND bdcdata.
  ENDIF.
调用的时候遇到金额、数量或者单位时，就定义这样一个子例程来供调用。就不会出现错误提示了。

对于出现单位在中文中没有定义的错误，可以参考http://www.cnblogs.com/clsoho/archive/2010/03/08/1680614.html

以后遇到其它问题会继续追加。