Below the code i am using :
FORM SELECTDATA.
Loop at itab.
SELECT BUKRS
BELNR
GJAHR
BUZEI
BSCHL
SGTXT
ZUONR
hkont from BSEG into corresponding fields of table it_bseg for all entries in itab where Bukrs = itab-Bukrs
and BELNR = itab-BELNR and GJAHR = itab-GJAHR
and ( BSCHL = '40' or BSCHL = '50').
ENDLOOP.
*
ENDFORM.
<<<<<<Below the BDC I am using>>>>>>
FORM create_asset.
LOOP AT itab.
* CLEAR bdctab.
REFRESH BDCTAB.
PERFORM BDC_DYNPRO USING 'SAPMF05L' '0100'.
PERFORM BDC_FIELD USING 'RF05L-BELNR' itab-BELNR.
PERFORM BDC_FIELD USING 'RF05L-BUKRS' itab-BUKRS.
PERFORM BDC_FIELD USING 'RF05L-GJAHR' itab-GJAHR.
PERFORM BDC_FIELD USING 'BDC_OKCODE' '/00'.
PERFORM BDC_DYNPRO USING 'SAPMF05L' '700'.
PERFORM BDC_FIELD USING 'BDC_CURSOR' 'RF05L-ANZDT(01)'.
PERFORM BDC_FIELD USING 'BDC_OKCODE' '=PK'.
CLEAR iT_BSEG.
READ TABLE iT_BSEG WITH KEY BUKRS = itab-BUKRS
BELNR = itab-BELNR
GJAHR = itab-GJAHR.
* BUZEI =
if sy-subrc = '0'.
if ( iT_BSEG-hkont = '000113408' ) and ( iT_BSEG-BSCHL = '40' or iT_BSEG-BSCHL = '50' ).
perform bdc_field using 'BSEG-ZUONR' itab-ZUONR.
PERFORM BDC_DYNPRO USING 'SAPLKACB' '0002'.
PERFORM BDC_FIELD USING 'BDC_OKCODE' '=ENTE'.
ENDIF.
ENDif.
PERFORM BDC_DYNPRO USING 'SAPMF05L' '0700'.
PERFORM BDC_FIELD USING 'BDC_OKCODE' '=AE'.
CALL TRANSACTION 'FB02' USING bdctab MODE mode UPDATE 'S'.
Please Advise..