BDC- Inconsistancy in table control for t-code MR21

Hi all,
We are facing inconsistency in the table control (number of line items) for t-code MR21 in normal transaction screen and BDC screen.
In normal transaction run (MR21) we can see 12 line entries.
But for the same t-code while processing of a session created by BDC recording we can see only 9 entries.
Because of the mismatch in the lines, there will be a gap of 3 blank lines.
Kindly provide any input to solve the issue.
Thanks & Regards,
Prabhu

Hello,
You will have to use the OPTIONS addition of CALL TRANSACTION to set the default screen size
data: t_ctu type ctu_params.
t_ctu-defsize = 'X'.
t_ctu-dismode = 'N' . " Mode
t_ctu-upmode = 'S' " Update
call transaction 'MR21' using bdcdata options form t_ctu messages into t_messages.
Vikranth

Similar Messages

Problem in BDC table control for t.code ABAVN

Facing problem in uploading asset numbers.
Requirement: - Uploading data to transaction code ABAVN.
1.      After running the transaction click on multiple assets.
2.      Then we enter first four fields i.e. Document date, posting date, asset value date and text.
3.      After that we make entry in the list of assets field say around 200 asset numbers so that it generates only one document number.
Problem: - As I was working with BDC the problem I faced is in recording. After entering six asset numbers I have to press enter to activate the scroll bar, as I click scroll down it records full screen fields for every single scroll.
Thanks and regards,
Vishal Divekar.

Hi Vishal ,
please check <b>BAPI_ASSET_RETIREMENT_POST</b>and see the Documentation for more info.
Regards
Prabhu

How to select perticular row in table control for BDC

Hi all
I want to select perticular row in table control for deletion through BDC. My transaction is CA02, My input is material no and plant , then it display table control with work center. Now i want to select W999 cost center and delete through BDC.
Please Suggest me. it urgent.
Thanks& Regards,
RP

Hi all
I want to select perticular row in table control for deletion through BDC. My transaction is CA02, My input is material no and plant , then it display table control with work center. Now i want to select W999 cost center and delete through BDC.
Please Suggest me. it urgent.
Thanks& Regards,
RP

Error Handling in table control for line item.

Hi,
Please how to do error handling in table control for line item in bdc,i have used format_message for header but i don't no fill decamps internal tabled and how to do background processing in call transaction.
Thanks

Background processing is not possible using call transaction method.
You can create an executable program which can have CALL TRANSACTION BDC code. And this can be run in background.
What do you exactly mean by Error handling for Items in table control. Can you give some more details.

How to add column in table control for transaction APPCREATE

Hi All,
How can i add the additional column in table control for transaction APPCREATE.
There is structure PT1045_EXT present behind table control. But not found any customer exit or badi to display on screen.
Please help...

You can add new columns
If you add new columns in tr. PHAP_CATALOG

HR Abap - Reading table control for infotype 0416

Hi,
Infotype 416 'Create Time Quota Compensation' has a table control for 'Absence Quotas'.
I have to read this table control in user exit ZXPADU02.
Please assist in how to go about doing this.
Regards,
Warren.

Hi All,
I am using ZXPADU02.
The FM's suggested don't work because the user enters a compensation value at runtime and when user clicks 'save' I need to pick this value up. The FM's pick up existing absence records but I need the ones being created at runtime.

Problem in the BDC Table Control for the T.Code VA01

Hi,
I faced probelm in the BDC of the VA01. In the Table Control
the records are entered upto 12 line items. after 13th line item overwrites the first record. How to solve the Problem.
Please help me.

or use this
Internal table definition *
data : begin of bdcdata occurs 0.
        include structure bdcdata.
data : end of bdcdata.
data: begin of messtab occurs 0.
        include structure bdcmsgcoll.
data: end of messtab.
data: v_chr_opengrp type c,
      r_matnr like mara-matnr,                       "variable for material conversion
      r_werks like marc-werks,                       "variable for plant
      v_str_fname   type string.
data: begin of count2,
      inrec(9) type n,                               " input I_MATERIAL count
      create(9) type n,                              " create count
      error(9) type n,                               " error count
      bdc(9) type n,                                 " count of BDC creates
      end of count2.
types: begin of ty_source,
partn_numb(10) type n ,"Customer Number 1
ref(035),
sales_org(4) , "Sales Organization
distr_chan(2) , "Distribution Channel
division(002), "DIVISION
doc_type(4) , "Sales Document Type
purch_no(020), "Purchase order
material like vbap-matnr,
reqqty(018),
reqdate(010),
end of ty_source,
begin of ty_header ,
partn_numb(10) ,"Customer Number 1
ref(035),
sales_org(4) , "Sales Organization
distr_chan(2) , "Distribution Channel
division(002), "DIVISION
doc_type(4) , "Sales Document Type
purch_no(020), "Purchase order
end of ty_header,
begin of ty_item,
partn_numb(10) ,"Customer Number 1
ref(035),
material like vbap-matnr,
reqqty(018),
reqdate(010),
end of ty_item.
data : msg(240) type c, " Return Message
e_rec(8) type c, " Error Records Counter
rec_no(8) type c, " Records Number Indicator
s_rec(8) type c, " Successful Records Counter
t_rec(8) type c, " Total Records Counter
v_matnr like mara-matnr.
data: val(2) type n value 01.
data : begin of bdc_itab occurs 0.
        include structure bdcdata.
data : end of bdc_itab.
data : t_source type standard table of ty_source   with header line,
t_header type standard table of ty_header initial size 1,
t_item type standard table of ty_item initial size 1,
t_target type standard table of bdcdata initial size 1.
data : w_source type ty_source,
w_source1 type ty_source,
w_header type ty_header,
w_item type ty_item,
w_target type bdcdata,
count type i,
count1 type n.
Variable Declaration
data: w_fname type string,
fnam(20),
date1(10),
i(2) type n,
v_count type i,
v_group type apqi-groupid.
*& selection screen
selection-screen :begin of block bl1 with frame title text-001.
parameters : p_fname type rlgrap-filename,                         "Input file
             p_update(1) default 'N',                              "Input for update mode
             p_bdcgrp(12) default 'SD_ORDERS'.                     "Input for session name
selection-screen end of block bl1.
**&SELECTION SCREEN VALIDATIONS
at selection-screen on value-request for p_fname.
call function 'KD_GET_FILENAME_ON_F4'
    exporting
      program_name = 'ZMATERIAL'
      dynpro_number = '1000'
      field_name    = 'P_FNAME'
    changing
      file_name     = p_fname.
*& Start of selection
start-of-selection.
if p_fname is initial.
    message i016(rp) with 'Please enter a file name'.
    leave list-processing.
else.
    move p_fname to v_str_fname.
endif.
call function 'GUI_UPLOAD'
    exporting
      filetype                = 'ASC'
      filename                = v_str_fname
      has_field_separator     = 'X'
    tables
      data_tab                = t_source
    exceptions
      file_open_error         = 1
      file_read_error         = 2
      no_batch                = 3
      gui_refuse_filetransfer = 4
      invalid_type            = 5
      no_authority            = 6
      unknown_error           = 7
      bad_data_format         = 8
      header_not_allowed      = 9
      separator_not_allowed   = 10
      header_too_long         = 11
      unknown_dp_error        = 12
      access_denied           = 13
      dp_out_of_memory        = 14
      disk_full               = 15
      dp_timeout              = 16
      others                  = 17.
if sy-subrc <> 0.
    message id sy-msgid type sy-msgty number sy-msgno
        with sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
endif.
sort t_source by ref partn_numb.
loop at t_source into w_source.
    add 1 to count2-inrec.
    w_source1 = w_source.
   AT NEW PARTN_NUMB. "10/31 KVB
    at new ref.
      w_header-doc_type = w_source1-doc_type..
      w_header-sales_org = w_source1-sales_org .            "'0001'
      w_header-distr_chan = w_source1-distr_chan.           "'01'
      w_header-division = w_source1-division.               " '01'
      w_header-purch_no = w_source1-purch_no.
      w_header-partn_numb = w_source1-partn_numb.
      w_header-ref = w_source1-ref.
      append w_header to t_header.
    endat.
    w_item-partn_numb = w_source1-partn_numb.
    w_item-material = w_source1-material.
    w_item-reqqty = w_source1-reqqty.
    w_item-ref = w_source1-ref.
    w_item-reqdate = w_source1-reqdate.
    append w_item to t_item.
    clear :w_item,w_header.
endloop.
loop at t_header into w_header.
    perform bdc_dynpro      using         'SAPMV45A'                  '0101'       .
    perform bdc_field       using         'BDC_CURSOR'                'VBAK-SPART'.
    perform bdc_field       using         'BDC_OKCODE'                '/00'.
    perform bdc_field       using         'VBAK-AUART'                w_header-doc_type.
    perform bdc_field       using         'VBAK-VKORG'                w_header-sales_org.
    perform bdc_field       using         'VBAK-VTWEG'                w_header-distr_chan.
    perform bdc_field       using         'VBAK-SPART'                w_header-division.
    perform bdc_dynpro      using         'SAPMV45A'                  '4001'     .
    perform bdc_field       using         'BDC_OKCODE'                '/00'.
    perform bdc_field       using         'BDC_CURSOR'               'VBKD-BSTKD'.
    perform bdc_field       using         'VBKD-BSTKD'                w_header-purch_no.
    perform bdc_field       using         'KUWEV-KUNNR'               w_header-partn_numb.
    i = 1.
    loop at t_item into w_item where partn_numb = w_header-partn_numb
                                     and ref = w_header-ref.
      at new partn_numb.
        clear count1.
        count = 0.
      endat.
      count = count + 1.
      if count gt 5.
        clear i.
        i = 2.
        perform bdc_dynpro      using 'SAPMV45A' '4001'      .
        perform bdc_field       using 'BDC_OKCODE' '=POAN'.
      endif.
      count1 = count1 + 1.
      concatenate 'VBAP-POSNR(' i ')' into fnam.
      perform bdc_field       using fnam
                                    count1.
      concatenate 'RV45A-MABNR(' i ')' into fnam.
      perform bdc_field    using fnam                            w_item-material.
      concatenate 'RV45A-KWMENG(' i ')' into fnam.
      perform bdc_field       using fnam                        w_item-reqqty..
      concatenate 'RV45A-ETDAT(' i ')' into fnam.
      perform bdc_field       using fnam                         w_item-reqdate.
      concatenate 'VBKD-BSTKD_E(' i ')' into fnam.
      perform bdc_field       using fnam                         w_item-ref.
      i = i + 1.
      clear: w_item.
    endloop.
    clear w_header.
    perform bdc_dynpro      using 'SAPMV45A' '4001'.
    perform bdc_field       using 'BDC_OKCODE'
                                  '=SICH'.
    perform post_transaction.
    refresh bdc_itab.
    clear   bdc_itab.
endloop.
*endloop.
end-of-selection.
perform finalization.
       Start new screen                                              *
form bdc_dynpro using program dynpro.
clear bdc_itab.
bdc_itab-program = program.
bdc_itab-dynpro   = dynpro.
bdc_itab-dynbegin = 'X'.
append bdc_itab.
endform.                    "bdc_dynpro
       Insert field                                                  *
form bdc_field using fnam fval.
if fval <> ''.
    clear bdc_itab.
    bdc_itab-fnam = fnam.
    bdc_itab-fval = fval.
    append bdc_itab.
endif.
endform.                    "bdc_field
**&      Form get_filename
      text
--> p1        text
<-- p2        text
*form get_filename .
*call function 'WS_FILENAME_GET'
   exporting
     def_filename     = space
     def_path         = file
     mask             = ',.,..'
     mode             = 'N'
     title            = text-015
   importing
     filename         = file
   exceptions
     inv_winsys       = 1
     no_batch         = 2
     selection_cancel = 3
     selection_error = 4
     others           = 5.
*endform.                    " get_filename
*&      Form post_transaction
      text
--> p1        text
<-- p2        text
form post_transaction .
refresh messtab.
clear   messtab.
call transaction 'VA01' using bdc_itab
              mode   p_update
            update 'S'
          messages into messtab.
read table messtab with key msgtyp = 'E'.
if sy-subrc eq 0.
    perform process_error_messages.
    add 1 to count2-bdc.
    if v_chr_opengrp is initial.
      perform bdc_open_group.
    endif.
    call function 'BDC_INSERT'
      exporting
        tcode          = 'VA01'
      tables
        dynprotab      = bdc_itab
      exceptions
        internal_error = 1
        not_open       = 2
        queue_error    = 3
        tcode_invalid = 4
        others         = 5.
    if sy-subrc <> 0.
      case sy-subrc.
        when 1.
          write: / 'Internal error'.
        when 2.
          write: / 'Not open error'.
        when 3.
          write: / 'queue error'.
        when 4.
          write: / 'tcode invalid error'.
        when others.
          write: / 'other error'.
      endcase.
    endif.
else.
    add +1 to count2-create.
    format intensified off.
    format color col_normal.
    format color col_normal off.
endif.
clear   bdc_itab.
refresh bdc_itab.
endform.                    " post_transaction
*&      Form finalization
      text
--> p1        text
<-- p2        text
form finalization .
if v_chr_opengrp = 'X'.
    call function 'BDC_CLOSE_GROUP'
      exceptions
        not_open    = 1
        queue_error = 2
        others      = 3.
endif.
get time.
skip 2.
write: / 'Time', sy-uzeit.
skip.
format color col_total on.
write: / 'Total Records: ',           40 count2-inrec.
write: / 'PERNR not of Emp Group 6 ', 40 count2-error.
write: / 'Records Created: ',         40 count2-create.
write: / 'BDC Create in group: ',     40 count2-bdc.
if v_chr_opengrp = 'X'.
    skip 1.
    format intensified on.
    format color col_negative on.
    write: / 'PLEASE USE TRANSACTION "SM35" ',
             'TO PROCESS THE GENERATED BDC SESSION ... ',
             p_bdcgrp.
endif.
endform.                    " finalization
*&      Form bdc_open_group
      text
--> p1        text
<-- p2        text
form bdc_open_group .
call function 'BDC_OPEN_GROUP'
    exporting
      client              = sy-mandt
      group               = p_bdcgrp
      holddate            = sy-datum
      keep                = 'X'
      user                = sy-uname
    exceptions
      client_invalid      = 1
      destination_invalid = 2
      group_invalid       = 3
      group_is_locked     = 4
      holddate_invalid    = 5
      internal_error      = 6
      queue_error         = 7
      running             = 8
      system_lock_error   = 9
      user_invalid        = 10
      others              = 11.
if sy-subrc eq 0.
    v_chr_opengrp = 'X'.
endif.
endform.                    " bdc_open_group
*&      Form process_error_messages
      text
--> p1        text
<-- p2        text
form process_error_messages .
data: begin of loc_aux_message.
          include structure message.
data: end of loc_aux_message.
data : msgno type sy-msgno.
loop at messtab.
    move messtab-msgnr to msgno.
    call function 'WRITE_MESSAGE'
      exporting
        msgid = messtab-msgid
        msgno = msgno
        msgty = messtab-msgtyp
        msgv1 = messtab-msgv1
        msgv2 = messtab-msgv2
        msgv3 = messtab-msgv3
        msgv4 = messtab-msgv4
      importing
        messg = loc_aux_message
      exceptions
        others = 1.
    if sy-subrc eq 0.
      format color col_negative on.
      write: /10 loc_aux_message.
      format color col_negative off.
    else.
      format color col_negative on.
      write: /10 t_source-partn_numb.
      write: / 'Error creating message'.
      format color col_negative off.
      exit.
    endif.
endloop.
endform.                    " process_error_messages

Problem in bdc for table control for line items

Hi experts,
I am runnig a bdc for ME52.
i am just entering PR number, in the second screen i have got all the line items. I need to select these line item 10 and double click or hit enter, it takes me to screen 3, there im just checking a checkbox and saving.
Again i need to select the line item 20 and double click or hit enter. again the same process.
Again repeat for all the line items.
But my problem is it is updating everytime for only line item 10. for line item 20 and others it say "no chnge in the data".
I am pasting my code here. please check and revert me back .plz.
DATA: w_output LIKE LINE OF i_output.
REFRESH I_ITAB[].
SELECT * FROM EBAN
           INTO TABLE i_itab
           WHERE banfn in s_banfn AND
                 bsart in s_bsart AND
                 bstyp in s_bstyp AND
                 matnr in s_matnr AND
                 werks in s_werks AND
                 lfdat in s_lfdat AND
                 pstyp in s_pstyp AND
                 knttp in s_knttp AND
                 estkz in s_estkz AND
                 loekz eq ' '.
IF sy-subrc = 0.
    CLEAR: w_itab,
             i_poitab[].
    SORT i_itab by banfn.
    LOOP AT i_itab INTO w_itab where menge GT eban-bsmng.
      IF p_close = 'X' AND p_rep = 'X'.
        IF w_itab-ebakz = 'X'.
          w_itab-ebakz = ' '.
          APPEND w_itab to i_poitab.
        ENDIF.
      ELSEIF p_open = 'X' AND p_rep = 'X'.
        IF w_itab-ebakz = ' '.
          w_itab-ebakz = 'X'.
          APPEND w_itab to i_poitab.
        ENDIF.
      ELSEIF p_close = 'X' AND p_repw = 'X'.
        IF w_itab-ebakz = ' '.
          APPEND w_itab to i_poitab.
        ENDIF.
      ELSEIF p_open = 'X' AND p_repw = 'X'.
        IF w_itab-ebakz = 'X'.
          APPEND w_itab to i_poitab.
        ENDIF.
      ENDIF.
    ENDLOOP.
ENDIF.
LOOP AT i_poitab into w_output.
    APPEND w_output to i_output.
   PERFORM CALL_BDC.
endloop.
IF p_rep = 'X'.
PERFORM CALL_BDC.
ENDIF.
ENDFORM.                    " GET_DATA
*&      Form CALL_BDC
      text
--> p1        text
<-- p2        text
FORM CALL_BDC.
DATA: seltab(5) TYPE N,
      seltab1(2) TYPE N,
      tempvar(30) TYPE N,
      cnt TYPE N.
LOOP AT i_output.
clear: seltab,
       seltab1.
seltab = i_output-bnfpo.
seltab1 = seltab+2(2).
perform bdc_dynpro      using 'SAPMM06B' '0105'.
perform bdc_field       using 'BDC_CURSOR'
                              'EBAN-BANFN'.
perform bdc_field       using 'BDC_OKCODE'
                              '/00'.
perform bdc_field       using 'EBAN-BANFN'
                              i_output-banfn.
perform bdc_dynpro      using 'SAPMM06B' '0106'.
clear tempvar.
*cnt = 1.
concatenate 'EBAN-BNFPO(' seltab1 ')' into tempvar.
perform bdc_field       using 'BDC_CURSOR'
                             'EBAN-BNFPO(seltab1)'.
                                tempvar.
perform bdc_field       using 'BDC_OKCODE'
                              '=DETA'.
perform bdc_field       using 'RM06B-BNFPO'
                              i_output-bnfpo.
perform bdc_field       using 'RM06B-TCSELFLAG(seltab1)'
                             'X'.
perform bdc_dynpro      using 'SAPMM06B' '0102'.
perform bdc_field       using 'BDC_CURSOR'
                              'EBAN-EBAKZ'.
perform bdc_field       using 'BDC_OKCODE'
                              '=BU'.
perform bdc_field       using 'EBAN-EBAKZ'
                              i_output-ebakz.
CALL TRANSACTION 'ME52' USING bdc_data MODE 'A'
                               MESSAGES INTO i_bdcmsg.
    COMMIT WORK AND WAIT.
ENDLOOP.
ENDFORM.                    " CALL_BDC
*&      Form bdc_dynpro
      text
     -->P_0686   text
     -->P_0687   text
FORM bdc_dynpro USING    program dynpro.
CLEAR bdc_data.
bdc_data-program = program.
bdc_data-dynpro   = dynpro.
bdc_data-dynbegin = 'X'.
APPEND bdc_data.
CLEAR bdc_data.
ENDFORM.
thanks,
N

Looks like table control logic is wrong -- do compare with below program...
only table contril area
REPORT ZPadmam
NO STANDARD PAGE HEADING LINE-SIZE 255.
DATA : BEGIN OF itab OCCURS 0,
i1 TYPE i,
lifnr LIKE rf02k-lifnr,
bukrs LIKE rf02k-bukrs,
ekorg LIKE rf02k-ekorg,
ktokk LIKE rf02k-ktokk,
anred LIKE lfa1-anred,
name1 LIKE lfa1-name1,
sortl LIKE lfa1-sortl,
land1 LIKE lfa1-land1,
akont LIKE lfb1-akont,
fdgrv LIKE lfb1-fdgrv,
waers LIKE lfm1-waers,
END OF itab.
DATA : BEGIN OF jtab OCCURS 0,
j1 TYPE i,
banks LIKE lfbk-banks,
bankl LIKE lfbk-bankl,
bankn LIKE lfbk-bankn,
END OF jtab.
DATA : cnt(4) TYPE n.
DATA : fdt(20) TYPE c.
DATA : c TYPE i.
INCLUDE bdcrecx1.
START-OF-SELECTION.
CALL FUNCTION 'WS_UPLOAD'
EXPORTING
filename = 'C:\first1.txt'
filetype = 'DAT'
TABLES
data_tab = itab.
CALL FUNCTION 'WS_UPLOAD'
EXPORTING
filename = 'C:\second.txt'
filetype = 'DAT'
TABLES
data_tab = jtab.
LOOP AT itab.
PERFORM bdc_dynpro USING 'SAPMF02K' '0100'.
PERFORM bdc_field USING 'BDC_CURSOR'
'RF02K-KTOKK'.
PERFORM bdc_field USING 'BDC_OKCODE'
'/00'.
PERFORM bdc_field USING 'RF02K-LIFNR'
itab-lifnr.
PERFORM bdc_field USING 'RF02K-BUKRS'
itab-bukrs.
PERFORM bdc_field USING 'RF02K-EKORG'
itab-ekorg.
PERFORM bdc_field USING 'RF02K-KTOKK'
itab-ktokk.
PERFORM bdc_dynpro USING 'SAPMF02K' '0110'.
PERFORM bdc_field USING 'BDC_CURSOR'
'LFA1-LAND1'.
PERFORM bdc_field USING 'BDC_OKCODE'
'/00'.
PERFORM bdc_field USING 'LFA1-ANRED'
itab-anred.
PERFORM bdc_field USING 'LFA1-NAME1'
itab-name1.
PERFORM bdc_field USING 'LFA1-SORTL'
itab-sortl.
PERFORM bdc_field USING 'LFA1-LAND1'
itab-land1.
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-BANKN(01)'.
PERFORM bdc_field USING 'BDC_OKCODE'
'=ENTR'.
cnt = 0.
LOOP AT jtab WHERE j1 = itab-i1.
cnt = cnt + 1.
CONCATENATE 'LFBK-BANKS(' cnt ')' INTO fdt.
PERFORM bdc_field USING fdt jtab-banks.
CONCATENATE 'LFBK-BANKL(' cnt ')' INTO fdt.
PERFORM bdc_field USING fdt jtab-bankl.
CONCATENATE 'LFBK-BANKN(' cnt ')' INTO fdt.
PERFORM bdc_field USING fdt jtab-bankn.
IF cnt = 5.
cnt = 0.
PERFORM bdc_dynpro USING 'SAPMF02K' '0130'.
PERFORM bdc_field USING 'BDC_CURSOR'
'LFBK-BANKS(01)'.
PERFORM bdc_field USING 'BDC_OKCODE'
'=P+'.
PERFORM bdc_dynpro USING 'SAPMF02K' '0130'.
PERFORM bdc_field USING 'BDC_CURSOR'
'LFBK-BANKN(02)'.
PERFORM bdc_field USING 'BDC_OKCODE'
'=ENTR'.
ENDIF.
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'
itab-akont.
PERFORM bdc_field USING 'LFB1-FDGRV'
itab-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'
itab-waers.
PERFORM bdc_dynpro USING 'SAPMF02K' '0320'.
PERFORM bdc_field USING 'BDC_CURSOR'
'RF02K-LIFNR'.
PERFORM bdc_field USING 'BDC_OKCODE'
'=ENTR'.
PERFORM bdc_dynpro USING 'SAPLSPO1' '0300'.
PERFORM bdc_field USING 'BDC_OKCODE'
'=YES'.
PERFORM bdc_transaction USING 'XK01'.
ENDLOOP.
PERFORM close_group.
Thanks
Seshu

How to add rows in table control for data recording BDC?

hello,
pl tell me the way to upload data through BDC in table control of screen .
how to add fields inrecording of table control?
Please give some code in this regard.
I am generous in giving points..pl help!

Hi,
While doing code under recording first you need to do the recording with sample data under a particular transaction like T-code XK01 (Vendor creation).
Take an example of create vendor using T-code XK01:
Go to t-code 'SHDB' under make recording for XK01 with sample data and once if you complete the recording means after vendor creation check the source code bye by pressing the button 'Program', it shows the total coding for recording of what you entered the test data.
Then you will create one program and copy that source code of recording into your program, and now you have to remove the values at perform statement and give the internal table field name.
Like that you can develop your own code along with your validations.
my best suggestion is dont see the example code of recording method because any one for standard t-code should get the code from recording with sample data, so first tryout with your own recording method and you can understand the code step by step.
With these I hope you will get some idea of recoding method.
Let me know for further doubts.
Regards,
Vijay.

More than 1 line items in bdc using table controls for BOM

Hi....
how do u update more than one line item for BOM using BDC table control.......
is there any specific command for doing that.......
hav tried d following code bt it takes the flatfile i/p FOR 2 LINE ITEMS as 2 different BOM'S.....
would appreciate ur help....plz provide code.............
REPORT zbdc4_cs01
       NO STANDARD PAGE HEADING LINE-SIZE 255.
INCLUDE bdcrecx1.
DATA : a TYPE i,
       b type i,
       c type i.
DATA : BEGIN OF it_rec OCCURS 0,
       rec(200) TYPE c,
       END OF it_rec.
DATA : BEGIN OF ctab OCCURS 0,
       matnr(18),
       werks(4),
       stlan(1),
       END OF ctab.
DATA : BEGIN OF xtab OCCURS 0,
       idnrk(18),
       menge(13),
       postp(1),
       END OF xtab.
DATA : BEGIN OF itab OCCURS 0,
       matnr(18),
       werks(4),
       stlan(1),
       idnrk(18),
       menge(13),
       postp(1),
       END OF itab.
START-OF-SELECTION.
CALL FUNCTION 'GUI_UPLOAD'
    EXPORTING
      filename            = 'C:/TEST4.TXT'
      filetype            = 'ASC'
      has_field_separator = 'X'
    TABLES
      data_tab            = it_rec.
LOOP AT it_rec.
    a = strlen( it_rec-rec ).
    if a = 55.
    itab-matnr = it_rec-rec+0(18).
    itab-werks = it_rec-rec+18(4).
    itab-stlan = it_rec-rec+22(1).
    itab-idnrk = it_rec-rec+23(18).
    itab-menge = it_rec-rec+41(13).
    itab-postp = it_rec-rec+54(1).
    APPEND itab.
    elseif a > 55.
    itab-matnr = it_rec-rec+0(18).
    itab-werks = it_rec-rec+18(4).
    itab-stlan = it_rec-rec+22(1).
    itab-idnrk = it_rec-rec+23(18).
    itab-menge = it_rec-rec+41(13).
    itab-postp = it_rec-rec+54(1).
    APPEND itab.
    itab-idnrk = it_rec-rec+55(18).
    itab-menge = it_rec-rec+73(13).
    itab-postp = it_rec-rec+86(1).
    APPEND itab.
    endif.
ENDLOOP.
PERFORM open_group.
LOOP AT itab.
    PERFORM bdc_dynpro      USING 'SAPLCSDI' '0100'.
    PERFORM bdc_field       USING 'BDC_CURSOR'
                                  'RC29N-STLAN'.
    PERFORM bdc_field       USING 'BDC_OKCODE'
                                  '/00'.
    PERFORM bdc_field       USING 'RC29N-MATNR'
                                   itab-matnr.           "'3000000107'.
    PERFORM bdc_field       USING 'RC29N-WERKS'
                                   itab-werks.              "'UN02'.
    PERFORM bdc_field       USING 'RC29N-STLAN'
                                   itab-stlan.              "'1'.
    PERFORM bdc_field       USING 'RC29N-STLAL'
    PERFORM bdc_field       USING 'RC29N-DATUV'
                                  '11.08.2008'.
    PERFORM bdc_dynpro      USING 'SAPLCSDI' '0110'.
    PERFORM bdc_field       USING 'BDC_OKCODE'
                                  '/00'.
    PERFORM bdc_field       USING 'RC29K-BMENG'
                                  '1'.
    PERFORM bdc_field       USING 'RC29K-STLST'
                                  '1'.
    PERFORM bdc_field       USING 'BDC_CURSOR'
                                  'RC29K-EXSTL'.
    PERFORM bdc_dynpro      USING 'SAPLCSDI' '0111'.
    PERFORM bdc_field       USING 'BDC_CURSOR'
                                  'RC29K-LABOR'.
    PERFORM bdc_field       USING 'BDC_OKCODE'
                                  '/00'.
    PERFORM bdc_dynpro      USING 'SAPLCSDI' '0140'.
    PERFORM bdc_field       USING 'BDC_CURSOR'
                                  'RC29P-POSTP(01)'.
    PERFORM bdc_field       USING 'BDC_OKCODE'
                                  '/00'.
    PERFORM bdc_field       USING 'RC29P-IDNRK(01)'
                                   itab-idnrk.             "'1000000232'.
    PERFORM bdc_field       USING 'RC29P-MENGE(01)'
                                   itab-menge.              "'100'.
    PERFORM bdc_field       USING 'RC29P-POSTP(01)'
                                   itab-postp.             "'L'.
    PERFORM bdc_dynpro      USING 'SAPLCSDI' '0130'.
    PERFORM bdc_field       USING 'BDC_OKCODE'
                                  '/00'.
    PERFORM bdc_field       USING 'BDC_CURSOR'
                                  'RC29P-POSNR'.
    PERFORM bdc_field       USING 'RC29P-POSNR'
                                  '0010'.
    PERFORM bdc_field       USING 'RC29P-IDNRK'
                                  '1000000232'.
    PERFORM bdc_field       USING 'RC29P-MENGE'
                                  '100'.
    PERFORM bdc_field       USING 'RC29P-MEINS'
                                  'KG'.
    PERFORM bdc_dynpro      USING 'SAPLCSDI' '0131'.
    PERFORM bdc_field       USING 'BDC_OKCODE'
                                  '/00'.
    PERFORM bdc_field       USING 'BDC_CURSOR'
                                  'RC29P-POTX1'.
    PERFORM bdc_field       USING 'RC29P-SANKA'
                                  'X'.
    PERFORM bdc_dynpro      USING 'SAPLCSDI' '0140'.
    PERFORM bdc_field       USING 'BDC_CURSOR'
                                  'RC29P-POSNR(01)'.
    PERFORM bdc_field       USING 'BDC_OKCODE'
                                  '/00'.
    PERFORM bdc_dynpro      USING 'SAPLCSDI' '0140'.
    PERFORM bdc_field       USING 'BDC_CURSOR'
                                  'RC29P-POSNR(01)'.
    PERFORM bdc_field       USING 'BDC_OKCODE'
                                  '=FCBU'.
    PERFORM bdc_transaction USING 'CS01'.
ENDLOOP.
PERFORM close_group.

Hi
Check this sample code for the Table Control in BDC:
data: fnam(20) type c.
move 1 to id.
    loop at TI_STAGING WHERE VENDOR = IT_STAGING-VENDOR AND DOCDATE = IT_STAGING-DOCDATE.
      concatenate 'RM06E-EPSTP(0' id ')' into fnam.
      perform bdc_field       using fnam TI_STAGING-itmcategory.
      concatenate 'EKPO-KNTTP(0' id ')' into fnam.
      perform bdc_field       using fnam TI_STAGING-accassignment.
      concatenate 'EKPO-EMATN(0' id ')' into fnam.
      perform bdc_field       using fnam TI_STAGING-material.
      concatenate 'EKPO-TXZ01(0' id ')' into fnam.
      perform bdc_field       using fnam TI_STAGING-shortxt.
      quan = ti_staging-poqty.
      concatenate 'EKPO-MENGE(0' id ')' into fnam.
      perform bdc_field       using fnam quan.
      concatenate 'RM06E-EEIND(0' id ')' into fnam.
      perform bdc_field       using fnam TI_STAGING-deliverydate.
      netpr = ti_staging-netpr.
      concatenate 'EKPO-NETPR(0' id ')' into fnam.
      perform bdc_field       using fnam netpr.
      concatenate 'EKPO-MATKL(0' id ')' into fnam.
      perform bdc_field       using fnam TI_STAGING-mategroup.
      concatenate 'EKPO-WERKS(0' id ')' into fnam.
      perform bdc_field       using fnam TI_STAGING-plant.
      ID = ID + 1.
    ENDLOOP.
Regards,
Vishwa.

Disable Vertical scroll but enable Page down in Table control for BDC

Hello All
In my 4.6C sysem , i had enabled Scroll bar in table control by populating TABC-lines = <No of records>...Then when i try to capture the BDC recording of this , then the scrolling event is not captured in BDC , as we all know.....
So i put few buttons on the application bar as NEXT PAGE, NEXT LINE , PREV PAGE n PREV LINE...and i did the scrolling by writing the code manually in PAI...and that is getting captured in BDC so my problem is partially solved...
Now as u see..i have default working Scroll bar on my T.C..also i have my buttons on the application bar....i want to get rid of the vertical scrolling....so now i am NOT populating the TABC-lines field...But as soon as i do this , my buttons stopped also working...Any idea how to get rid of this ?
In short when i don't write : TABC-lines = no_of_records .....to remove vertical scroling.......my manual scrolling mechanism also getting disabled..
Is it possible to remove only vertical scrolling ?
Thanks in advance .
Nilesh

No reply from any one ???

Issue with number of lines in Table control for an web transaction in ITS

Hi,
We have acustom web transaction ZC03 where we have used table controls. Recently a kernal patch has been installed and after that the number of lines appearing in table control has got changed. Earlier table control was coming with 5 lines and presently its coming with 3 lines. Can you please help me to fix the issue.
The code used in HTML template for table controi is given below:
`SAP_DynproLayerBegin(005,013,067,006)`
`SAP_TableControl("TC_TIME1")`
`SAP_DynproLayerEnd()`
I have tried other alternatives like `SAP_DynproTableControl("TC_TIME1")`, `D_TableControl("TC_TIME1') but did n't get any fruitful result also.
Thanks and Regards,
Ranadev

What where the precise Kernel updates? What where you on and what did you upgrade too?
Did you apply any BASIS Support Pack corrections during the Kernel upgrade?
If you applied a new BASIS support pack - check the following WIKI:
[How to check the publishing Date of an Internet Service|http://wiki.sdn.sap.com/wiki/x/OYG8BQ ]
if you need to republish - use the following WIKI:
[How to activate, publish and test ITS services in the integrated ITS?|http://wiki.sdn.sap.com/wiki/x/kmE ]
Regards,
Oisin

How can we select multiple rows in table control for module pool program?

hi guru's
i cannt able to select multiple table control rows for deletion of records please give any code to select rows?
regrards,
satheesh.

On the Table Control attributes there is a "Selectability" option where you choose one of: None, Single, or Multiple. In your code you then need to pick up which rows have the selection column set to 'X'.

Table Controls For Infotype

Hi All
I am a beginer in HR ABAP.
I have to create one infotype with the table control.
can any one help me to know how to code for this.
Thanks in advance
Chandrashekhar

cheeck this link.
http://www.sapdevelopment.co.uk/hr/hr_infotypes2.htm
Regards
Prabhu

How to find dynamic value(screen value) in table control for current row .

hi to all,
i used table control in my screen. for column no 2 field i was used serrch help. and for column number 3 i used a dynamic help.
in change mode you can change any row for table control.
when i was using search help for a row which was already entered in column no 3 i cannot get any value.
how i can get value of row no 3 and column no 2 value.
thanks

Try using like index for the serarch the TC-current_line

BDC- Inconsistancy in table control for t-code MR21

Similar Messages

Maybe you are looking for