Call transaction ME23N

Hi There!
I'm doing a call transaction of ME23n and it's working fine, the problem is, and after googling it lots, I couldn't fine the answer, that the Help panel appears always and the user does not want that!.
It there any thick that I'm missing to call the transaction without displaying the Help?
Thanks in advance.

Thanks Chen! This is what I was after.
For better details on the problem My first screen looks like this.
PERFORM bdc_dynpro TABLES lt_bdcdata USING 'SAPLMEGUI' '0014'.
PERFORM bdc_field TABLES lt_bdcdata USING 'BDC_OKCODE' '=MECHOB'.
PERFORM bdc_field TABLES lt_bdcdata USING 'BDC_OKCODE' '=MEHELP'.
Thanks again!

Similar Messages

CALL TRANSACTION 'ME23N' AND SKIP FIRST SCREEN.

Hi,
i'm using this in an report.
SET PARAMETER ID 'BES' FIELD WA_ITAB-EBELN.
SET PARAMETER ID 'BSP' FIELD WA_ITAB-EBELP.
CALL TRANSACTION 'ME23N' AND SKIP FIRST SCREEN.
It works OK.
Is there any parameter ID to go in a sprecial part of an PO, for example
direct to materialdata or konditions?.
thanks.
Regards, Dieter

Hi,
I think u can do that by using BDC as used in this code please refer to this code.
FORM get_user_command USING cr_ucomm     LIKE sy-ucomm      "#EC *
                            cr_selfield TYPE slis_selfield.
CLEAR wa_final.
DATA BEGIN OF bdcdata OCCURS 10.
          INCLUDE STRUCTURE bdcdata.
DATA END OF bdcdata.
CASE cr_ucomm.
    WHEN '&IC1'.
      READ TABLE it_final INTO wa_final
               INDEX cr_selfield-tabindex.
      IF cr_selfield-fieldname = 'MATNR'.
        IF sy-subrc IS INITIAL.
          SET PARAMETER ID 'MXX' FIELD 'E'.
          SET PARAMETER ID 'MAT' FIELD wa_final-matnr.
          SET PARAMETER ID 'WRK' FIELD wa_final-werks.
          CALL TRANSACTION 'MM03' AND SKIP FIRST SCREEN.
        ENDIF.
      ELSEIF cr_selfield-fieldname = 'LIFNR'.
        IF sy-subrc IS INITIAL.
          CLEAR bdcdata.
          bdcdata-program = 'SAPMF02K'.
          bdcdata-dynpro   = '0101'.
          bdcdata-dynbegin = 'X'.
          APPEND bdcdata.
          CLEAR bdcdata.
          bdcdata-fnam     = 'RF02K-LIFNR'.
          bdcdata-fval     = wa_final-lifnr.
          APPEND bdcdata.
          CLEAR bdcdata.
          bdcdata-fnam     = 'RF02K-EKORG '.
          bdcdata-fval     = wa_final-ekorg.
          APPEND bdcdata.
          CLEAR bdcdata.
          bdcdata-fnam     = 'RF02K-D0310'.
          bdcdata-fval     = 'X'.
          APPEND bdcdata.
          CLEAR bdcdata.
          bdcdata-fnam     = 'WRF02K-D0320'.
          bdcdata-fval     = 'X'.
          APPEND bdcdata.
          CLEAR bdcdata.
          bdcdata-fnam     = 'BDC_OKCODE'.
          bdcdata-fval     = '/00'.
          APPEND bdcdata.
          CLEAR bdcdata.
          bdcdata-program = 'SAPMF02K'.
          bdcdata-dynpro   = '0110'.
          bdcdata-dynbegin = 'X'.
          APPEND bdcdata.
          CALL TRANSACTION 'XK03' USING bdcdata MODE 'E'.
        ENDIF.
      ENDIF.
ENDCASE.
ENDFORM. " get_user_command
regards,
sudha

Call transaction ME33K

Dear Abapers,
I have a problem when calling transaction ME33K from a custom program I develop. I know that we can pass agreement number using SAP memory with parameter ID = 'VRT'.
This is the code to call transaction
      SET PARAMETER ID 'VRT' FIELD agreement_num.
      CALL TRANSACTION 'ME33K' AND SKIP FIRST SCREEN.
agreement_num is filled with agreeement number.
Before that I did same things to call ME23N and it works well.
Definitely I use same formula:
      SET PARAMETER ID 'BES' FIELD po_num.
      CALL TRANSACTION 'ME23N' AND SKIP FIRST SCREEN.
po_num is filled with PO number.
Could anybody help explain to me why this thing happened. Are there other any possible solution to call ME33K?
Thanks
Regards
Hadi

Hi Kranthi,
Thank you for your answer.I was having the same problem but now It is ok.
Thank you I appreciate yout help too.
Regrards
William

ALV Grid Calling Transaction Code

Hello Everybody
Can anyone help me about my problem in using ALV Grid calling a transaction code...?Here is the sample code below..
 IF rs_selfield-fieldname = 'BELNR'.
 SET PARAMETER ID 'BLN' FIELD rs_selfield-value.
 CALL TRANSACTION 'FB03' AND SKIP FIRST SCREEN.
 ENDIF.
the main problem is how can I set my parameter id for company since
my rs_field-value is for the column BELNR ( document # field only)
it returns error when i set this code since i have no value to pass for rs_selfield for company code
 SET PARAMETER ID 'BUK' FIELD
Help
thanks in advance
aVaDuDz

Hi,
*"Table declarations...................................................
TABLES:
rbkp, " Document Header Invoice receipt
rseg, " Document Item: Incoming Invoice
eban, " Purchase Requisition
t001w. " Plants/Branches
*"Selection screen elements............................................
PARAMETERS:
p_gjahr LIKE rbkp-gjahr. " Fiscal Year
SELECT-OPTIONS:
s_belnr FOR rbkp-belnr, " Document number of an invoice
s_bldat FOR rbkp-bldat, " Document Date in Document
s_budat FOR rbkp-budat, " Posting Date in the Document
s_werks FOR rseg-werks. " Plant
*" Data declarations...................................................
Work variables *
DATA:
w_flag1 TYPE c VALUE '0', " Flag variable 1
w_flag2 TYPE c VALUE '0', " Flag variable 2
w_index1 TYPE sy-tabix. " Index variable
Field String to hold Document Header Invoice receipt *
DATA:
BEGIN OF fs_rbkp,
 belnr TYPE rbkp-belnr, " Document number of an invoice
 gjahr TYPE rbkp-gjahr, " Fiscal Year
 bldat TYPE rbkp-bldat, " Posting Date in the Document
 budat TYPE rbkp-budat, " Posting Date in the Document
 lifnr TYPE rbkp-lifnr, " Different invoicing party
END OF fs_rbkp,
Internal table to hold Document Header Invoice receipt *
t_rbkp LIKE STANDARD TABLE OF fs_rbkp.
Field String to hold Document Item: Incoming Invoice *
DATA:
BEGIN OF fs_rseg,
 belnr TYPE rseg-belnr, " Document number of an invoice
 ebeln TYPE rseg-ebeln, " Purchasing Document Number
 wrbtr TYPE rseg-wrbtr, " Amount in document currency
END OF fs_rseg,
Internal table to hold Document Item: Incoming Invoice *
t_rseg LIKE STANDARD TABLE OF fs_rseg.
Field String to hold Purchase Requisition *
DATA:
BEGIN OF fs_eban,
 banfn TYPE eban-banfn, " Purchase requisition number
 ernam TYPE eban-ernam, " Person who Created the Object
 afnam TYPE eban-afnam, " Name of requisitioner/requester
 badat TYPE eban-badat, " Requisition (request) date
 ebeln TYPE eban-ebeln, " Purchase order number
END OF fs_eban,
Internal table to hold Purchase Requisition *
t_eban LIKE STANDARD TABLE OF fs_eban.
Field String to hold Desired Data *
DATA:
BEGIN OF fs_final,
 ebeln TYPE rseg-ebeln, " Purchasing Document Number
 banfn TYPE eban-banfn, " Purchase requisition number
 badat TYPE eban-badat, " Requisition (request) date
 bldat TYPE rbkp-bldat, " Posting Date in the Document
 lifnr TYPE rbkp-lifnr, " Different invoicing party
 wrbtr TYPE rseg-wrbtr, " Amount in document currency
 afnam TYPE eban-afnam, " Name of requisitioner/requester
 ernam TYPE eban-ernam, " Name of Person who Created the
 " Object
END OF fs_final,
Internal table to hold Desired Data *
t_final LIKE STANDARD TABLE OF fs_final.
 INITIALIZATION *
INITIALIZATION.
p_gjahr = sy-datum+0(4).
 AT SELECTION-SCREEN EVENT *
AT SELECTION-SCREEN.
IF s_belnr IS INITIAL OR s_bldat IS INITIAL OR s_budat IS INITIAL.
 MESSAGE ' (Invoice) Add Creation Date .' TYPE 'E'.
ENDIF. " IF S_BELNR...
 AT SELECTION-SCREEN ON FIELD EVENT *
AT SELECTION-SCREEN ON s_werks.
SELECT SINGLE werks " Plant
 FROM t001w
 INTO t001w
 WHERE werks IN s_werks.
IF sy-subrc NE 0.
 MESSAGE 'Invalid plant' TYPE 'E'.
ENDIF. " IF SY-SUBRC NE 0.
 START-OF-SELECTION EVENT *
START-OF-SELECTION.
PERFORM get_purchaserequistion.
LOOP AT t_rseg INTO fs_rseg.
 READ TABLE t_rbkp INTO fs_rbkp WITH KEY belnr = fs_rseg-belnr
 BINARY SEARCH.
 IF sy-subrc EQ 0.
 READ TABLE t_eban INTO fs_eban WITH KEY ebeln = fs_rseg-ebeln
 BINARY SEARCH.
 IF sy-subrc EQ 0.
 IF fs_rbkp-bldat LE fs_eban-badat.
 DELETE t_rseg INDEX sy-tabix.
 ENDIF. " IF FS_RBKP-BLDAT...
 ENDIF. " IF SY-SUBRC EQ 0
 ENDIF. " IF SY-SUBRC EQ 0
ENDLOOP. " LOOP AT T_RSEG...
LOOP AT t_rbkp INTO fs_rbkp.
 WHILE w_flag1 EQ '0'.
 READ TABLE t_rseg INTO fs_rseg WITH KEY belnr = fs_rbkp-belnr
 BINARY SEARCH.
 w_index1 = sy-tabix.
 IF sy-subrc EQ 0.
 WHILE w_flag2 EQ '0'.
 READ TABLE t_eban INTO fs_eban WITH KEY ebeln = fs_rseg-ebeln
 BINARY SEARCH.
 IF sy-subrc EQ 0.
 fs_final-bldat = fs_rbkp-bldat.
 fs_final-lifnr = fs_rbkp-lifnr.
 fs_final-ebeln = fs_rseg-ebeln.
 fs_final-wrbtr = fs_rseg-wrbtr.
 fs_final-banfn = fs_eban-banfn.
 fs_final-badat = fs_eban-badat.
 fs_final-afnam = fs_eban-afnam.
 fs_final-ernam = fs_eban-ernam.
 APPEND fs_final TO t_final.
 CLEAR fs_final.
 DELETE t_eban INDEX sy-tabix .
 ELSE.
 w_flag2 = '1'.
 DELETE t_rseg INDEX w_index1.
 ENDIF. " IF SY-SUBRC EQ 0
 ENDWHILE. " WHILE W_FLAG2...
 w_flag2 = '0'.
 ELSE.
 w_flag1 = '1'.
 ENDIF. " IF SY-SUBRC EQ 0
 ENDWHILE. " WHILE W_FLAG1...
 w_flag1 = '0'.
ENDLOOP. " LOOP AT T_RBKP...
CLASS lcl_event_receiver DEFINITION DEFERRED.
Declare reference variables to the ALV grid and the container
DATA :
 cust_con TYPE scrfname VALUE 'BCALVC_TOOLBAR_D100_C1',
 cont_on_dialog TYPE scrfname VALUE 'BCALVC_TOOLBAR_D101_C1',
 ref1 TYPE REF TO cl_gui_custom_container,
 ref2 TYPE REF TO cl_gui_alv_grid,
 event_receiver TYPE REF TO lcl_event_receiver,
 fcat TYPE lvc_t_fcat,
 wa TYPE lvc_s_fcat,
 wa_layo TYPE lvc_s_layo.
CALL SCREEN 200.
class lcl_event_receiver: local class to define and handle own
*functions......................................................
Definition:
CLASS lcl_event_receiver DEFINITION.
PUBLIC SECTION.
 METHODS:
 handle_toolbar
 FOR EVENT toolbar OF cl_gui_alv_grid
 IMPORTING e_object e_interactive,
 handle_user_command
 FOR EVENT user_command OF cl_gui_alv_grid
 IMPORTING e_ucomm.
PRIVATE SECTION.
ENDCLASS. "lcl_event_receiver DEFINITION
class lcl_event_receiver (Implementation)
CLASS lcl_event_receiver IMPLEMENTATION.
METHOD handle_toolbar.
In event handler method for event TOOLBAR: Append own functions
by using event parameter E_OBJECT.
 DATA: ls_toolbar TYPE stb_button.
E_OBJECT of event TOOLBAR is of type REF TO CL_ALV_EVENT_TOOLBAR_SET.
append a separator to normal toolbar
 CLEAR ls_toolbar.
 MOVE 3 TO ls_toolbar-butn_type.
 APPEND ls_toolbar TO e_object->mt_toolbar.
append an icon to show booking table
 CLEAR ls_toolbar.
 MOVE 'PORDER' TO ls_toolbar-function.
 MOVE icon_employee TO ls_toolbar-icon.
 MOVE 'Show Bookings' TO ls_toolbar-quickinfo.
 MOVE 'PONUMBER' TO ls_toolbar-text.
 MOVE ' ' TO ls_toolbar-disabled.
 APPEND ls_toolbar TO e_object->mt_toolbar.
append a separator to normal toolbar
 CLEAR ls_toolbar.
 MOVE 3 TO ls_toolbar-butn_type.
 APPEND ls_toolbar TO e_object->mt_toolbar.
append an icon to show booking table
 CLEAR ls_toolbar.
 MOVE 'PREQUISITION' TO ls_toolbar-function.
 MOVE icon_employee TO ls_toolbar-icon.
 MOVE 'Show Bookings' TO ls_toolbar-quickinfo.
 MOVE 'PRNUMBER' TO ls_toolbar-text.
 MOVE ' ' TO ls_toolbar-disabled.
 APPEND ls_toolbar TO e_object->mt_toolbar.
ENDMETHOD. " handle_toolbar
METHOD handle_user_command.
*Event handler method for event USER_COMMAND:
 CASE e_ucomm.
 WHEN 'PORDER'.
 CALL TRANSACTION 'ME23N'.
 WHEN 'PREQUISITION'.
 CALL TRANSACTION 'ME53N'.
 ENDCASE.
ENDMETHOD. " handle_user_command
ENDCLASS. " lcl_event_receiver
*& Module STATUS_0200 OUTPUT
text
MODULE status_0200 OUTPUT.
SET PF-STATUS 'GUI'.
SET TITLEBAR 'TITLE'.
IF sy-ucomm = 'BACK'.
 LEAVE PROGRAM.
ENDIF.
PERFORM form_fcat.
PERFORM form_layo.
IF ref1 IS INITIAL.
 CREATE OBJECT ref1
 EXPORTING
PARENT = ref1
 container_name = 'CUST_CON'
STYLE =
LIFETIME = lifetime_default
REPID =
DYNNR =
NO_AUTODEF_PROGID_DYNNR =
 EXCEPTIONS
 cntl_error = 1
 cntl_system_error = 2
 create_error = 3
 lifetime_error = 4
 lifetime_dynpro_dynpro_link = 5
 OTHERS = 6
 IF sy-subrc <> 0.
 MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
 WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
 ENDIF.
ENDIF.
IF ref2 IS INITIAL.
 CREATE OBJECT ref2
 EXPORTING
I_SHELLSTYLE = 0
I_LIFETIME =
 i_parent = ref1
I_APPL_EVENTS = space
I_PARENTDBG =
I_APPLOGPARENT =
I_GRAPHICSPARENT =
I_NAME =
 EXCEPTIONS
 error_cntl_create = 1
 error_cntl_init = 2
 error_cntl_link = 3
 error_dp_create = 4
 OTHERS = 5
 IF sy-subrc <> 0.
 MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
 WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
 ENDIF.
 CALL METHOD ref2->set_table_for_first_display
EXPORTING
I_BUFFER_ACTIVE =
I_BYPASSING_BUFFER =
I_CONSISTENCY_CHECK =
I_STRUCTURE_NAME =
IS_VARIANT =
I_SAVE =
I_DEFAULT = 'X'
is_layout = wa_layo
IS_PRINT =
IT_SPECIAL_GROUPS =
IT_TOOLBAR_EXCLUDING =
IT_HYPERLINK =
IT_ALV_GRAPHICS =
IT_EXCEPT_QINFO =
 CHANGING
 it_outtab = t_final
 it_fieldcatalog = fcat
IT_SORT =
IT_FILTER =
 EXCEPTIONS
 invalid_parameter_combination = 1
 program_error = 2
 too_many_lines = 3
 OTHERS = 4
 IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
 ENDIF.
 CREATE OBJECT event_receiver.
 SET HANDLER event_receiver->handle_user_command FOR ref2.
 SET HANDLER event_receiver->handle_toolbar FOR ref2.
*Call method 'set_toolbar_interactive' to raise event TOOLBAR.
 CALL METHOD ref2->set_toolbar_interactive.
ENDIF.
ENDMODULE. " STATUS_0200 OUTPUT
Form FORM_FCAT *
text *
FORM form_fcat.
CLEAR fcat.
CLEAR wa.
wa-fieldname = 'EBELN'.
wa-col_pos = 1.
wa-scrtext_l = ' PURCHASE ORDER NUMBER'.
APPEND wa TO fcat.
CLEAR wa.
wa-fieldname = 'BANFN'.
wa-col_pos = 2.
wa-scrtext_l = 'PURCHASE REQUISITION NUMBER'.
APPEND wa TO fcat.
CLEAR wa.
wa-fieldname = 'BADAT'.
wa-col_pos = 3.
wa-scrtext_l = 'PR CREATION DATE'.
APPEND wa TO fcat.
CLEAR wa.
wa-fieldname = 'BLDAT'.
wa-col_pos = 4.
wa-scrtext_l = 'INVOICE DATE'.
APPEND wa TO fcat.
CLEAR wa.
wa-fieldname = 'LIFNR'.
wa-col_pos = 5.
wa-scrtext_l = 'VENDOR NUMBER'.
APPEND wa TO fcat.
wa-fieldname = 'WRBTR'.
wa-col_pos = 6.
wa-do_sum = 'X'.
wa-scrtext_l = ' PO AMOUNT'.
APPEND wa TO fcat.
wa-fieldname = 'AFNAM'.
wa-col_pos = 7.
wa-scrtext_l = 'REQUISITIONER'.
APPEND wa TO fcat.
wa-fieldname = 'ERNAM'.
wa-col_pos = 8.
wa-scrtext_l = 'PR CREATOR'.
APPEND wa TO fcat.
ENDFORM. " FORM_FCAT
Module USER_COMMAND_0200 INPUT *
text *
MODULE user_command_0200 INPUT.
CASE sy-ucomm.
 WHEN 'BACK' OR 'CANCEL' OR 'EXIT'.
 LEAVE PROGRAM.
ENDCASE.
ENDMODULE. " USER_COMMAND_0200 INPUT
 FORM FORM_LAYO *
There are no interface parameters to be passed to this subroutine.*
FORM form_layo.
CLEAR wa_layo.
wa_layo-zebra = 'X'.
wa_layo-grid_title = 'GRID TITLE'.
wa_layo-no_toolbar = 'X'.
ENDFORM. " FORM_LAYO
 FORM GET_PURCHASEREQUISITION *
This subroutine selects all the Purchase requisitions from table *
EBAN for all the selected Invoices based on the Purchase orders. *
There are no interface parameters to be passed to this subroutine. *
FORM get_purchaserequistion.
SELECT belnr " Document number of an invoice
 gjahr " Fiscal Year
 bldat " Posting Date in the Document
 budat " Posting Date in the Document
 lifnr " Different invoicing party
 FROM rbkp
 INTO TABLE t_rbkp
 WHERE belnr IN s_belnr
 AND gjahr EQ p_gjahr
 AND bldat IN s_bldat
 AND budat IN s_budat.
IF NOT t_rbkp[] IS INITIAL.
 SELECT belnr " Document number of an invoice
 ebeln " Purchasing Document Number
 wrbtr " Amount in document currency
 FROM rseg
 INTO TABLE t_rseg
 FOR ALL ENTRIES IN t_rbkp
 WHERE belnr EQ t_rbkp-belnr
 AND werks IN s_werks.
ENDIF. " IF NOT t_rbkp[] IS INITIAL...
IF NOT t_rseg[] IS INITIAL.
 SELECT banfn
 ernam
 afnam
 badat
 ebeln
 FROM eban
 INTO CORRESPONDING FIELDS OF TABLE t_eban
 FOR ALL ENTRIES IN t_rseg
 WHERE ebeln EQ t_rseg-ebeln.
ENDIF. " IF NOT t_rseg[] IS INITIAL...
ENDFORM. " GET_PURCHASEREQUISITION
reward points if helpful.
regards,
kiran kumar k.

Is it possible to change user in call transaction ??

Hi experts,
There is a custom RFC FM wich makes some call transacion (for example to ME21N) and is invoked from .NET. The user logged in that moment is 'USER1' but the client wants user 'USER2' to appear in standard tables (EKKO...) and in ME23N. It's not possible that the client loggs on with USER2 as he needs the password and we don't like to share it whith them.
I found this:
l_Fecha = sy-datum - 1.
CALL FUNCTION 'BDC_OPEN_GROUP'
    EXPORTING
      client   = sy-mandt
      group    = 'maria'
      user     = 'USER2'
      keep     = space
      holddate = l_fecha.
(code for the batch input)
CALL TRANSACTION 'ME21N' USING i_bdcdata
                           MODE w_mode UPDATE 'S'
                           MESSAGES INTO i_messtab.
CALL FUNCTION 'BDC_CLOSE_GROUP'.
SUBMIT rsbdcsub
WITH bis = sy-datum
WITH fehler = space
WITH logall = space
WITH mappe = 'maria'
WITH von = sy-datum
WITH z_verarb = 'X'
EXPORTING LIST TO MEMORY
AND RETURN.
But when the PO is created, the user is still USER1.
Is it possible to change the user at any moment ??
Thanks in advance !!
Regards,
Marí

Hi
You are using ME21n which is and ENJOY transaction.
To update ENJOY Transactions use BAPIs instead of BDC.
because ENJOY transactions are built on control framework which use ActiveX controls (like Grid).
These new transactions should make life for the end user a bit easier, since SAP transactions not always accelerate in design, logic, etc. That's why SAP has introduced these new transactions which in the end, will have the same result. In these socalled 'Enjoy' transactions, SAP started using these 'new' enjoy sap controls like ALV grid, text editor, HTML viewer etc.
For 'updating' Enjoy transaction (BTW: You are NOT updating the transactions, but rather the purchase order or whatever) you will have to use BAPI's (or FM for that matter) in stead of BDC since Enjoy Controls work with a different framework in which you can not call a certain screen and field. Like in an ALV grid, not every field has it's own screen field name. So you cannot use them in BDC.
Hope this makes any sense for your question. As BDC is not reliable for your tcode.
Thanks DP

Call Transaction 'FMWC' cashes parameter

Hallo,
I'm trying to implement following code fragment in ABAP:
SET PARAMETER: ID 'KBL' FIELD ZAHL_FMIOI-REFBN .
call transaction 'FMWC' AND SKIP FIRST SCREEN .
The problem ist that transaction FMWC takes not the parameter set, but the value from user-cash which was used by previous transaction call made by user via fordeground call of transaction in question. Has smbd. an idea how to preven this ?
Kind Regards
Alexey Voynikov

Now the coding looks liike
       data: kbl like fmioi-refbn.
      free memory id 'KBL'.                                                      returns 4
      get parameter id 'KBL' field kbl.                                       returns 0, kbl = ' '.
      SET PARAMETER ID 'KBL' FIELD sach_FMIOI-REFBN .   returns 0
      get parameter id 'KBL' field kbl.                                       returns 0, kbl = '0123456789' (equals to sach_fmioi-refbn)
      call transaction 'FMWC' AND SKIP FIRST SCREEN.         parameter 'KBL' in TA Dynpro is not set (empty).
the fileld kbl is just for debugging purposes.
All semicolons are deleted.
Field sach_fmioi-knblnr is populeted and hidden in the line.
The combination set parameter, call transaction works perfect with other transaction , I have implemented it for fb03, me23n,as03 and further more.

Unable to Capture ALV output in an Internal Table, after CALL TRANSACTION

Dear all,
My requirement is to run multiple materials in T-code CK86_99 but as we know CK86_99 is only adequate to one material at a time.
So, I want to capture the Output of the T-code in my Internal table with respect to all the Material Numbers I use in the Select-Options of my Z Program.
Below is the Code I developed so far, but the Class
cl_salv_bs_runtime_info=>get_data_ref(
 IMPORTING r_data = lf_ref ).
is not capturing the Ouput...
Please have a look and enlighten me how it could be solved.
TABLES : mara.
DATA : BEGIN OF wa_mara,
matnr TYPE mara-matnr,
END OF wa_mara.
DATA: it_bdcdata TYPE TABLE OF bdcdata,
 wa_it_bdcdata LIKE LINE OF it_bdcdata,
 it_mara LIKE TABLE OF wa_mara.
* BELNR(10).
FIELD-SYMBOLS:<fs_tab> TYPE ANY TABLE,
<fs_line> TYPE any.
DATA:lf_ref TYPE REF TO data,
 lf_ref1 TYPE REF TO data.
SELECT-OPTIONS so_matnr FOR mara-matnr.
PARAMETERS p_werks LIKE t001w-werks.
*BELNR = 'Z92'. " Give Document Number here
SELECT matnr FROM mara INTO TABLE it_mara WHERE matnr IN so_matnr.
DATA opt TYPE ctu_params.
LOOP AT it_mara INTO wa_mara.
CLEAR wa_it_bdcdata.
wa_it_bdcdata-program = 'SAPMKKB0'.
wa_it_bdcdata-dynpro = '0300'.
wa_it_bdcdata-dynbegin = 'X'.
APPEND wa_it_bdcdata TO it_bdcdata.
CLEAR wa_it_bdcdata.
wa_it_bdcdata-fnam = 'BDC_CURSOR'.
wa_it_bdcdata-fval = 'KKB0-MATNR'.
APPEND wa_it_bdcdata TO it_bdcdata.
CLEAR wa_it_bdcdata.
wa_it_bdcdata-fnam = 'KKB0-MATNR'.
wa_it_bdcdata-fval = wa_mara-matnr.
APPEND wa_it_bdcdata TO it_bdcdata.
CLEAR wa_it_bdcdata.
wa_it_bdcdata-fnam = 'BDC_CURSOR'.
wa_it_bdcdata-fval = 'KKB0-WERKS'.
APPEND wa_it_bdcdata TO it_bdcdata.
CLEAR wa_it_bdcdata.
wa_it_bdcdata-fnam = 'KKB0-WERKS'.
wa_it_bdcdata-fval = p_werks.
APPEND wa_it_bdcdata TO it_bdcdata.
CLEAR wa_it_bdcdata.
wa_it_bdcdata-fnam = 'BDC_OKCODE'.
wa_it_bdcdata-fval = 'OSNY'."'ONLI'."=CRET'.
APPEND wa_it_bdcdata TO it_bdcdata.
* CLEAR wa_it_bdcdata.
* wa_it_bdcdata-program = 'SAPLKKRSOO'.
* wa_it_bdcdata-dynpro = '0100'.
* wa_it_bdcdata-dynbegin = 'X'.
* APPEND wa_it_bdcdata TO it_bdcdata.
* CLEAR wa_it_bdcdata.
* wa_it_bdcdata-fnam = 'BDC_OKCODE'.
* wa_it_bdcdata-fval = 'BACK'."=CRET'.
* APPEND wa_it_bdcdata TO it_bdcdata.
* CLEAR wa_it_bdcdata.
* wa_it_bdcdata-program = 'SAPMKKB0'.
* wa_it_bdcdata-dynpro = '0300'.
* wa_it_bdcdata-dynbegin = 'X'.
* APPEND wa_it_bdcdata TO it_bdcdata.
* CLEAR wa_it_bdcdata.
* wa_it_bdcdata-fnam = 'BDC_OKCODE'.
* wa_it_bdcdata-fval = 'EXIT'."=CRET'.
* APPEND wa_it_bdcdata TO it_bdcdata.
opt-dismode = 'N'.
cl_salv_bs_runtime_info=>set(
 EXPORTING display = abap_false
 metadata = abap_true
data = abap_true ).
CALL TRANSACTION 'CK86_99' USING it_bdcdata OPTIONS FROM opt.
TRY.
cl_salv_bs_runtime_info=>get_data_ref(
 IMPORTING r_data = lf_ref ).
 ASSIGN lf_ref->* TO <fs_tab>.
 CATCH cx_salv_bs_sc_runtime_info.
 MESSAGE 'Unable to retrieve ALV data' TYPE 'E'.
ENDTRY.
cl_salv_bs_runtime_info=>clear_all( ).
IF <fs_tab> IS ASSIGNED.
 CREATE DATA lf_ref1 LIKE LINE OF <fs_tab>.
 ASSIGN lf_ref1->* TO <fs_line>.
ENDIF.
*LOOP AT <FS_TAB> ASSIGNING <FS_LINE>.
*ENDLOOP.

Hi Abhay,
 If you go to Transaction code SE93, enter the tcode "CK86_99" and click display, you may see the default value for transaction is "KKBB" and the screen field for P_SCREEN = 0300, P_TCODE = ck86_99.
 You may need to copy the transaction code "KKBB" and go to SE93 again, enter the tcode for "KKBB" then click display, now you may see the program name is "RKKB1000".
 Hope this answer your question.
Thanks
Hock Lin

Call transaction error handling

how to maintain the log i.e sucess/failures like below.
Line No. Success/ Failure Document No Error Details
1 S Doc 740000001
2 S Doc 740000002
3 F Co- code does not exist
4 F GL Account does not exist
I'm getting only one last document no: but i need all the documents to be displayed i.e either success/failures.
below is my code.
TYPES: BEGIN OF ty_filedata,
 bukrs TYPE bukrs, "Company code
 blart TYPE blart, "Document type
 bldat TYPE char10, "Document Date
 budat TYPE char10, "Posting date
 xblnr TYPE xblnr, "Reference
 bktxt TYPE bktxt, "Document Header text
 waers TYPE waers, "Currency
 newbs TYPE bschl, "Posting Key for the next line item
 wrbtr TYPE char10, "Amount
 zuonr LIKE bsik-zuonr, "Assignment
 sgtxt TYPE sgtxt, "Text
 newko TYPE hkont, "Account for the next line item
 END OF ty_filedata.
TYPES: BEGIN OF ty_detail_log,
 item_no TYPE i, " Item line no.
 status(1) TYPE c, " Status - success/failure
 doc_no TYPE bkpf-belnr," Document No.
 message TYPE string, " Message
 END OF ty_detail_log.
*& DATA declaration of internal tables
 Internal Table declaration for excel data
DATA: it_itab TYPE STANDARD TABLE OF alsmex_tabline INITIAL SIZE 0,
 Internal Table declaration for upload data
 it_upload TYPE STANDARD TABLE OF ty_filedata INITIAL SIZE 0,
 Internal Table Declaration for BDCDATA
 it_bdcdata TYPE STANDARD TABLE OF bdcdata,
 Internal Table Declaration for BDCMSGCOLL
 it_bdcmsgcoll TYPE STANDARD TABLE OF bdcmsgcoll,
 Internal Table Declaration for FILENMAE
 lf_fname TYPE rlgrap-filename.
 t_err_log TYPE STANDARD TABLE OF ty_err
 INITIAL SIZE 0, " table for validation error log
 t_DETAIL_LOG TYPE STANDARD TABLE OF TY_DETAIL_LOG.
 C_MSGNO TYPE BDC_MNR VALUE '312',
*& DATA declaration of work area
 Work Area declaration for Excel Data
DATA: w_itab TYPE alsmex_tabline,
 Work Area declaration for upload data
 w_upload TYPE ty_filedata,
 Work Area declaration for upload data
 w_upload_n TYPE ty_filedata,
 Work Area declaration for upload data
 w_bdcdata TYPE bdcdata,
 Work Area declaration for upload data
 w_bdcmsgcoll TYPE bdcmsgcoll,
 w_detail_log TYPE ty_detail_log.
*& SELECTION-SCREEN
SELECTION-SCREEN: BEGIN OF BLOCK bk1 WITH FRAME TITLE text-001.
PARAMETERS:p_file TYPE rlgrap-filename. " MODIF ID G1.
SELECTION-SCREEN: END OF BLOCK bk1.
*& AT SELECTION SCREEN
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_file.
CALL FUNCTION 'KD_GET_FILENAME_ON_F4'
 EXPORTING
 dynpro_number = syst-dynnr
 CHANGING
 file_name = p_file
 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.
*& START-OF-SELECTION
START-OF-SELECTION.
DATA: lw_itab TYPE alsmex_tabline.
lf_fname = p_file.
CALL FUNCTION 'ALSM_EXCEL_TO_INTERNAL_TABLE'
 EXPORTING
 filename = lf_fname
 i_begin_col = '1'
 i_begin_row = '6'
 i_end_col = '12'
 i_end_row = '999'
 TABLES
 intern = it_itab[]
 EXCEPTIONS
 inconsistent_parameters = 1
 upload_ole = 2
 OTHERS = 3.
IF sy-subrc <> 0.
*MESSAGE S205(ZF_COMMON_MSGS_FIN1) DISPLAY LIKE C_E.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
 WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
ELSE.
IF it_itab IS NOT INITIAL.
 SORT it_itab BY row col.
DELETE it_itab WHERE row LT 6.
 LOOP AT it_itab INTO lw_itab.
 w_itab = lw_itab.
 AT NEW row.
 CLEAR: w_upload.
 ENDAT.
 CASE w_itab-col.
 WHEN '0001'.
 w_upload-bukrs = w_itab-value.
 WHEN '0002'.
 w_upload-blart = w_itab-value.
 WHEN '0003'.
 w_upload-bldat = w_itab-value.
 WHEN '0004'.
 w_upload-budat = w_itab-value.
 WHEN '0005'.
 w_upload-xblnr = w_itab-value.
 WHEN '0006'.
 w_upload-bktxt = w_itab-value.
 WHEN '0007'.
 w_upload-waers = w_itab-value.
 WHEN '0008'.
 w_upload-newbs = w_itab-value.
 WHEN '0009'.
 w_upload-wrbtr = w_itab-value.
 WHEN '0010'..
 w_upload-zuonr = w_itab-value.
 WHEN '0011'.
 w_upload-sgtxt = w_itab-value.
 WHEN '0012'.
 w_upload-newko = w_itab-value.
 ENDCASE.
 AT END OF row.
 APPEND w_upload TO it_upload.
 CLEAR: w_upload.
 ENDAT.
 ENDLOOP.
*endif.
ENDIF.
DATA: lw_upload TYPE ty_filedata,
 lv_lines TYPE sy-tabix,
 lv_index TYPE sy-tabix.
DESCRIBE TABLE it_upload LINES lv_lines.
LOOP AT it_upload INTO lw_upload.
 lv_index = sy-tabix.
 w_upload = lw_upload.
 IF NOT w_upload-bukrs IS INITIAL.
 IF lv_index GT 1.
 CALL TRANSACTION 'FB01' USING it_bdcdata
 MODE 'N' UPDATE 'S' MESSAGES INTO it_bdcmsgcoll.
 PERFORM fr_format_message_text.
 REFRESH: it_bdcdata.
 ENDIF.
 PERFORM bdc_dynpro USING 'SAPMF05A' '0100'.
 PERFORM bdc_field USING 'BDC_CURSOR'
 'BKPF-XBLNR'.
 PERFORM bdc_field USING 'BDC_OKCODE'
 '/00'.
 PERFORM bdc_field USING 'BKPF-BLDAT'
 w_upload-bldat.
 PERFORM bdc_field USING 'BKPF-BLART'
 w_upload-blart.
 PERFORM bdc_field USING 'BKPF-BUKRS'
 w_upload-bukrs.
 PERFORM bdc_field USING 'BKPF-BUDAT'
 w_upload-budat.
 PERFORM bdc_field USING 'BKPF-WAERS'
 w_upload-waers.
 PERFORM bdc_field USING 'BKPF-XBLNR'
 w_upload-xblnr.
*perform bdc_field using 'FS006-DOCID'
 PERFORM bdc_field USING 'RF05A-NEWBS'
 w_upload-newbs.
 PERFORM bdc_field USING 'RF05A-NEWKO'
 w_upload-newko.
 ENDIF.
 IF lv_index NE lv_lines.
 lv_index = lv_index + 1.
 READ TABLE it_upload INTO w_upload_n INDEX lv_index.
 PERFORM bdc_dynpro USING 'SAPMF05A' '0300'.
 PERFORM bdc_field USING 'BDC_CURSOR'
 'BSEG-WRBTR'.
 PERFORM bdc_field USING 'BDC_OKCODE'
 '/00'.
 PERFORM bdc_field USING 'BSEG-WRBTR'
 w_upload-wrbtr.
 PERFORM bdc_field USING 'RF05A-NEWBS'
 w_upload_n-newbs.
 PERFORM bdc_field USING 'RF05A-NEWKO'
 w_upload_n-newko.
 ELSE.
 PERFORM bdc_dynpro USING 'SAPMF05A' '0300'.
 PERFORM bdc_field USING 'BDC_CURSOR'
 'BSEG-WRBTR'.
 PERFORM bdc_field USING 'BDC_OKCODE'
 '=BU'.
 PERFORM bdc_field USING 'BSEG-WRBTR'
 w_upload-wrbtr.
 ENDIF.
 PERFORM bdc_dynpro USING 'SAPLKACB' '0002'.
 PERFORM bdc_field USING 'BDC_CURSOR'
 'COBL-ANLN1'.
 PERFORM bdc_field USING 'BDC_OKCODE'
 '=ENTE'.
ENDLOOP.
CALL TRANSACTION 'FB01' USING it_bdcdata
 MODE 'N' UPDATE 'S' MESSAGES INTO it_bdcmsgcoll.
PERFORM fr_format_message_text .
REFRESH: it_bdcdata.
*& Form BDC_DYNPRO
FORM bdc_dynpro USING program dynpro.
CLEAR w_bdcdata.
w_bdcdata-program = program.
w_bdcdata-dynpro = dynpro.
w_bdcdata-dynbegin = 'X'.
APPEND w_bdcdata TO it_bdcdata.
ENDFORM. "BDC_DYNPRO
 Insert field *
FORM bdc_field USING fnam fval.
IF fval <> space.
 CLEAR w_bdcdata.
 w_bdcdata-fnam = fnam.
 w_bdcdata-fval = fval.
 APPEND w_bdcdata TO it_bdcdata.
ENDIF.
ENDFORM. "BDC_FIELD
*& Form fr_format_message_text
FORM fr_format_message_text.
DATA: lf_msg TYPE string.
WRITE:/ sy-uline(125).
FORMAT COLOR 1 INTENSIFIED ON.
WRITE : /1 sy-vline,
 2 text-041 , "'record Number',
 16 sy-vline,
 17 text-042 , " 'success/failure',
 35 sy-vline,
 36 text-043, " 'document no',
 55 sy-vline,
 56 text-044, "'Error details',
 125 sy-vline.
WRITE:/ sy-uline(125).
LOOP AT it_bdcmsgcoll INTO w_bdcmsgcoll.
 CALL FUNCTION 'FORMAT_MESSAGE'
 EXPORTING
 id = w_bdcmsgcoll-msgid
 lang = sy-langu
 no = w_bdcmsgcoll-msgnr
 v1 = w_bdcmsgcoll-msgv1
 v2 = w_bdcmsgcoll-msgv2
 v3 = w_bdcmsgcoll-msgv3
 v4 = w_bdcmsgcoll-msgv4
 IMPORTING
 msg = lf_msg
 EXCEPTIONS
 not_found = 1
 OTHERS = 2.
 IF sy-subrc EQ 0.
 WRITE:/01 sy-vline,
 02 sy-tabix,
 16 sy-vline,
 17 w_bdcmsgcoll-msgtyp,
 35 sy-vline,
 36 w_bdcmsgcoll-msgv1,
 55 sy-vline,
 56 lf_msg,
 125 sy-vline.
 WRITE:/ sy-uline(125).
 ENDIF.
ENDLOOP.
ENDFORM. "fr_format_message_text
Thanks in advance.

Hi Neelima,
Just put the following code within that LOOP...ENDLOOP statement.
LOOP AT it_upload INTO lw_upload.
CALL TRANSACTION 'FB01' USING it_bdcdata
MODE 'N' UPDATE 'S' MESSAGES INTO it_bdcmsgcoll.
PERFORM fr_format_message_text .
REFRESH: it_bdcdata.
ENDLOOP.
Regards,
R.Nagarajan.
We can -

BDC Call Transaction - Doc.No not getting generated in Message Internal tab

Dear All,
I am using BDC Call Transaction method for uploading data for transaction, Iam able to successfully capture the Error messages, sucess messages and the transaction number is also displayed for the bdc run in Mode A, but in case of scheduling the job in background, the Error messages are displayed but the transaction number is not captured in the message Internal table( BDCMSGCOLL).
Kindly look into the matter and revert back for any further info.
Regards
Naresh

Hi,
Please try using the following kind of code in 'CALL TRANSACTION'
    opt-dismode = 'E'.     " Exclusive mode
    opt-defsize = 'X'.
    opt-updmode = 'S'.
    opt-nobinpt = ' '.
    CALL TRANSACTION transaction_code USING ft OPTIONS FROM opt
                                                                         MESSAGES INTO t_bdcmsgcoll .
Hope this will work.
Thanks,
Leo

VALUES not getting passed in t.code 'FMY3' VIA call transaction 'FMY3'

hi guru's,
i have created a ALV report for funds precommitment,when i click the document number,the respective document is not opening
i have coded like this
IF selfield-value IS NOT INITIAL.
        READ TABLE final INDEX selfield-tabindex.
        SET PARAMETER ID: 'KBL' FIELD final-belnr,
                          'KBP' FIELD final-blpos.
        CALL TRANSACTION 'FMY3' AND SKIP FIRST SCREEN.
      ENDIF.
the transaction is called,but with empty value in the field and the document is not opening....please help me with this regard...
    thanks in advance,
regards,
Balaji.S

Hello Venkat.O,
i have a similar problem with the overwrite of the memory ID, when calling transaction FMY3. In the code block you mentioned, the system gets the right value from the memory ID, that i've set before calling the transaction. But i found that after that the system runs in the include LFMFRO01, the code
MODULE init_suppress OUTPUT.
IF status2 = st2_app.                "/Genehmigen/Ablehnen
Lesen aus Memory: wird in WF-Methode 'APPROVE' gefüllt
    IMPORT wfdata TO g_f_wfdata FROM MEMORY ID con_memid_wf.
    IF NOT g_f_wfdata-belnr IS INITIAL.
      IF g_f_wfdata-blpos = space.
        g_f_wfdata-blpos = con_initial_blpos.
      ENDIF.
      kbld-belnr = g_f_wfdata-belnr.
and here the system gets the memory of the last document created and overwrites the selecion-screen field KBLD-BELNR with that value. And the value i had stored in the parameter ID 'MRV', and that the system gets it right in the code you show, is overwritten..
This seems like a bug from SAP, don't you think?
This way the system will always show the last doc. when calling transaction, after setting a parameter ID..

BDC Call Transaction : FS00(Create G/L Account)

Hi,
BDC of FS00 is running properly in Forground (A) Mode, with success messages and G/L account being created in SKB1 table.
But when I run it in Background (N) Mode, it is not creating the G/L account. Although I am getting the success messages in the end of the execution but in the table, there is no G/L account.
FORM fill_bdcdata .
loop at i_output.
clear i_bdcdata.
refresh i_bdcdata.
perform bdc_dynpro using 'SAPLGL_ACCOUNT_MASTER_MAINTAIN' '2001'.
perform bdc_field using 'BDC_OKCODE'
 '=ACC_CRE'.
perform bdc_field using 'BDC_CURSOR'
 'GLACCOUNT_SCREEN_KEY-BUKRS'.
perform bdc_field using 'GLACCOUNT_SCREEN_KEY-SAKNR'
 i_output-SAKNR. "gl ac number
perform bdc_field using 'GLACCOUNT_SCREEN_KEY-BUKRS'
 i_output-BUKRS. "company code
perform bdc_dynpro using 'SAPLGL_ACCOUNT_MASTER_MAINTAIN' '2001'.
perform bdc_field using 'BDC_OKCODE'
 '=2102_GROUP'.
perform bdc_field using 'BDC_CURSOR'
 'GLACCOUNT_SCREEN_COA-KTOKS'. "ac grp
*perform bdc_field using 'GLACCOUNT_SCREEN_COA-KTOKS'
 i_output-cc.
perform bdc_field using 'GLACCOUNT_SCREEN_COA-XPLACCT'
 i_output-xplacct. "pl account
perform bdc_field using 'GLACCOUNT_SCREEN_COA-XBILK'
 i_output-xbilk. "balance sheet
perform bdc_dynpro using 'SAPLGL_ACCOUNT_MASTER_MAINTAIN' '2001'.
perform bdc_field using 'BDC_OKCODE'
 '=TAB02'.
perform bdc_field using 'GLACCOUNT_SCREEN_COA-KTOKS'
 i_output-ktoks. "ac grp
perform bdc_field using 'GLACCOUNT_SCREEN_COA-XPLACCT'
 i_output-xplacct. "pl account
perform bdc_field using 'BDC_CURSOR'
 'GLACCOUNT_SCREEN_COA-TXT50_ML'.
perform bdc_field using 'GLACCOUNT_SCREEN_COA-TXT20_ML'
 i_output-txt20_ml. "short text
perform bdc_field using 'GLACCOUNT_SCREEN_COA-TXT50_ML'
 i_output-txt50_ml. "long text
perform bdc_dynpro using 'SAPLGL_ACCOUNT_MASTER_MAINTAIN' '2001'.
perform bdc_field using 'BDC_OKCODE'
 '=TAB03'.
perform bdc_field using 'BDC_CURSOR'
 'GLACCOUNT_SCREEN_CCODE-MITKZ'.
perform bdc_field using 'GLACCOUNT_SCREEN_CCODE-XSALH'
 i_output-xsalh. "Only Balance in Local Currency
perform bdc_field using 'GLACCOUNT_SCREEN_CCODE-MWSKZ'
 i_output-mwskz. "Tax Category
perform bdc_field using 'GLACCOUNT_SCREEN_CCODE-XMWNO'
 i_output-xmwno. "Posting without tax
perform bdc_field using 'GLACCOUNT_SCREEN_CCODE-MITKZ'
 i_output-mitkz. "Reccon A/C
perform bdc_field using 'BDC_CURSOR'
 'GLACCOUNT_SCREEN_CCODE-ZUAWA'.
perform bdc_field using 'GLACCOUNT_SCREEN_CCODE-XOPVW'
 i_output-xopvw. "Open Item Management
perform bdc_field using 'GLACCOUNT_SCREEN_CCODE-XKRES'
 i_output-xkres. "Line Item Display
perform bdc_field using 'GLACCOUNT_SCREEN_CCODE-ZUAWA'
 i_output-zuawa. "Sort Key
perform bdc_dynpro using 'SAPLGL_ACCOUNT_MASTER_MAINTAIN' '2001'.
perform bdc_field using 'BDC_OKCODE'
 '=ENTER'.
perform bdc_field using 'GLACCOUNT_SCREEN_CCODE-FSTAG'
 i_output-fstag. "Field Stauts
perform bdc_field using 'GLACCOUNT_SCREEN_CCODE-XINTB'
 i_output-xintb. "post automatically
perform bdc_field using 'BDC_CURSOR'
 'GLACCOUNT_SCREEN_CCODE-XGKON'.
perform bdc_field using 'GLACCOUNT_SCREEN_CCODE-XGKON'
 i_output-xgkon. "relevent to cash A/c
perform bdc_field using 'BDC_CURSOR'
 'GLACCOUNT_SCREEN_CCODE-ZUAWA'.
perform bdc_dynpro using 'SAPLGL_ACCOUNT_MASTER_MAINTAIN' '2001'.
perform bdc_field using 'BDC_OKCODE'
 '=SAVE'.
perform bdc_field using 'BDC_CURSOR'
 'GLACCOUNT_SCREEN_CCODE-FSTAG'.
perform bdc_field using 'GLACCOUNT_SCREEN_CCODE-FSTAG'
 i_output-fstag. "Field Stauts
perform bdc_field using 'GLACCOUNT_SCREEN_CCODE-XINTB'
 i_output-xintb. "post automatically
perform bdc_field using 'GLACCOUNT_SCREEN_CCODE-XGKON'
 i_output-xgkon. "relevent to cash A/c
perform bdc_dynpro using 'SAPLGL_ACCOUNT_MASTER_MAINTAIN' '2001'.
perform bdc_field using 'BDC_OKCODE'
 '/EEXIT'.
perform bdc_field using 'BDC_CURSOR'
 'GLACCOUNT_SCREEN_CCODE-XGKON'.
perform bdc_dynpro using 'SAPLSPO1' '0100'.
perform bdc_field using 'BDC_OKCODE'
 '=YES'.
perform f_elog.
endloop.
FORM f_elog .
data len type i.
clear i_msgtab.
call transaction 'FS00'
 using i_bdcdata
 mode g_v_mode "N
 messages into i_msgtab
 update g_v_update . "S
write: i_output-saknr.
I am not getting where I am going wrong in the code.
Regards,
Priyanka.

Hi,
Make the mode 'E' and see excatly, where the warning or errors or coming.
If you are having an currency or UOM ,related fields, see that the values should not be empty. If they are enpty. Put an if condition there and Quit filling such fields.
First keep in mode 'e' and debug. 100% you will see the warnings or errors, then tell me what is the error.
call transaction 'FS00'
using i_bdcdata
mode g_v_mode "E
messages into i_msgtab
Thansk'
Manju.

Improve performance of bdc call transaction

Hi all,
I am performing a batch update of tax codes in a BDC call transaction program. This particular code takes about 3 minutes to process 2,600 entries. I have tried almost everything but is there a way to improve / make it run faster?
I have a feeling it has something to do with the form "do_transaction", but I really don't know anymore.
Thank you in advance.
Attached is the code:
*& Report ZFI_CHANGEWTAX
*& Description: Change Doctors Withholding Tax Code (EI)
*& Using BDC Call Transaction Method
*& Created by : mpena
*& Created on : 07/15/2009
*& Modification History
*& Seq Changed on
*&       Changed by
*& 001   07/15/2009
*&        mpena         Initial Development
*& 002   07/20/2009
*&        mpena         Logic modification
*&                      Testing
*& 003   07/20/2009
*&        mpena         Call function parameter modification
*& 004   07/22/2009
*&        mpena         Report generation
*&                      Performance improvements
REPORT zfi_changewtax
       NO STANDARD PAGE HEADING
       MESSAGE-ID zfk02msg.
TYPES: BEGIN OF t_tax,
       lifnr LIKE lfa1-lifnr,                "account number
       wt_withcd LIKE lfbw-wt_withcd,        "current tax code
       wt_withcd_new LIKE lfbw-wt_withcd,    "new tax code (left blank at default)
       END OF t_tax.
DATA: wa_tax TYPE t_tax,
       i_tax TYPE STANDARD TABLE OF t_tax,
       it_bdcdata TYPE bdcdata OCCURS 0 WITH HEADER LINE,
       lin TYPE i.
-------Selection Screen Design -
SELECTION-SCREEN:
SKIP 1,
BEGIN OF BLOCK blk1 WITH FRAME TITLE aaa.
PARAMETERS: p_ktokk LIKE lfa1-ktokk DEFAULT 'DOCT' OBLIGATORY,
            p_bukrs LIKE lfbw-bukrs DEFAULT 'SL' OBLIGATORY,
            p_wtax LIKE lfbw-wt_withcd OBLIGATORY.
SELECTION-SCREEN END OF BLOCK blk1.
INITIALIZATION.
aaa = 'Change Tax Code to specified value'.
TOP-OF-PAGE.
WRITE:
/ 'Update of taxes successful on:', sy-datum, sy-uzeit,
/ 'Generated by:', sy-uname,
/ 'Company Code:', p_bukrs, 'Vendor Group:', p_ktokk.
SKIP 1.
ULINE.
WRITE:
/ 'Account Number', 20 'Old Withholding Tax Code', 50 'New Withholding Tax Code'.
ULINE.
START-OF-SELECTION.
SELECT lfa1~lifnr
         lfbw~wt_withcd
INTO TABLE i_tax
FROM lfa1 INNER JOIN lfbw
    ON lfa1lifnr = lfbwlifnr
    WHERE lfbw~bukrs EQ p_bukrs
    AND lfbw~witht EQ 'EI'.
IF sy-subrc EQ 0.
    DESCRIBE TABLE i_tax LINES lin.
ENDIF.
Update i_tax with new value of wt_witchd, then display for comparison.
After write: if old and new tax are the same, tax update was not successful for that specific account
or inputted tax type is the same as the old one.
LOOP AT i_tax INTO wa_tax.
    wa_tax-wt_withcd_new = p_wtax.
    MODIFY i_tax FROM wa_tax.
    WRITE:
    / wa_tax-lifnr,
    20 wa_tax-wt_withcd,
    50 wa_tax-wt_withcd_new.
    CLEAR wa_tax.
ENDLOOP.
PERFORM do_transaction USING p_bukrs p_wtax.
*&      Form do_transaction
     Extracted from ZFKO2 recording accessible in shdb.
FORM do_transaction USING v_bukrs v_wtax.
MESSAGE i000 WITH lin.
LOOP AT i_tax INTO wa_tax.
    REFRESH it_bdcdata.
    PERFORM bdc_dynpro      USING 'SAPMF02K' '0106'.
    PERFORM bdc_field       USING 'BDC_CURSOR'
                                  'RF02K-D0610'.
    PERFORM bdc_field       USING 'BDC_OKCODE'
                                  '/00'.
    PERFORM bdc_field       USING 'RF02K-LIFNR'
                                  wa_tax-lifnr.
    PERFORM bdc_field       USING 'RF02K-BUKRS'
                                  v_bukrs.
    PERFORM bdc_field       USING 'RF02K-D0610'
                                  'X'.
    PERFORM bdc_dynpro      USING 'SAPMF02K' '0610'.
    PERFORM bdc_field       USING 'BDC_OKCODE'
                                  '/00'.
    PERFORM bdc_field       USING 'BDC_CURSOR'
                                  'LFBW-WT_WITHCD(01)'.
    PERFORM bdc_field       USING 'LFB1-QLAND'
                                  'PH'.
    PERFORM bdc_field       USING 'LFBW-WT_WITHCD(01)'
                                  v_wtax.
    PERFORM bdc_dynpro      USING 'SAPMF02K' '0610'.
    PERFORM bdc_field       USING 'BDC_OKCODE'
                                  '=UPDA'.
    PERFORM bdc_field       USING 'BDC_CURSOR'
                                  'LFB1-QLAND'.
    PERFORM bdc_field       USING 'LFB1-QLAND'
                                  'PH'.
    CALL TRANSACTION 'FK02' USING it_bdcdata
                            MODE   'N'
                            UPDATE 'A'.
ENDLOOP.
MESSAGE i001.
ENDFORM.                    "do_transaction
       form for bdc dynpro
FORM bdc_dynpro USING program
                      dynpro.
it_bdcdata-program = program.
it_bdcdata-dynpro = dynpro.
it_bdcdata-dynbegin = 'X'.
APPEND it_bdcdata.
CLEAR it_bdcdata.
ENDFORM.                    "bdc_dynpro
       form for bdc field
FORM bdc_field USING fnam
                      fval.
it_bdcdata-fnam = fnam.
it_bdcdata-fval = fval.
APPEND it_bdcdata.
CLEAR it_bdcdata.
ENDFORM.                    "bdc_field

You might want to try using a BAPI instead of a call transaction.   I believe "BAPI_VENDOR_SAVECHARVALREPLICA" will work for you. Calling a BAPI is just like calling a function module.   After you call the bapi remember to commit it with the function module "BAPI_TRANSACTION_COMMIT".

Doubt in uploading using call transaction method

hi all
i am uploading f-29 in call transaction method .. i have a problem in currency field, the currency field is not picking up it shows a error that input field is longer than screen field .. i have declared currency field as type BSEG-WRBTR(same as screen field ...how to go about
thanks
lokesh

Hi,
When you use the database value directly in your BDC, you will have this issue. It is always advisable to use character fields when doing BDC. so change it to charecter field and try it..
Regards
Sudheer

Call transaction from alv

i am calling a transaction from alv i want to select the check boxes on th called transaction and go to the next screen how do i do that

Hello Chandan
You have to handle the DOUBLE_CLICK event either in your callback form routine (FM-based ALV) or event handler method for event USER_COMMAND (ABAP-OO based ALV).
If you call the transaction directly you will not have the authority check for this transaction. If you need this, you can use function module ABAP4_CALL_TRANSACTION instead.
If you want to open the transaction in a new window you can use the static method CL_RECA_GUI_SERVICES=>CALL_TRANSACTION (no authority check!).
Regards
Uwe

Drill down to all screens of XK03 in ALV report from CALL TRANSACTION

HI!
I have created a vendor master report which calls the XK03 transaction when the vendor is clicked on on the ALV output. It takes me to the XK03 address screen and when I try clicking to go to the next screen it says the last screen is reached , 'Do you wnat to cancell processing'. I want to enable the program to goto the next screens as well like the controll screen and the accounting screen ect in my drill down on call transaction.
following si my code section which does it.
CASE rs_selfield-fieldname.
        WHEN 'LIFNR'.
*       Set parameter ID for transaction screen field
          CHECK NOT wa_vend-lifnr IS INITIAL.
          SET PARAMETER ID 'LIF' FIELD wa_vend-lifnr.
          SET PARAMETER ID 'BUK' FIELD wa_vend-bukrs.
          SET PARAMETER ID 'EKO' FIELD wa_vend-ekorg.
          SET PARAMETER ID 'KDY' FIELD kdy_val.
          CALL TRANSACTION 'XK03' AND SKIP FIRST SCREEN. "EC needed
ENDCASE.
ENDCASE.
Thanks and regards,
Aarav

Hi,
Your code seems to be right.
Try writing the code as the below format.
CASE SY-UCOMM.
* CHECK FUNCTION CODE
WHEN '&IC1'.
* CHECK FIELD CLICKED ON WITHIN ALVGRID REPORT
IF SELFIELD-FIELDNAME = 'LIFNR'.
* READ DATA TABLE, USING INDEX ROW USER CLICKED ON
READ TABLE IT_FINAL INTO WA_FINAL INDEX SELFIELD-TABINDEX.
* SET PARAMETER ID FOR TRANSACTION SCREEN FIELD
SET PARAMETER ID 'BES' FIELD WA_FINAL-LIFNR.
* EXECUTE TRANSACTION 'XK03',AND SKIP INITIAL DATA ENTRY SCREEN.
CALL TRANSACTION 'XK03' AND SKIP FIRST SCREEN.
ENDIF.
ENDCASE.
Thanks
Arbind

Call transaction ME23N

Similar Messages

Maybe you are looking for