BDC for FB50L...URGENT

Hi,
I am doing the BDC for FB50L but the code doesn't seem to execute...it is giving errors...
I am attaching the code...Please review it and help me....its really urgent...
Your help will be really appreciated...
REPORT ZTEST_BDC_PARK_ACC_GL.
DATA:
t_document_line_item_main LIKE bapiacgl09 OCCURS 100,
t_document_line_item_enhn LIKE bapiacextc OCCURS 100,
t_document_line_item_amnt LIKE bapiaccr09 OCCURS 100,
t_return LIKE bapiret2 OCCURS 100,
wa_document_header LIKE bapiache09,
wa_document_line_item_main LIKE bapiacgl09,
wa_document_line_item_enhn LIKE bapiacextc,
wa_document_line_item_amnt LIKE bapiaccr09,
wa_return LIKE bapiret2.
DATA: it_bdcdata TYPE TABLE OF bdcdata,
 it_messages TYPE TABLE OF bdcmsgcoll,
 wa_messages TYPE bdcmsgcoll,
 options TYPE ctu_params.
DATA: idx TYPE i,
 ch3(5) TYPE c,
 fname(40) TYPE c.
DATA: indate TYPE d,
 intdate TYPE D.
CLEAR wa_document_header.
wa_document_header-obj_type = space. "
wa_document_header-obj_key = space.
wa_document_header-obj_sys = space.
wa_document_header-bus_act = 'RFBU'.
wa_document_header-username = 'INFAUSRTEST'.
wa_document_header-header_txt = 'BAPI__POST'.
wa_document_header-comp_code = '1001'.
wa_document_header-doc_date = '20070814'.
wa_document_header-pstng_date = '20070814'.
CLEAR wa_document_header-trans_date.
CLEAR wa_document_header-fisc_year.
CLEAR wa_document_header-fis_period.
wa_document_header-doc_type = 'SY'.
wa_document_header-ref_doc_no = 'REQUIRED'.
wa_document_header-ac_doc_no = space.
wa_document_header-obj_key_r = space.
wa_document_header-reason_rev = space.
wa_document_header-compo_acc = space.
wa_document_header-ref_doc_no_long = space.
wa_document_header-acc_principle = 'LGAP'.
wa_document_header-neg_postng = space.
wa_document_header-obj_key_inv = space.
wa_document_header-bill_category = space.
Fill Line Item #1
CLEAR: wa_document_line_item_main, wa_document_line_item_enhn, wa_document_line_item_amnt.
Fill Main Portion Of Accounting Line Item
wa_document_line_item_main-itemno_acc = '1'. "Accounting Document Line Item Number
wa_document_line_item_main-gl_account = '2412001067'."HKONT - Account
wa_document_line_item_main-item_text = 'Test BAPI'. "SGTXT - Item Text
wa_document_line_item_main-doc_type = space. "BLART - Document Type
wa_document_line_item_main-comp_code = space. "BUKRS - Company Code
wa_document_line_item_main-pstng_date = '20070814'. "BUDAT - Posting Date
wa_document_line_item_main-alloc_nmbr = space. "ZUONR - Allocation Number
wa_document_line_item_main-costcenter = space. "KOSTL - Cost Center
wa_document_line_item_main-profit_ctr = space. "PRCTR - Profit Center
wa_document_line_item_main-de_cre_ind = 'D'. "NEWBS - Posting Key / Debit Credit Indicator
wa_document_line_item_main-trade_id = space. "RASSC - Company ID Of Trading Partner
Fill Amount Portion Of Accounting Line Item
wa_document_line_item_amnt-itemno_acc = '1'. "Accounting Document Line Item Number
wa_document_line_item_amnt-curr_type = '00'. "Currency Type
wa_document_line_item_amnt-currency = 'USD'. "WAERS - Currency Key
wa_document_line_item_amnt-amt_doccur = '239959'. "WRBTR - Amount In Document Currency Type
APPEND: wa_document_line_item_main TO t_document_line_item_main,
 wa_document_line_item_amnt TO t_document_line_item_amnt.
Fill Next Line Item #2
CLEAR: wa_document_line_item_main, wa_document_line_item_enhn, wa_document_line_item_amnt.
Fill Main Portion Of Accounting Line Item
wa_document_line_item_main-itemno_acc = '2'. "Accounting Document Line Item Number
wa_document_line_item_main-gl_account = '2412001067'."HKONT - Account
wa_document_line_item_main-item_text = 'Test BAPI'. "SGTXT - Item Text
wa_document_line_item_main-doc_type = space. "BLART - Document Type
wa_document_line_item_main-comp_code = space. "BUKRS - Company Code
wa_document_line_item_main-pstng_date = '20070814'. "BUDAT - Posting Date
wa_document_line_item_main-alloc_nmbr = space. "ZUONR - Allocation Number
wa_document_line_item_main-costcenter = space. "KOSTL - Cost Center
wa_document_line_item_main-profit_ctr = space. "PRCTR - Profit Center
wa_document_line_item_main-de_cre_ind = 'C'. "NEWBS - Posting Key / Debit Credit Indicator
wa_document_line_item_main-trade_id = space. "RASSC - Company ID Of Trading Partner
Fill Enhancement Portion Of Accounting Line Item
Fill Amount Portion Of Accounting Line Item
wa_document_line_item_amnt-itemno_acc = '2'. "Accounting Document Line Item Number
wa_document_line_item_amnt-curr_type = '00'. "Currency Type
wa_document_line_item_amnt-currency = 'USD'. "WAERS - Currency Key
wa_document_line_item_amnt-amt_doccur = '-239959'. "WRBTR - Amount In Document Currency Type
APPEND: wa_document_line_item_main TO t_document_line_item_main,
 wa_document_line_item_amnt TO t_document_line_item_amnt.
*************************BDC PROGRAM**************************************************************
PERFORM bdc_dynpro TABLES it_bdcdata USING 'SAPMF05A' wa_document_header-comp_code .
PERFORM bdc_field TABLES it_bdcdata USING 'BDC_OKCODE'
'=BP'.
MOVE wa_document_header-doc_date TO indate.
CALL FUNCTION 'CONVERT_DATE_TO_INTERNAL'
EXPORTING
date_external = indate
IMPORTING
date_internal = intdate.
PERFORM bdc_field TABLES it_bdcdata USING 'ACGL_HEAD-BLDAT'
INTDATE.
perform bdc_field TABLES it_bdcdata USING 'ACGL_HEAD-WAERS'
wa_document_line_item_amnt-currency.
MOVE wa_document_header-pstng_date TO indate.
CALL FUNCTION 'CONVERT_DATE_TO_INTERNAL'
EXPORTING
date_external = indate
IMPORTING
date_internal = intdate.
PERFORM bdc_field TABLES it_bdcdata USING 'ACGL_HEAD-BUDAT'
INTDATE.
perform bdc_field TABLES it_bdcdata USING 'ACGL_HEAD-XBLNR'
wa_document_header-ref_doc_no.
PERFORM bdc_field TABLES it_bdcdata USING 'ACGL_HEAD-BKTXT'
wa_document_header-header_txt.
LOOP AT t_document_line_item_main INTO wa_document_line_item_main.
 idx = idx + 1.
 ch3 = idx.
 CONCATENATE 'ACGL_ITEM-HKONT(' ch3 ')' INTO fname.
 CONDENSE fname.
 PERFORM bdc_field TABLES it_bdcdata USING fname
 wa_document_line_item_main-gl_account.
 CONCATENATE 'ACGL_ITEM-SHKZG(' ch3 ')' INTO fname.
 CONDENSE fname.
 PERFORM bdc_field TABLES it_bdcdata USING fname
 wa_document_line_item_main-de_cre_ind.
 CONCATENATE 'ACGL_ITEM-WRBTR(' ch3 ')' INTO fname.
 CONDENSE fname.
 PERFORM bdc_field TABLES it_bdcdata USING fname
 wa_document_line_item_amnt-amt_doccur.
 CONCATENATE 'ACGL_ITEM-SGTXT(' ch3 ')' INTO fname.
 CONDENSE fname.
 PERFORM bdc_field TABLES it_bdcdata USING fname
 wa_document_line_item_main-item_text .
ENDLOOP.
options-dismode = 'A'.
options-nobinpt = 'X'.
CALL TRANSACTION 'FB50' USING it_bdcdata MESSAGES INTO
it_messages OPTIONS FROM options.
Start new screen
FORM bdc_dynpro TABLES it_bdcdata STRUCTURE bdcdata USING program
dynpro
DATA: wa_bdcdata TYPE bdcdata.
wa_bdcdata-program = program.
wa_bdcdata-dynpro = dynpro.
wa_bdcdata-dynbegin = 'X'.
APPEND wa_bdcdata TO it_bdcdata.
ENDFORM. "BDC_DYNPRO
Insert field
FORM bdc_field TABLES it_bdcdata STRUCTURE bdcdata USING fnam fval.
DATA: wa_bdcdata TYPE bdcdata.
IF fval <> space.
 CLEAR wa_bdcdata.
 wa_bdcdata-fnam = fnam.
 wa_bdcdata-fval = fval.
 APPEND wa_bdcdata TO it_bdcdata.
ENDIF.
ENDFORM. "BDC_FIELD
Please suggest....
Thanks

data : amount(16).
This below statement is not passing value wa_document_line_item_amnt-amt_doccur into it_bdcdata-fval. So try to move it to a character field and then use the perform statement.
PERFORM bdc_field TABLES it_bdcdata USING fname
wa_document_line_item_amnt-amt_doccur.
change it to:
WRITE wa_document_line_item_amnt-amt_doccur TO AMOUNT.
PERFORM bdc_field TABLES it_bdcdata USING fname AMOUNT.
-Kriss

Similar Messages

Generic BDC for VK11 - URGENT

Hi
Can any one tell me how to create Generic BDC for transaction VK11 (Creating condition records)
My actual requirement is like we need to create condition record for every material with all the condition types exist for that material for different key combinations . A condition record for every material is to be created for different condition types and different key combinations where material MATNR is a key field .For example we need to create condition records dynamically for condition types ZPR0, ZCM0 etc.. for different key combinations where matnr is a key field .
can anyone of you point out a way to me?
Thanks in advance
Shivakumar

please copy the program and use it
* Report to Upload the pricing condtion records for materials. *
* Program : ZSDR_PRICE_UPLOAD *
* Author : girish.
* Description: *
* This report Creat pricing condition records for materials *
* Tables Used : SELECT UPDATE INSERT DELETE *
* MVKE X *
* Input/Output Files: *
* Transactions called: *
* Includes: *
* Run Frequency - *
* Program History *
* Date Change No Change Request SAP Rel NSC Rel *
* Description *
* 4.6C *
REPORT zsdr_price_upload MESSAGE-ID zsdr_bdc_vk11 LINE-SIZE 150
LINE-COUNT 75 .
******Internal Table for Header Data.
TYPES : BEGIN OF type_header,
 kschl LIKE konv-kschl,
 vkorg LIKE vbak-vkorg,
 vtweg LIKE komg-spart,
 matnr LIKE mvke-matnr,
 kbetr(11) TYPE c,
 datab(10) TYPE c,
 datbi(10) TYPE c,
 END OF type_header.
****Internal Table for Item Level.
TYPES : BEGIN OF type_item,
 kschl LIKE konv-kschl,
 vkorg LIKE vbak-vkorg,
 vtweg LIKE komg-spart,
 matnr LIKE mvke-matnr,
 kbetr(11) TYPE c,
 datab(10) TYPE c,
 datbi(10) TYPE c,
 END OF type_item.
******Error Table For not found in MVKE.
TYPES : BEGIN OF type_error ,
 kschl LIKE konv-kschl,
 vkorg LIKE vbak-vkorg,
 vtweg LIKE komg-spart,
 matnr LIKE mvke-matnr,
 kbetr LIKE konp-kbetr,
 datab(10) TYPE c,
 datbi(10) TYPE c,
 text(100) TYPE c,
 END OF type_error.
****For error Messages
TYPES : BEGIN OF type_mtab,
 matnr LIKE mara-matnr,
 msgtyp LIKE bdcmsgcoll-msgtyp,
 msgid LIKE bdcmsgcoll-msgid,
 msgnr LIKE bdcmsgcoll-msgnr,
 text(100) TYPE c,
 END OF type_mtab.
****Internal Table
TYPES: BEGIN OF type_mvke,
 matnr LIKE mvke-matnr,
 vkorg LIKE mvke-vkorg,
 vtweg LIKE mvke-vtweg,
 END OF type_mvke.
****Internal Table
TYPES : BEGIN OF type_tvkov,
 vkorg LIKE tvkov-vkorg,
 vtweg LIKE tvkov-vtweg,
 END OF type_tvkov.
** Declaring Internal Tables
DATA : t_header TYPE STANDARD TABLE OF type_header,
 t_item TYPE STANDARD TABLE OF type_item,
 t_mvke TYPE STANDARD TABLE OF type_mvke,
 t_tvkov TYPE STANDARD TABLE OF type_tvkov,
 t_error TYPE STANDARD TABLE OF type_error,
 t_mtab TYPE STANDARD TABLE OF type_mtab.
** Work Area Declaration.
DATA : wa_header LIKE LINE OF t_header,
 wa_item LIKE LINE OF t_item,
 wa_error LIKE LINE OF t_error,
 wa_mtab LIKE LINE OF t_mtab,
 wa_tvkov LIKE LINE OF t_tvkov,
 wa_mvke LIKE LINE OF t_mvke.
**Rows for Table with Excel Data********
DATA: t_xls_file LIKE alsmex_tabline OCCURS 0 WITH HEADER LINE.
***Constant.
DATA : c_params LIKE ctu_params.
DATA : c_ans(1) TYPE c.
DATA : v_count(4) TYPE c. " To show No.of records
DATA : bdctab LIKE bdcdata OCCURS 10 WITH HEADER LINE. " BDCDATA
DATA : tmess_mtab LIKE bdcmsgcoll OCCURS 10 WITH HEADER LINE.
** SELECTION SCREEN
SELECTION-SCREEN : BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
PARAMETERS : p_fname LIKE rlgrap-filename OBLIGATORY.
SELECTION-SCREEN : END OF BLOCK b1.
* END OF SELECTION SCREEN.
DATA : repid LIKE sy-repid.
DATA : v_matnr(50) TYPE c, "used for line items
 v_kbetr(50) TYPE c, "used for line items
 v_dat1(50) TYPE c, "used for line items
 v_dat(50) TYPE c. "used for line items
DATA : v_lindx(5) TYPE n ,"index counter for first 14 records.
 v_lindx1(5) TYPE n VALUE '01', "index counter for 13 records.
 v_item(5) TYPE c, "To increment the line index
 v_pgedwn2 TYPE i . "For Pagedown Counter
DATA: v_currentrow TYPE i. "For Current Row
DATA v_bdc(50) TYPE c." Text to apper in Confrim POPUP Window.
************AT SELECTION-SCREEN
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_fname.
PERFORM get_filename USING p_fname.
*************START-OF-SELECTION
START-OF-SELECTION.
******Values for Ctu_params to Transaction
c_params-defsize = 'X'.
c_params-dismode = 'N'.
c_params-updmode = 'S'.
******Refresh
PERFORM f_refresh.
*********To upload File.
PERFORM upload_file.
****User Confrimation only BDC will Process
IF c_ans = '1'.
** *** BDC Process.
 PERFORM read_data.
ELSE.
 FORMAT COLOR 3 INTENSIFIED .
 WRITE:/ 'Selected not to Process the Upload'.
 EXIT.
ENDIF.
******On completion of Process Refresh the Internal Table
REFRESH : t_xls_file,
 t_header,
 t_item,
 t_mvke,
 t_tvkov.
CLEAR : t_xls_file,
 wa_header,
 wa_item,
 wa_mvke,
 wa_tvkov.
***********Display Messages
WRITE : /01 'Status',19 'Status Text'.
WRITE AT 0(150) sy-uline.
LOOP AT t_mtab INTO wa_mtab.
 WRITE :/01 wa_mtab-msgtyp,19 wa_mtab-text.
ENDLOOP.
SKIP 2.
SORT t_error BY matnr.
WRITE AT 0(150) sy-uline.
WRITE 'ERROR MESSAGES'.
WRITE AT 0(150) sy-uline.
WRITE :/01 'Material.No',20 'Status Text'.
WRITE AT 0(150) sy-uline.
LOOP AT t_error INTO wa_error WHERE matnr NE ' '.
 WRITE:/01 wa_error-matnr,20 wa_error-text.
ENDLOOP.
*& Form get_filename
* text
* -->P_FILENAME text
FORM get_filename USING p_fname.
*****To read the file from Presentation Server
CALL FUNCTION 'KD_GET_FILENAME_ON_F4'
 EXPORTING
 program_name = repid
 dynpro_number ! ; = syst-dynnr
 field_name = p_fname
* STATIC = ' '
 mask = '*.XLS'
 CHANGING
 file_name = p_fname
EXCEPTIONS
 mask_too_long = 1
 OTHERS = 2
IF sy-subrc <> 0.
* * MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
* WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
ENDFORM. " get_filename
*& Form upload_file
* text
* --> p1 text
* <-- p2 text
FORM upload_file.
DATA : frow VALUE 2 TYPE i,
 fcol VALUE 1 TYPE i,
 erow VALUE 10000 TYPE i,
 ecol VALUE 7 TYPE i,
 ecol1 VALUE 1 TYPE i,
 c_col1 TYPE i VALUE '0001',
 c_col2 TYPE i VALUE '0002',
 c_col3 TYPE i VALUE '0003',
 &nb! sp; c_col4 TYPE i VALUE '0004',
 c_col5 TYPE i VALUE '0005',
 c_col6 TYPE i VALUE '0006',
 c_col7 TYPE i VALUE '0007'.
***FM used to UPLOAD data from Flat file
CALL FUNCTION 'ALSM_EXCEL_TO_INTERNAL_TABLE'
 EXPORTING
 filename = p_fname
 i_begin_col = fcol
 i_begin_row = frow
 i_end_col = ecol
 i_end_row = erow
 TABLES
 intern = t_xls_file
 EXCEPTIONS
 inconsistent_parameters = 1
 upload_ole = 2
 OTHERS = 3.
IF sy-subrc <> 0.
 MESSAGE e000.
ENDIF.
****T_XLS_FILE is initial, stop the process & throw message
IF t_xls_file[] IS INITIAL.
 FORMAT COLOR 6 ON INTENSIFIED ON.
 WRITE:/ 'No Data Exists '.
 FORMAT COLOR OFF INTENSIFIED OFF.
 STOP.
ELSE.
* Sort table by rows and colums
 SORT t_xls_file BY row col.
* Get first row retrieved
 READ TABLE t_xls_file INDEX 1.
* Set first row retrieved to current row
 v_currentrow = t_xls_file-row.
**Loop to move data in internal Table
 LOOP AT t_xls_file .
* Reset values for next row
 IF t_xls_file-row NE v_currentrow.
 APPEND wa_header TO t_header.
 CLEAR wa_header.
 v_currentrow = t_xls_file-row.
 ENDIF.
 CASE t_xls_file-col.
 WHEN c_col1. "Kschl
 wa_header-kschl = t_xls_file-value.
 WHEN c_col2. "Vkorg
 wa_header-vkorg = t_xls_file-value.
 WHEN c_col3. "vtweg
 wa_header-vtweg = t_xls_file-value.
 WHEN c_col4. "Matnr
 wa_header-matnr = t_xls_file-value.
 WHEN c_col5. "Kbetr
 wa_header-kbetr = t_xls_file-value.
 WHEN c_col6. "FROm
 wa_header-datab = t_xls_file-value.
 WHEN c_col7. "TO
 wa_header-datbi = t_xls_file-value.
 ENDCASE.
 ENDLOOP.
 APPEND wa_header TO t_header.
 CLEAR wa_header.
ENDIF.
****To process the data
PERFORM f_process.
ENDFORM. " upload_file
*& Form READ_DATA
* text
* --> p1 text
* <-- p2 text
FORM read_data.
****To make Uniq Records in Header Level
SORT t_header BY kschl vkorg vtweg.
DELETE ADJACENT DUPLICATES FROM t_header COMPARING
 kschl vkorg vtweg .
SORT t_item BY vkorg vtweg matnr.
DATA : wa1_item TYPE type_item.
DATA : l_cnt TYPE i.
DATA : flag(1) TYPE c. "to process the Line item.
***Looping Header Table.
LOOP AT t_header INTO wa_header.
 PERFORM bdc_dynpro US! ING 'SAPMV13A' '0100'.
 PERFORM bdc_field USING 'BDC_CURSOR'
 'RV13A-KSCHL'.
 PERFORM bdc_field USING 'BDC_OKCODE'
 '=ANTA'.
 PERFORM bdc_field USING 'RV13A-KSCHL'
 wa_header-kschl.
 PERFORM bdc_dynpro USING 'SAPLV14A' '0100'.
 PERFORM bdc_field USING 'BDC_CURSOR'
 'RV130-SELKZ(03)'.
 PERFORM bdc_field USING 'BDC_OKCODE'
 '=WEIT'.
 PERFORM bdc_field USING 'RV130-SELKZ(03)'
 'X'.
 PERFORM bdc_dynpro USING 'SAPMV13A' '1004'.
 PERFORM bdc_field USING 'BDC_CURSOR'
 'KOMG-VKORG'.
 PERFORM bdc_field USING 'KOMG-VKORG'
 wa_header-vkorg.
 PERFORM bdc_field USING 'KOMG-VTWEG'
 wa_header-vtweg.
****To handle Line Items.
 LOOP AT t_item INTO wa1_item WHERE vkorg = wa_header-vkorg AND
 vtweg = wa_header-vtweg.
 wa_item = wa1_item.
******Flag Set only After processing first 14 records .
 IF flag = ' '.
 v_lindx = v_lindx + 01.
 SHIFT v_lindx LEFT DELETING LEADING '0'.
 v_item = v_lindx .
 CONCATENATE 'KOMG-MATNR(' v_item ')' INTO v_matnr.
 PERFORM bdc_field USING v_matnr
 wa_item-matnr.
 CONCATENATE 'KONP-KBETR(' v_item ')' INTO v_kbetr.
 PERFORM bdc_field USING v_kbetr
 wa_item-kbetr.
 CONCATENATE 'RV13A-DATAB(' v_item ')' INTO v_dat.
 PERFORM bdc_field USING v_dat
 wa_item-datab.
 CONCATENATE 'RV13A-DATBI(' v_item ')' INTO v_dat1.
 PERFORM bdc_field USING v_dat1
 wa_item-datbi.
 IF v_item = 14.
 flag = 'X'.
 PERFORM bdc_field USING 'BDC_OKCODE'
 '/00'.
 PERFORM bdc_field USING 'BDC_OKCODE'
 '=P+'.
 PERFORM bdc_dynpro USING 'SAPMV13A' '1004'.
 CLEAR v_lindx.
 CLEAR v_item.
 CONTINUE.
 ENDIF.
 ENDIF.
***Flag is Set after Processing of 14 records.
****** TO process rest of Records
 IF flag = 'X'.
 v_pgedwn2 = v_pgedwn2 + 1.
 v_lindx1 = v_lindx1 + 01.
 SHIFT v_lindx1 LEFT DE! LETING LEADING '0'.
 v_item = v_lindx1 .
 CONCATENATE 'KOMG-MATNR(' v_it! em ')' INTO v_matnr.
 PERFORM bdc_field USING v_matnr
 wa_item-matnr.
 CONCATENATE 'KONP-KBETR(' v_item ')' INTO v_kbetr.
 PERFORM bdc_field USING v_kbetr
 wa_item-kbetr.
 CONCATENATE 'RV13A-DATAB(' v_item ')' INTO v_dat.
 PERFORM bdc_field USING v_dat
 wa_item-datab.
 CONCATENATE 'RV13A-DATBI(' v_item ')' INTO v_dat1.
 PERFORM bdc_field USING v_dat1
 wa_item-datbi.
 IF v_pgedwn2 = 13.
 PERFORM bdc_field USING 'BDC_OKCODE'
 '/00'.
 PERFORM bdc_field USING 'BDC_OKCODE'
 '=P+'.
 PERFORM bdc_dynpro USING 'SAPMV13A' '1004'.
 v_pgedwn2 = 0.
 v_lindx1 = 1.
 CLEAR v_item.
 CONTINUE.
 ENDIF.
 ENDIF.
 ENDLOOP.
 PERFORM bdc_field USING 'BDC_OKCODE'
 '=SICH'.
****** Calling Transaction after Processing All items.
 CALL TRANSACTION 'VK11' USING bdctab
 OPTIONS FROM c_params MESSAGES INTO tmess_mtab.
 REFRESH bdctab.
 CLEAR : bdctab.
 CLEAR : wa_item.
 CLEAR : wa1_item.
 CLEAR : wa_header.
 CLEAR : l_cnt.
 CLEAR : v_lindx1.
 CLEAR: v_pgedwn2,v_lindx.
 LOOP AT tmess_mtab .
 l_cnt = l_cnt + 1.
 READ TABLE t_item INTO wa_item INDEX l_cnt .
 CALL FUNCTION 'MASS_MESSAGE_GET' "To get the Message Text
 EXPORTING
 arbgb = tmess_mtab-msgid
 msgnr = tmess_mtab-msgnr
 msgv1 = tmess_mtab-msgv1
 msgv2 = tmess_mtab-msgv2
 msgv3 = tmess_mtab-msgv3
 msgv4 ! = tmess_mtab-msgv4
 IMPORTING
 msgtext = wa_mtab-text
 EXCEPTIONS
 message_not_found = 1
 OTHERS = 2.
 IF sy-subrc <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
* WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
 ENDIF.
 wa_mtab-matnr = wa_item-matnr.
 wa_mtab-msgtyp = tmess_mtab-msgtyp.
 wa_mtab-msgid = tmess_mtab-msgid.
 wa_mtab-msgn! r = tmess_mtab-msgnr.
 APPEND wa_mtab TO t_mtab.
 CLEAR wa_mtab-text.
 CLEAR wa_item.
 ENDLOOP.
ENDLOOP.
ENDFORM. " READ_DATA
*& Form BDC_DYNPRO
* text
* -->P_0300 text
* -->P_0301 text
* Start new screen *
FORM bdc_dynpro USING program dynpro.
CLEAR bdctab.
bdctab-program = program.
bdctab-dynpro = dynpro.
bdctab-dynbegin = 'X'.
APPEND bdctab.
ENDFORM. " BDC_DYNPRO
*& Form BDC_FIELD
* text
* -->P_0305 text
* -->P_WA_HEADER_KSCHL text
* Insert field *
FORM bdc_field USING fnam fval.
CLEAR bdctab.
bdctab-fnam = fnam.
bdctab-fval = fval.
APPEND bdctab.
ENDFORM. " BDC_FIELD
*& Form bdc_trc_ansaction
* text
* -->P_0527 text
*& Form f_Process
* text
* --> p1 text
* <-- p2 text
FORM f_process.
DATA : l_todate(12) TYPE c,
 l_frdate(12) TYPE c.
***Select for all entries of material in Header "Flat File Materials".
IF NOT t_header[] IS INITIAL.
 SELECT matnr vkorg vtweg FROM mvke INTO TABLE t_mvke FOR ALL ENTRIES
 IN t_header WHERE matnr = t_header-matnr AND
 vkorg = t_header-vkorg AND
 vtweg = t_header-vtweg.
ENDIF.
*********select Sales.org & Dist.channel.
IF NOT t_header[] IS INITIAL.
 SELECT vkorg vtweg FROM tvkov INTO TABLE t_tvkov FOR ALL ENTRIES IN
 t_header WHERE vkorg = t_header-vkorg
 AND vtweg = t_header-vtweg.
ENDIF.
***Checking for material in Sales Master Table
SORT t_mvke BY matnr vkorg vtweg.
SORT t_tvkov BY vkorg vtweg.
LOOP AT t_header INTO wa_header.
 READ TABLE t_mvke INTO wa_mvke WITH KEY matnr = wa_header-matnr
 vkorg = wa_header-vkorg
 ! ; vtweg = wa_header-vtweg BINARY SEARCH.
 IF sy-subrc <> 0.
 wa_error = wa_header.
 &nb! sp; MOVE text-011 TO wa_error-text.
 APPEND wa_error TO t_error.
 DELETE TABLE t_header FROM wa_header.
 ELSE.
********Date Validations
 IF ( wa_header-datab NE ' ! ; ' AND wa_header-datbi NE ' ' ) .
 l_todate = wa_header-datab.
 l_frdate = wa_header-datbi.
 REPLACE '.' INTO l_toda! te WITH ''.
 REPLACE '.' INTO l_todate WITH ''.
 CONDENSE l_todate NO-GAPS.
 REPLACE '.' INTO l_frdate WITH ''.
 REPLACE '.' INTO l_frdate WITH ''.
 CONDENSE l_frdate NO-GAPS.
 IF l_frdate < l_todate.
 wa_error = wa_header .
 MOVE text-012 TO wa_error-text.
 APPEND wa_error TO t_error.
 DELETE TABLE t_header FROM wa_header.
 ENDIF.
 ELSE.
 wa_error = wa_header .
 MOVE text-016 TO wa_error-text.
 APPEND wa_error TO t_error.
 DELETE TABLE t_header FROM wa_header.
 ENDIF.
 ENDIF.
********Rate Validation.
 IF wa_header-kbetr = ' '.
 wa_error = wa_header .
 MOVE text-017 TO wa_error-text.
 APPEND wa_error TO t_error.
 DELETE TABLE t_header FROM wa_header.
 ENDIF.
 READ TABLE t_tvkov INTO wa_tvkov WITH KEY vkorg = wa_header-vkorg
 BINARY SEARCH.
 IF sy-subrc = 0.
 READ TABLE t_tvkov INTO wa_tvkov WITH KEY vtweg = wa_header-vtweg
 BINARY SEARCH.
 IF sy-subrc <> 0.
 wa_error = wa_header.
 MOVE text-015 TO wa_error-text.
 WRITE wa_header-vtweg TO wa_error-text+13(4).
 APPEND wa_error TO t_error.
 ENDIF.
 ELSE.
 wa_error = wa_header.
 MOVE text-013 TO wa_error-text.
 WRITE wa_header-vkorg TO wa_error-text+9(4).
 APPEND wa_error TO t_error.
 ENDIF.
 CLEAR wa_header.
ENDLOOP.
*****Deleting Duplicate Material Form Header "Flat File Data".
SORT t_header BY kschl vkorg vtweg matnr.
DELETE ADJACENT DUPLICATES FROM t_header COMPARING
 kschl! vkorg vtweg matnr .
* ****Data Moving from Header to Item Level.
t_item[] = t_header[].
*To count No.of records in Item Table.
DESCRIBE TABLE t_item LINES v_count.
CONCATENATE text-014 ' ' v_count INTO v_bdc.
****Popup to get Confirmation from user to process BDC
CALL FUNCTION 'POPUP_TO_CONFIRM'
 EXPORTING
 titlebar = 'Confirmation of File Data'
 text_question = v_bdc
 text_button_1 = 'Confirm'
 text_button_2 = 'Cancel Run'
 default_button = '1'
 IMPORTING
 answer = c_ans.
IF sy-subrc <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
* WITH SY-MSGV1 SY-MSGV2 SY-! MSGV3 SY-MSGV4.
ENDIF.
ENDFORM. " f_Process
*& Form f_Refresh
* text
* --> p1 text
* <-- p2 text
FORM f_refresh.
REFRESH : t_xls_file,
 t_header,
 t_item,
 t_mvke,
 t_tvkov,
 t_error,
 t_mtab.
CLEAR : t_xls_file,
 wa_header,
 wa_item,
 wa_mvke,
 wa_tvkov,
 wa_error,
 wa_mtab.
ENDFORM. " f_Refresh
reward point s if it is usefull ....
girish

Help for bdc for transfer of asset plant wise stock transfer(urgent)

hi all,
if anyone has done BDC for this scenario ie.,
bdc for transfer of asset plant wise stock transfer
then plz share its code with me.and if someone has done any modification regarding this scenario then plz let me know that what modification he/she has carried out in this & share the code for the same.
i will be grateful to u for this and promise that i will give points to all ur effort.
Thanks & regards
Sanjeev

Hi Sanjeev,
Do a recording for the transaction using SHDB. Once you are done with the recording save the recording into a zprogram. You have the code.
Regards
Arun

About bdc for aiab transaction,urgent plzzzzzzzz

hi all,
i m doing BDC for tcode AIAB.
here the table control is coming in to picture and i don know how to handle table control,
so if anybody can help me to come over this issue??
my wrk is still pending,plzz try it n giv me reply,my problm is in 2nd screen in transaction,
plzz reply asap.
thanks
regards
murty

hi,
Following is a sample code of handling table control in BDC.
REPORT Y730_BDC5 .
*HANDLING TABLE CONTROL IN BDC
DATA : BEGIN OF IT_DUMMY OCCURS 0,
 DUMMY(100) TYPE C,
 END OF IT_DUMMY.
DATA : BEGIN OF IT_XK01 OCCURS 0,
 LIFNR(10) TYPE C,
 BUKRS(4) TYPE C,
 EKORG(4) TYPE C,
 KTOKK(4) TYPE C,
 NAME1(30) TYPE C,
 SORTL(10) TYPE C,
 LAND1(3) TYPE C,
 SPRAS(2) TYPE C,
 AKONT(6) TYPE C,
 FDGRV(2) TYPE C,
 WAERS(3) TYPE C,
 END OF IT_XK01,
 BEGIN OF IT_BANK OCCURS 0,
 BANKS(3) TYPE C,
 BANKL(10) TYPE C,
 BANKN(10) TYPE C,
 KOINH(30) TYPE C,
 LIFNR(10) TYPE C,
 END OF IT_BANK.
DATA : IT_BDCDATA LIKE BDCDATA OCCURS 0 WITH HEADER LINE,
 IT_BDCMSGCOLL LIKE BDCMSGCOLL OCCURS 0 WITH HEADER LINE.
CALL FUNCTION 'WS_UPLOAD'
EXPORTING
 FILENAME = 'C:\VENDOR.TXT'
 FILETYPE = 'ASC'
TABLES
 DATA_TAB = IT_DUMMY.
LOOP AT IT_DUMMY.
IF IT_DUMMY-DUMMY+0(2) = '11'.
 IT_XK01-LIFNR = IT_DUMMY-DUMMY+2(10).
 IT_XK01-BUKRS = IT_DUMMY-DUMMY+12(4).
 IT_XK01-EKORG = IT_DUMMY-DUMMY+16(4).
 IT_XK01-KTOKK = IT_DUMMY-DUMMY+20(4).
 IT_XK01-NAME1 = IT_DUMMY-DUMMY+24(30).
 IT_XK01-SORTL = IT_DUMMY-DUMMY+54(10).
 IT_XK01-LAND1 = IT_DUMMY-DUMMY+64(3).
 IT_XK01-SPRAS = IT_DUMMY-DUMMY+67(2).
 IT_XK01-AKONT = IT_DUMMY-DUMMY+69(6).
 IT_XK01-FDGRV = IT_DUMMY-DUMMY+75(2).
 IT_XK01-WAERS = IT_DUMMY-DUMMY+77(3).
 APPEND IT_XK01.
ELSE.
 IT_BANK-BANKS = IT_DUMMY-DUMMY+2(3).
 IT_BANK-BANKL = IT_DUMMY-DUMMY+5(10).
 IT_BANK-BANKN = IT_DUMMY-DUMMY+15(10).
 IT_BANK-KOINH = IT_DUMMY-DUMMY+25(30).
 IT_BANK-LIFNR = IT_DUMMY-DUMMY+55(10).
 APPEND IT_BANK.
ENDIF.
ENDLOOP.
LOOP AT IT_XK01.
REFRESH IT_BDCDATA.
perform bdc_dynpro using 'SAPMF02K' '0100'.
perform bdc_field using 'BDC_CURSOR'
 'RF02K-REF_LIFNR'.
perform bdc_field using 'BDC_OKCODE'
 '/00'.
perform bdc_field using 'RF02K-LIFNR'
 IT_XK01-LIFNR.
perform bdc_field using 'RF02K-BUKRS'
 IT_XK01-BUKRS.
perform bdc_field using 'RF02K-EKORG'
 IT_XK01-EKORG.
perform bdc_field using 'RF02K-KTOKK'
 IT_XK01-KTOKK.
perform bdc_dynpro using 'SAPMF02K' '0110'.
perform bdc_field using 'BDC_CURSOR'
 'LFA1-TELX1'.
perform bdc_field using 'BDC_OKCODE'
 '/00'.
perform bdc_field using 'LFA1-NAME1'
 IT_XK01-NAME1.
perform bdc_field using 'LFA1-SORTL'
 IT_XK01-SORTL.
perform bdc_field using 'LFA1-LAND1'
 IT_XK01-LAND1.
perform bdc_field using 'LFA1-SPRAS'
 IT_XK01-SPRAS.
perform bdc_dynpro using 'SAPMF02K' '0120'.
perform bdc_field using 'BDC_CURSOR'
 'LFA1-KUNNR'.
perform bdc_field using 'BDC_OKCODE'
 '/00'.
perform bdc_dynpro using 'SAPMF02K' '0130'.
perform bdc_field using 'BDC_CURSOR'
 'LFBK-KOINH(02)'.
perform bdc_field using 'BDC_OKCODE'
 '=ENTR'.
DATA : FNAM(20) TYPE C,
 IDX TYPE C.
MOVE 1 TO IDX.
LOOP AT IT_BANK WHERE LIFNR = IT_XK01-LIFNR.
CONCATENATE 'LFBK-BANKS(' IDX ')' INTO FNAM.
perform bdc_field using FNAM
 IT_BANK-BANKS.
CONCATENATE 'LFBK-BANKL(' IDX ')' INTO FNAM.
perform bdc_field using FNAM
 IT_BANK-BANKL.
CONCATENATE 'LFBK-BANKN(' IDX ')' INTO FNAM.
perform bdc_field using FNAM
 IT_BANK-BANKN.
CONCATENATE 'LFBK-KOINH(' IDX ')' INTO FNAM.
perform bdc_field using FNAM
 IT_BANK-KOINH.
IDX = IDX + 1.
ENDLOOP.
perform bdc_dynpro using 'SAPMF02K' '0130'.
perform bdc_field using 'BDC_CURSOR'
 'LFBK-BANKS(01)'.
perform bdc_field using 'BDC_OKCODE'
 '=ENTR'.
perform bdc_dynpro using 'SAPMF02K' '0210'.
perform bdc_field using 'BDC_CURSOR'
 'LFB1-FDGRV'.
perform bdc_field using 'BDC_OKCODE'
 '/00'.
perform bdc_field using 'LFB1-AKONT'
 IT_XK01-AKONT.
perform bdc_field using 'LFB1-FDGRV'
 IT_XK01-FDGRV.
perform bdc_dynpro using 'SAPMF02K' '0215'.
perform bdc_field using 'BDC_CURSOR'
 'LFB1-ZTERM'.
perform bdc_field using 'BDC_OKCODE'
 '/00'.
perform bdc_dynpro using 'SAPMF02K' '0220'.
perform bdc_field using 'BDC_CURSOR'
 'LFB5-MAHNA'.
perform bdc_field using 'BDC_OKCODE'
 '/00'.
perform bdc_dynpro using 'SAPMF02K' '0310'.
perform bdc_field using 'BDC_CURSOR'
 'LFM1-WAERS'.
perform bdc_field using 'BDC_OKCODE'
 '/00'.
perform bdc_field using 'LFM1-WAERS'
 IT_XK01-WAERS.
perform bdc_dynpro using 'SAPMF02K' '0320'.
perform bdc_field using 'BDC_CURSOR'
 'WYT3-PARVW(01)'.
perform bdc_field using 'BDC_OKCODE'
 '=ENTR'.
perform bdc_dynpro using 'SAPLSPO1' '0300'.
perform bdc_field using 'BDC_OKCODE'
 '=YES'.
CALL TRANSACTION 'XK01' USING IT_BDCDATA
 MODE 'A'
 UPDATE 'S'
 MESSAGES INTO IT_BDCMSGCOLL.
ENDLOOP.
FORM BDC_DYNPRO USING PROG SCR.
CLEAR IT_BDCDATA.
IT_BDCDATA-PROGRAM = PROG.
IT_BDCDATA-DYNPRO = SCR.
IT_BDCDATA-DYNBEGIN = 'X'.
APPEND IT_BDCDATA.
ENDFORM.
FORM BDC_FIELD USING FNAM FVAL.
CLEAR IT_BDCDATA.
IT_BDCDATA-FNAM = FNAM.
IT_BDCDATA-FVAL = FVAL.
APPEND IT_BDCDATA.
ENDFORM.
Hope this is helpful.

Problem in BDC for CA01

Hi gurus , i am writing a bdc for ca01. here the screen sequence changes when we create routing first time and second or subsequent time. how know that which screen will be next when we are not passing the group, as if counter can be 1 or more than 1 since group is taken automatically.
<<text often considered offensive, removed>>
regards
Aditya.
Edited by: Matt on Mar 9, 2009 12:20 PM - "Urgently" read the Rules of Engagement

hi gurus , still my question is not answerd ,
i am writing a bdc for this ca01 , in CA01 transaction when group name is not given the system automatically takes the group.. it can take existing group or create new group. now when new group the group counter is 1 the screen sequence is for eg . 1 , 2 , 3, 4, and when group counter is more than 1 for that group screen sequence is 1 , 2a, 2 , 3 ,4. since the group is internally taken by system we dont know what will be group no ....
pls help how to do this bdc .

Problem in bdc for f-22

Hi freinds iam doing upload program for f-22 open customer balances..iam stucked as iam new in abap, here is the problem ..
when i try to run the program after 2 screens i get a pop up with costcenter ,profitcenter, and business area field...which in nomal t.code are not in the form of popup.....and when i put valid data (account) which has profit center and cost center then it works ..but when i put data which had no profict center and costcenter it process but shows and errror
"CURSOR FIELD 'COBL-KOSTL' DOESNOT EXITS.
AND I TRIED TO COMPARE IT WITH SKB1 TABLES FIELD FSTAG...ALSO ...
THE REQUIREMENT IS ITHOULD PROCESS THE ACCOUNT WHHICH HAS PROFIT CNETER AND COST CENTER IF ASSIGN FOR A ACCOUNT IOF NO THEN REST SHOULD BE PROCESSD,
HERE IS MY CODE ..PLS CORRECT ME WITH MY CODE IF IAM WRONG SOMEHERE ..AND GIVE ME SUGGETSION FOR IT (URGENT)
*Selecting fieldstatus from skb1 for comparision
    SELECT SINGLE fstag FROM skb1 INTO w_fstag WHERE
                   saknr = i_final-newko2.
    IF sy-subrc = 0.
      PERFORM bdc_field       USING 'COBL-KOSTL'
                                    i_final-kostl2.
      PERFORM bdc_field       USING 'COBL-PRCTR'
                                    i_final-prctr2.
    ENDIF. "IF SY-SUBRC
    PERFORM bdc_dynpro      USING 'SAPMF05A' '0330'.
    PERFORM bdc_field       USING 'BDC_CURSOR'
                                  'BSEG-CCBTC'.
    PERFORM bdc_field       USING 'BDC_OKCODE'
                                  '=BU'.
    PERFORM bdc_transaction USING 'F-22'.
ENDLOOP.

Using batch input to post financial transactions is always difficult. As said earlier, RFBIBL00 (or a BAPI) are the preferred method. However, if you must use BDC, you have to allow for the coding block in the popup (the COBL fields).
This workds for FB01 for cost centers, fund centers and funds. You can adapt it to include the profit center in F-22:
      perform dynpro using:
* Debit the central account the full amount
       'X' 'SAPMF05A'    '0300',         "second screen - 300
       ' ' 'BSEG-WRBTR' ltcap_int-tot_inc,"DR amount
       ' ' 'BSEG-ZUONR' zuonr,            "allocation
       ' ' 'BSEG-SGTXT' sgtxt1,           "text
       ' ' 'RF05A-NEWBS' '50',             "post key = credit
       ' ' 'RF05A-NEWKO' p_acc,            "bofa clearing acct
       'X' 'SAPLKACB'    '0002',           "coding block
       ' ' 'COBL-KOSTL' '11732',          "cost center
       ' ' 'COBL-FISTL' '103387',         "fund center
* Credit the fund the final amount
       'X' 'SAPMF05A'    '0300',           "CR screen
       ' ' 'BSEG-WRBTR' ltcap_int-fin_inc,"CR amount
       ' ' 'BSEG-SGTXT' sgtxt1,           "text
       'X' 'SAPLKACB'    '0002',           "coding block
       ' ' 'COBL-KOSTL' '11733',          "cost center
       ' ' 'COBL-GEBER' ltcap_int-fund,   "fund
       ' ' 'COBL-FISTL' ltcap_int-cfc.    "fund center
Rob

BDC FOR MM02

Hi Friends,
i want to write a BDC FOR MM02 T.CODE AT PLANT LEVEL AND METERIAL LEVEL.
I WANT UPLOAD THE BELOW FEILDS DATA :
THE FIELDS THAT I WANT UPLOAD IS EISBE(SAFETY STOCK) , MAABC(ABC INDICATOR)
AND WZEIT(LEAD TIME).....AT PLANT LEVEL AND METERIAL LEVEL.
PLS HELP ME.... IT IS AN URGENT.
REGARDS,

because with LSMW , you can standard program RMDATIND (direct input ==> faster than batch input.
In step 1 : you select standard program (OBject 0020 method 0000)
In step 2 you define source structure ZSRC_MARA
In step 3 you list the fields : MATNR, WERKS, MAABC, MINBE
In step 4 you make the link of your source struture to BGR00, BMM00, BMMH1
In step 5 you map your fields + BMM00-XEID1 ( you have to flag the views you consider).
Finished from developpement side
DAvid

BDC for TS01 Transaction

Dear All
Manual entry in the TS01(Create Security) transaction behaves for entering the amount values differently as manual entry in the amount field will get saved but the entry through program is not getting saved.
Data is availabe in BDCDATA table but when it when it populates and gets saved, amount will be blank and transaction gets saved.
Need urgent on this issue.
Help is greatly appreciated.
Thanks,
Azhar.

Hi Mohammed,
The main program associated to this program is a report type program. You cannot do a BDC for such programs.
Instead try the bapi: BAPI_FTR_SECURITY_CREATE
Regards,
Ravi

BDC for pop up dialog box.....

Hi Experts,
I need urgent help in BDC.
I want to handle BDC for the pop up dialog box.
Please help.

hi
can u he a bit clear

Bdc for vl01n

hI all..
i want to do bdc for VL01N.. my doubt is.. manually when we enter the storage location under picking tab, system search for the stock availability if not it displays error message, than agian we enter some diff storage location and so on.. how can we do in the bdc..
hope u understood my doubt.. this is urgent requirement kidly help me
thanks
Message was edited by:
sap abap

Don't do BDC on enjoySAP screens like VL01N, its going to be a total waste of time. Find out the appropriate BAPI, map your data as required to pass it to the required parameters of the BAPI then fire the BAPI to create the deliveries. Don't forget to call BAPI_TRANSACTION_COMMIT in the end.
Cheers,
Sougata.

BDC for ik11

Hello all
i am new to BDC's & not very comfortable to create them. I have to create a BDC for T-Code "IK11", please anyone can guide me how to do that with proper steps or if any code can be given, that will be helpful.
its bit urgent for me, so i would really appreciate your support & quick response.
Points will be awarded.
regards & thanx
Prateek.

Hi,
Follow the steps accordingly
Goto Shdb do the recording properly .
Their is a button named program press it .
Copy the entire code which are under start-of selection
and place it in your main program
you will get one include at the top just below the report
get inside it
Go at the bottom you will see two form copy it and paste it .
Comment the if condition present in the last form.
Your BDC program is done.
Reward some points.
Regards,
Anomitro

*bold*BDC for FB12

Hi Abap Gurus,
Another question for the group... urgent so think it through
I need BDC for FB12 Transaction Code.
My Requirement is mentioned below like this :
1.Go to Tcode FB12 enter company code GFAP and select correspondence SAP09.
Note: The system asks for a single document number for printout request. As the client wants to generate print request for multiple documents at a time.
So in order to achieve the above requirement the above transaction code has to be modified with an option of selecting multiple documents and generating print requests.
Thanks,
Sundeep.

Ok fine Then Wht You want now?????

Error while running a BDC for the Transaction F-02

Hi,
 I'm getting an error "Parking not possible during Batch Input" while running a BDC for the transaction F-02.
 When i click on the error message it displays the message [b]"In Customizing, you can control whether an error message is issued."
 How to solve this issue?.
 Waiting for ur replies.........
Regards
N.Senthil

Hi,
When you are doing the recording in SHDB, and in the same screen where the TCODE to be recorded is given, there are options that you can choose called "Recording Parameters"...Select the checkbox which says "Not a Batch Input Session", this will set the sy-binpt variable to " "(in a recording by default it is "X")...and you will not get this error...
Also make sure while writing the BDC program to make use of the "bdc options" parameter which has this property to switch of sy-binpt...
 Refer below theard for sample bdc code for f-02.
https://forums.sdn.sap.com/click.jspa?searchID=5126766&messageID=1538409
Regards

Problem in creation of BDC for transaction phap_create

Hello Friends,
I am trying to create BDC for PHAP_CREATE.
When you run a transaction a pop up window appears to select the template id.
And in BDC it is selected by cursor position. So once selected, the value of template id cannot be changed.
I want this as a parameter.So that each time I run a BDC I will be able to create different types of Appraisal documents i.e with different template ids.
How to go about it???
Regards,
Bhushan

Hi,
For selecting the id, while doing recording,
record with
CTRL + F ( Where u can give ur id) and proceed further.

How to give line items in flatfile while doing BDC for Table control

Hi all,
I am writing BDC for Multiple line items and Transaction is : FSE5N.
How do i give the data in the flat file. I mean how do we give the multiple line items in flat file , i.e for second line item again we have to header data or not ?
ex:
1015;ALL;demo;kr;INR;01;0001;3000172;100
1015;ALL;demo;kr;INR;01;0001;3000172;200
for first lineitem : 3000172;100
for 2nd line item : 3000172; 200.
header data : 1015;ALL;demo;kr;INR;01;0001.
Thanks in advance
krupali

Hii ,
u can give in the same format as u have done in the example.
A B C D E F G H I
1015;ALL;demo;kr;INR;01;0001;3000172;100
1015;ALL;demo;kr;INR;01;0001;3000172;200
and while writing the loop u can give
loop at it_head.
loop at it_head where a = it_head-A and b = it_head-B ..........upto G = it_head-G.
endloop.
endloop.
check this
http://www.sap-img.com/abap/bdc-example-using-table-control-in-bdc.htm
Neeraj

BDC for FB50L...URGENT

Similar Messages

Maybe you are looking for