BDC with two table controls

[Former Member]

How to handle table controls in BDC?

I have to develope a BDC for VD01 t-code, Can you suggest me how to handle table controls for taxation, and partner functions?

If possible please send me the code for the following.

Thanks and regards.

vijay

[Former Member]

Hi Vijay,

Please check this links.

http://www.sap-img.com/abap/bdc-example-using-table-control-in-bdc.htm

http://www.sapfans.com/sapfans/repos/comelite.htm

http://arthur_ong.tripod.com/xab023.htm

Hope this will help.

Regards,

Ferry Lianto

[LucianoBentiveg]

Look this one:

LOOP AT xknvv.

      PERFORM bdc_dynpro USING 'SAPMF02D' '0107'.
      PERFORM bdc_field  USING 'BDC_CURSOR' 'RF02D-REF_SPART'.
      PERFORM bdc_field  USING 'BDC_OKCODE' '/00'.
      PERFORM bdc_field  USING 'RF02D-KUNNR' xknvv-kunnr.
      PERFORM bdc_field  USING 'RF02D-VKORG' p_vkorgd.
      PERFORM bdc_field  USING 'RF02D-VTWEG' xknvv-vtweg.
      PERFORM bdc_field  USING 'RF02D-SPART' xknvv-spart.
      PERFORM bdc_field  USING 'RF02D-KTOKD' kna1-ktokd.
      PERFORM bdc_field  USING 'RF02D-REF_KUNNR' xknvv-kunnr.
      PERFORM bdc_field  USING 'RF02D-REF_VKORG' xknvv-vkorg.
      PERFORM bdc_field  USING 'RF02D-REF_VTWEG' xknvv-vtweg.
      PERFORM bdc_field  USING 'RF02D-REF_SPART' xknvv-spart.

      PERFORM bdc_dynpro USING 'SAPMF02D' '0310'.
      PERFORM bdc_field  USING 'BDC_CURSOR' 'KNVV-KALKS'.
      PERFORM bdc_field  USING 'BDC_OKCODE' '/00'.
      PERFORM bdc_field  USING 'KNVV-VKBUR' xknvv-vkbur.
      PERFORM bdc_field  USING 'KNVV-KDGRP' xknvv-kdgrp.
      PERFORM bdc_field  USING 'KNVV-WAERS' xknvv-waers.
      PERFORM bdc_field  USING 'KNVV-KALKS' xknvv-kalks.

      PERFORM bdc_dynpro USING 'SAPMF02D' '0315'.
      PERFORM bdc_field  USING 'BDC_CURSOR' 'KNVV-PODKZ'.
      PERFORM bdc_field  USING 'BDC_OKCODE' '=XPOD'.
      WRITE xknvv-lprio TO zlprio.
      PERFORM bdc_field  USING 'KNVV-LPRIO' zlprio.
      PERFORM bdc_field  USING 'KNVV-KZAZU' xknvv-kzazu.
      PERFORM bdc_field  USING 'KNVV-VSBED' xknvv-vsbed.
      PERFORM bdc_field  USING 'KNVV-VWERK' xknvv-vwerk.
      PERFORM bdc_field  USING 'KNVV-PODKZ' xknvv-podkz.
      WRITE xknvv-antlf TO zantlf.
      PERFORM bdc_field  USING 'KNVV-ANTLF' zantlf.

      PERFORM bdc_dynpro USING 'SAPMF02D' '0320'.
      PERFORM bdc_field  USING 'BDC_CURSOR' 'KNVV-ZTERM'.
      PERFORM bdc_field  USING 'BDC_OKCODE' '/00'.
      WRITE xknvv-zterm TO zzterm.
      PERFORM bdc_field  USING 'KNVV-ZTERM' zzterm.

      PERFORM bdc_dynpro USING 'SAPMF02D' '0324'.
      PERFORM bdc_field  USING 'BDC_OKCODE' '=ENTR'.

      CLEAR zline.
      SELECT * FROM knvp
               WHERE kunnr EQ xknvv-kunnr AND
                     vkorg EQ p_vkorgo AND
                     vtweg EQ xknvv-vtweg AND
                     spart EQ xknvv-spart.

        CHECK knvp-kunnr = knvp-kunn2.

        ADD 1 TO zline.

      ENDSELECT.

      SELECT * FROM knvp
               WHERE kunnr EQ xknvv-kunnr AND
                     vkorg EQ p_vkorgo AND
                     vtweg EQ xknvv-vtweg AND
                     spart EQ xknvv-spart.

        CHECK knvp-kunnr <> knvp-kunn2.

        ADD 1 TO zline.

        CONCATENATE 'KNVP-PARVW(' zline ')' INTO zbdc_text.
        WRITE knvp-parvw TO zparvw.
        PERFORM bdc_field USING zbdc_text zparvw.

        CONCATENATE 'RF02D-KTONR(' zline ')' INTO zbdc_text.
        PERFORM bdc_field USING zbdc_text knvp-kunn2.

      ENDSELECT.

      PERFORM bdc_dynpro USING 'SAPMF02D' '0324'.
      PERFORM bdc_field  USING 'BDC_CURSOR' 'KNVP-PARVW(01)'.
      PERFORM bdc_field  USING 'BDC_OKCODE' '=UPDA'.
      PERFORM bdc_transaction USING 'VD01'.


  ENDLOOP.