Problem with alv grid control editable

Hello all. I ask your help with this question because I did not find the answer in the forum. Sorry for my pour english.
I have an alv grid control (OO) with the standards buttons 'insert a line', 'delete a line', 'copy a line'.
My problem is I want to catch the event of these buttons, because after I register the events mc_evt_enter y mc_evt_modifies, when I push the button to insert a new line the alv grid show the new line and then get a dump with error: Field symbol has not yet been assigned.
My problem is that no event is launched when I push the button. I tried to catch the event before command but it does not happen.
It is like these standard buttons works apart and it is not possible to find out what they are doing.
I have read the manual easy reference for alv grid control, and I created the class lcl_event_handler exactly equal.
I have tried to debug the code in order to find the error but I can find out where it has been done.
Thank you in advance. If anybody needs to see my code I will send you or post you.

David,
What you need to do for that is to enable the editing field by field. You will have to add a field STYLE type LVC_T_STYL to the DATA table. This nested internal table will hold the information for each field of the row, whether the column is editable or not. So, if you have 5 columns, then the nested internal table will have 5 rows for each row of the main internal table.
Once this is done, you will have to append a blank row to the table, making all the fields editable and REFRESH the display.
Regards,
Ravi
Note: Please mark the answers as helpful if they help.

Similar Messages

Problem with ALV grid in edit mode

Hello, gurus!
I have a problem with ALV-grid. Sometimes when I call F4 help for a cell, data is inserted in a different cell. And when I call check_changed_data method, my internal table (passed to ALV-control in set_table_for_first_display) does not updates properly. In what can be a problem?
Thanks,
Mikhail

Hi Prabhu,
MODULE pbo_100 OUTPUT.
SET PF-STATUS 'MAIN100'.
title_of_report = text-010.
SET TITLEBAR '0100' WITH title_of_report.
DATA: g_event_receiver TYPE REF TO lcl_event_handler.
IF z_custom_container IS INITIAL .
    CREATE OBJECT z_custom_container
      EXPORTING
        container_name = 'ALV_ZAC'.
    CREATE OBJECT alv_grid
      EXPORTING
        i_parent = z_custom_container.
    g_repid = sy-repid.
    gs_variant-report = g_repid.
    x_save = 'A'.
    PERFORM check_alv_grid_fields.
    ps_layout-cwidth_opt = 'X'.
    ps_layout-edit = 'X'.
    CALL METHOD alv_grid->set_ready_for_input
      EXPORTING
        i_ready_for_input = '1'.
*    CALL METHOD alv_grid->register_edit_event
*      EXPORTING
*        i_event_id = cl_gui_alv_grid=>mc_evt_enter.
    APPEND   s_list_rec   to it_list_rec.
    CALL METHOD alv_grid->set_table_for_first_display
      EXPORTING
        is_layout       = ps_layout
        is_variant      = gs_variant
        i_save          = x_save
      CHANGING
        it_fieldcatalog = pt_fieldcat
        it_outtab       = it_list_rec[].
    CALL METHOD alv_grid->register_edit_event
      EXPORTING
        i_event_id = cl_gui_alv_grid=>mc_evt_enter.
    CALL METHOD alv_grid->register_edit_event
      EXPORTING
        i_event_id = cl_gui_alv_grid=>mc_evt_modified.
ENDIF.
FORM check_alv_grid_fields .
DATA: ls_fcat LIKE LINE OF pt_fieldcat.
REFRESH pt_fieldcat .
CLEAR: ps_layout, ls_fcat.
ls_fcat-fieldname = 'VBELN'.
ls_fcat-ref_field = 'VBELN'. ls_fcat-ref_table = 'LIPS'. " .
ls_fcat-outputlen = 9.
* ls_fcat-datatype   = 'CHAR'.
* ls_fcat-inttype    = 'C'.
APPEND ls_fcat TO pt_fieldcat.
CLEAR: ls_fcat.
ls_fcat-fieldname = 'ERDAT'.
ls_fcat-ref_field = 'ERDAT'. ls_fcat-ref_table = 'LIPS'.
ls_fcat-outputlen = 9.
* ls_fcat-f4availabl = 'X' .
* ls_fcat-datatype   = 'DATS'.
* ls_fcat-inttype    = 'D'.
APPEND ls_fcat TO pt_fieldcat.
CLEAR: ls_fcat.
ENDFORM.                    " check_alv_grid_fields
FORM save_p .
CLEAR l_valid.
CALL METHOD alv_grid->check_changed_data
    IMPORTING
      e_valid = l_valid.
IF l_valid IS INITIAL.
    CALL FUNCTION 'POPUP_TO_INFORM'
      EXPORTING
        titel = text-i01
        txt1 = text-i02
        txt2 = text-i03
        txt3 = text-i04.
ELSE.
    i_dat_reg = zrumm_prr-cdprr.
    CLEAR is_temp_otc.
    freshit i_prrpus_fax.
    freshit i_list2_ot.
    LOOP AT it_list_rec INTO s_list_rec.
      MOVE-CORRESPONDING s_list_rec TO i_list2_ot.
      i_list2_ot-fgrup = 'RECE'.
      i_list2_ot-prrnu = i_num_prr.
      APPEND i_list2_ot.
      MOVE-CORRESPONDING s_list_rec TO i_prrpus_fax.
      APPEND i_prrpus_fax.
    ENDLOOP.
ENDIF.
Edited by: Mikhail Sarychev on Mar 16, 2011 6:41 AM
Edited by: Mikhail Sarychev on Mar 16, 2011 6:49 AM
Edited by: Mikhail Sarychev on Mar 16, 2011 6:49 AM

I have a problem with ALV Grid User Command?

Hi Experts,
I have a problem with ALV GRID User Command.
I am calling TCODE IW33 (Order Display) from the ALV output at first time by selecting an order. But, User command is calling IW33 Initial screen with blank value of order. Even I checked in debugging the value what I selected is passing properly, but once that screen (IW33 Initial) displays, value doesn't appear. Then, Manually, I created another session and gone to TCODE IW33 and displayed an order. After that I came out from that order. Then again run my ALV program and selected another order, now order is displaying, but not what I selected current order instead of displaying previous order what I just displayed manually. If I selected any other order, system will display the same order what I dislayed manually.
Here is my code.
FORM user_command_alv USING u_ucomm TYPE sy-ucomm
                       us_self_field TYPE slis_selfield.
CASE u_ucomm.
WHEN '&IC1'.
READ TABLE it_final INDEX us_self_field-tabindex INTO wa_final.
        WHEN 'ORDER'.
          IF NOT wa_final-order IS INITIAL.
            SET PARAMETER ID 'COK' FIELD wa_final-order.
            CALL TRANSACTION 'IW33' AND SKIP FIRST SCREEN.
          ENDIF.
endform.
PARAMETER ID 'COK' also the standard one.
Could you please help me out, Where I did wrong?
If I select any order, that order only should display.
Thanks in advance.
Regards,
Sarayu.
Code Formatted by: Alvaro Tejada Galindo on Jan 8, 2009 2:33 PM

hi,
Please check it once the Paramater ID is 'ANR' for IW33 order number.
Hope this may help.
Regards,
Sravanthi

GL Account analysis report with ALV Grid control

Hi Everyone,
I am looking for a GL Account analysis report with ALV Grid Control.
Can I get sample code for this report.
Thank you
Prasad

Hi Rob,
Actually, I am searching for a Report which gives GL account analysis.
If anybody can throw more light on this ...it would be great.
Which Tables and fields i should refer for this report.
Thanks

Problem with ALV-GRID

I have to show an ALV_GRID,and then the user have to select one line, but i can`t know what line is selected,
i use for the field flag:
gs_fieldcat-checkbox = 'X'.
gs_fieldcat-edit = 'X'.
gs_fieldcat-NO_OUT = 'X'.
modify gt_fieldcat from gs_fieldcat transporting checkbox edit no_out where fieldname = 'FLAG'.
In the PAI i use:
 call method grid->check_changed_data
 importing
 e_valid = lf_valid.
 if lf_valid = 'X'.
 call method grid->set_ready_for_input
 exporting
 i_ready_for_input = 1.
 endif.
can anybody help me?

Hi Carl
You can use the method "GET_SELECTED_ROWS" to get indices of selected rows.
For more information, you can have a look at the tutorial <a href="https://www.sdn.sap.comhttp://www.sdn.sap.comhttp://www.sdn.sap.com/irj/servlet/prt/portal/prtroot/com.sap.km.cm.docs/documents/a1-8-4/an%20easy%20reference%20for%20alv%20grid%20control.pdf">An Easy Reference for ALV Grid Control</a>.
Regards...
*--Serdar

Problems with ALV-GRID - OO

Hi,
I'm using OO for ALV-GRID. I have problems by using TOP_OF_PAGE.
I try it like this:
CLASS LCL_EVENT_HANDLER DEFINITION .
PUBLIC SECTION .
    METHODS:
   HANDLE_TOP_OF_PAGE
         FOR EVENT TOP_OF_PAGE OF CL_GUI_ALV_GRID,
   HANDLE_PRINT_TOP_OF_PAGE
         FOR EVENT PRINT_TOP_OF_PAGE OF CL_GUI_ALV_GRID.
ENDCLASS.                    "LCL_EVENT_HANDLER DEFINITION
CLASS LCL_EVENT_HANDLER IMPLEMENTATION .
*--Handle Print Top of page
METHOD HANDLE_PRINT_TOP_OF_PAGE.
    IF SY-PAGNO = 1.
      PERFORM PRINT_TOP_OF_PAGE.
    ENDIF.
ENDMETHOD.                    "handle_print_top_of_page
*--Handle Top of page
METHOD HANDLE_TOP_OF_PAGE.
    PERFORM TOP_OF_PAGE.
ENDMETHOD.                    "handle_top_of_page
ENDCLASS.                    "LCL_EVENT_HANDLER IMPLEMENTATION
CALL METHOD GR_ALVGRID->SET_TABLE_FOR_FIRST_DISPLAY
     EXPORTING
               IT_TOOLBAR_EXCLUDING = GT_EXCLUDE
               IS_LAYOUT            = GS_LAYOUT
     CHANGING
               IT_FIELDCATALOG      = GT_FIELDCAT
               IT_OUTTAB            = ITAB.
CREATE OBJECT GR_EVENT_HANDLER.
SET HANDLER   GR_EVENT_HANDLER->HANDLE_PRINT_TOP_OF_PAGE FOR GR_ALVGRID.
SET HANDLER   GR_EVENT_HANDLER->HANDLE_TOP_OF_PAGE        FOR GR_ALVGRID.
FORM PRINT_TOP_OF_PAGE.
WRITE: / 'Print-Header'.
ENDFORM.                    "print_top_of_page
FORM TOP_OF_PAGE.
WRITE: / 'Screnn-Header'.
ENDFORM.                    "top_of_page
Has anyone an idea what i shell do??
Thanks
regards, Dieter

Hi Vijay,
i have tried this code (same as you but with MARA).
I created PF-Staus STATUS und screen 100 with container CONTROL
but i don't get any result (IT_MARA has 20 entries).
Which mistake have i done?
REPORT ZGRO_TEST1 MESSAGE-ID ZZ .
DATA: IT_MARA TYPE TABLE OF MARA.
DATA: OK_CODE LIKE SY-UCOMM,
SAVE_OK LIKE SY-UCOMM.
DATA: G_CONTAINER TYPE SCRFNAME VALUE 'CONTROL',
O_DYNDOC_ID TYPE REF TO CL_DD_DOCUMENT,
O_SPLITTER   TYPE REF TO CL_GUI_SPLITTER_CONTAINER,
O_PARENT_GRID TYPE REF TO CL_GUI_CONTAINER,
O_PARENT_TOP TYPE REF TO CL_GUI_CONTAINER,
O_HTML_CNTRL TYPE REF TO CL_GUI_HTML_VIEWER.
CLASS LCL_EVENT_HANDLER DEFINITION .
PUBLIC SECTION .
METHODS:
*Event Handler for Top of page
TOP_OF_PAGE FOR EVENT TOP_OF_PAGE
       OF CL_GUI_ALV_GRID
       IMPORTING E_DYNDOC_ID.
ENDCLASS.             "lcl_event_handler DEFINITION
CLASS LCL_EVENT_HANDLER IMPLEMENTATION.
METHOD TOP_OF_PAGE.
Top-of-page event
PERFORM EVENT_TOP_OF_PAGE USING O_DYNDOC_ID.
ENDMETHOD.                            "top_of_page
ENDCLASS.       "LCL_EVENT_HANDLER IMPLEMENTATION
DATA: G_CUSTOM_CONTAINER TYPE REF TO CL_GUI_CUSTOM_CONTAINER,
      G_HANDLER TYPE REF TO LCL_EVENT_HANDLER. "handler
START-OF-SELECTION.
SELECT *
FROM MARA
UP TO 20 ROWS
INTO TABLE IT_MARA.
END-OF-SELECTION.
IF NOT IT_MARA[] IS INITIAL.
CALL SCREEN 100.
ELSE.
MESSAGE I002 WITH 'NO DATA FOR THE SELECTION'(004).
ENDIF.
MODULE STATUS_0100 OUTPUT.
SET PF-STATUS 'STATUS'.
SET TITLEBAR 'TITLE'.
IF G_CUSTOM_CONTAINER IS INITIAL.
PERFORM CREATE_AND_INIT_ALV.
ENDIF.
ENDMODULE.                 " STATUS_0100 OUTPUT
MODULE USER_COMMAND_0100 INPUT.
CASE SY-UCOMM.
WHEN 'BACK'.
LEAVE TO SCREEN 0.
ENDCASE.
ENDMODULE.                 " USER_COMMAND_0100 INPUT
FORM CREATE_AND_INIT_ALV .
DATA: G_GRID TYPE REF TO CL_GUI_ALV_GRID.
CREATE OBJECT G_CUSTOM_CONTAINER
EXPORTING CONTAINER_NAME = G_CONTAINER.
Create TOP-Document
CREATE OBJECT O_DYNDOC_ID
EXPORTING STYLE = 'ALV_GRID'.
Create Splitter for custom_container
CREATE OBJECT O_SPLITTER
EXPORTING PARENT = G_CUSTOM_CONTAINER
ROWS    = 2
COLUMNS = 1.
CALL METHOD O_SPLITTER->GET_CONTAINER
    EXPORTING
    ROW = 1
    COLUMN = 1
    RECEIVING
    CONTAINER = O_PARENT_TOP.
CALL METHOD O_SPLITTER->GET_CONTAINER
    EXPORTING
    ROW = 2
    COLUMN = 1
    RECEIVING
    CONTAINER = O_PARENT_GRID.
Set height for g_parent_html
CALL METHOD O_SPLITTER->SET_ROW_HEIGHT
    EXPORTING
    ID = 1
    HEIGHT = 5.
CREATE OBJECT G_GRID
EXPORTING I_PARENT = O_PARENT_GRID.
CREATE OBJECT G_HANDLER.
SET HANDLER G_HANDLER->TOP_OF_PAGE FOR G_GRID.
*Calling the Method for ALV output
CALL METHOD G_GRID->SET_TABLE_FOR_FIRST_DISPLAY
    EXPORTING
    I_STRUCTURE_NAME = 'MARA'
    CHANGING
    IT_OUTTAB = IT_MARA[].
CALL METHOD O_DYNDOC_ID->INITIALIZE_DOCUMENT
    EXPORTING
    BACKGROUND_COLOR = CL_DD_AREA=>COL_TEXTAREA.
Processing events
CALL METHOD G_GRID->LIST_PROCESSING_EVENTS
    EXPORTING
    I_EVENT_NAME = 'TOP_OF_PAGE'
    I_DYNDOC_ID = O_DYNDOC_ID.
ENDFORM.                     "CREATE_AND_INIT_ALV
FORM EVENT_TOP_OF_PAGE USING   DG_DYNDOC_ID TYPE REF TO CL_DD_DOCUMENT.
DATA : DL_TEXT(255) TYPE C. "Text
CALL METHOD DG_DYNDOC_ID->ADD_TEXT
    EXPORTING
    TEXT = 'Flight Details'
    SAP_STYLE = CL_DD_AREA=>HEADING
    SAP_FONTSIZE = CL_DD_AREA=>LARGE
    SAP_COLOR = CL_DD_AREA=>LIST_HEADING_INT.
CALL METHOD DG_DYNDOC_ID->ADD_GAP
    EXPORTING
    WIDTH = 200.
CALL METHOD O_DYNDOC_ID->ADD_PICTURE
    EXPORTING
    PICTURE_ID = 'ENJOYSAP_LOGO'.
Add new-line
CALL METHOD DG_DYNDOC_ID->NEW_LINE.
CALL METHOD DG_DYNDOC_ID->NEW_LINE.
CLEAR : DL_TEXT.
program ID
DL_TEXT = 'Program Name :'.
CALL METHOD DG_DYNDOC_ID->ADD_GAP.
CALL METHOD O_DYNDOC_ID->ADD_TEXT
    EXPORTING
    TEXT = DL_TEXT
    SAP_EMPHASIS = CL_DD_AREA=>HEADING
    SAP_COLOR = CL_DD_AREA=>LIST_HEADING_INT.
CLEAR DL_TEXT.
DL_TEXT = SY-REPID.
CALL METHOD O_DYNDOC_ID->ADD_TEXT
    EXPORTING
    TEXT = DL_TEXT
    SAP_EMPHASIS = CL_DD_AREA=>HEADING
    SAP_COLOR = CL_DD_AREA=>LIST_NEGATIVE_INV.
Add new-line
CALL METHOD DG_DYNDOC_ID->NEW_LINE.
CLEAR : DL_TEXT.
CLEAR : DL_TEXT.
program ID
DL_TEXT = 'User Name :'.
CALL METHOD DG_DYNDOC_ID->ADD_GAP.
CALL METHOD O_DYNDOC_ID->ADD_TEXT
    EXPORTING
    TEXT = DL_TEXT
    SAP_EMPHASIS = CL_DD_AREA=>HEADING
    SAP_COLOR = CL_DD_AREA=>LIST_HEADING_INT.
CLEAR DL_TEXT.
DL_TEXT = SY-UNAME.
CALL METHOD O_DYNDOC_ID->ADD_TEXT
    EXPORTING
    TEXT = DL_TEXT
    SAP_EMPHASIS = CL_DD_AREA=>HEADING
    SAP_COLOR = CL_DD_AREA=>LIST_NEGATIVE_INV.
Add new-line
CALL METHOD DG_DYNDOC_ID->NEW_LINE.
CLEAR : DL_TEXT.
Run Date
DL_TEXT = 'Run Date :'.
CALL METHOD DG_DYNDOC_ID->ADD_GAP.
CALL METHOD O_DYNDOC_ID->ADD_TEXT
    EXPORTING
    TEXT = DL_TEXT
    SAP_EMPHASIS = CL_DD_AREA=>HEADING
    SAP_COLOR = CL_DD_AREA=>LIST_HEADING_INT.
CLEAR DL_TEXT.
Move date
WRITE SY-DATUM TO DL_TEXT.
CALL METHOD O_DYNDOC_ID->ADD_TEXT
    EXPORTING
    TEXT = DL_TEXT
    SAP_EMPHASIS = CL_DD_AREA=>HEADING
    SAP_COLOR = CL_DD_AREA=>LIST_NEGATIVE_INV.
Add new-line
CALL METHOD DG_DYNDOC_ID->NEW_LINE.
CLEAR : DL_TEXT.
*Time
DL_TEXT = 'Time :'.
CALL METHOD DG_DYNDOC_ID->ADD_GAP.
CALL METHOD O_DYNDOC_ID->ADD_TEXT
    EXPORTING
    TEXT = DL_TEXT
    SAP_EMPHASIS = CL_DD_AREA=>HEADING
    SAP_COLOR = CL_DD_AREA=>LIST_HEADING_INT.
CLEAR DL_TEXT.
Move time
WRITE SY-UZEIT TO DL_TEXT.
CALL METHOD O_DYNDOC_ID->ADD_TEXT
    EXPORTING
    TEXT = DL_TEXT
    SAP_EMPHASIS = CL_DD_AREA=>HEADING
    SAP_COLOR = CL_DD_AREA=>LIST_NEGATIVE_INV.
Add new-line
CALL METHOD DG_DYNDOC_ID->NEW_LINE.
PERFORM DISPLAY.
ENDFORM.                    " EVENT_TOP_OF_PAGE
FORM DISPLAY.
Creating html control
IF O_HTML_CNTRL IS INITIAL.
    CREATE OBJECT O_HTML_CNTRL
         EXPORTING
              PARENT    = O_PARENT_TOP.
ENDIF.
CALL METHOD O_DYNDOC_ID->MERGE_DOCUMENT.
O_DYNDOC_ID->HTML_CONTROL = O_HTML_CNTRL.
Display document
CALL METHOD O_DYNDOC_ID->DISPLAY_DOCUMENT
    EXPORTING
      REUSE_CONTROL      = 'X'
      PARENT             = O_PARENT_TOP
    EXCEPTIONS
      HTML_DISPLAY_ERROR = 1.
IF SY-SUBRC NE 0.
MESSAGE I999 WITH 'Error in displaying top-of-page'(036).
ENDIF.
ENDFORM.                    " display
Regards, Dieter

Problem with ALV GRID layout

Hi friends
really need yours help
I have to show an ALV grid with checkbox as first column.
This checkbox is based on internal table condition may be enabled or disabled, other columns are disabled.
I used the structure 'ZMESD' where i decleared that checkbox field.
I called function module:
CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
 EXPORTING
 i_structure_name = 'ZMESD'
 i_bypassing_buffer = 'X'
 CHANGING
 ct_fieldcat = it_fieldcat[].
x_fieldcat-seltext_s = 'CheckBox'.
x_fieldcat-checkbox = 'X'. " Display this field as a
x_fieldcat-edit = 'X'. " You can specify the width of a
MODIFY it_fieldcat FROM x_fieldcat TRANSPORTING seltext_s checkbox
edit WHERE fieldname = 'CHK' .
Now the problem is, I want to use
"REUSE_ALV_GRID_DISPLAY", where I am using
is_layout = x_layout
and value of x_layout is filled based on condition as follows
LOOP AT gt_grid INTO ls_outtab.
 DATA l_tabix TYPE i.
 IF ls_outtab-status = 'Reserved'. "This is the condition for which checkbox is disabled
 l_tabix = sy-tabix.
 REFRESH lt_edit.
 ls_edit-fieldname = 'CHK'.
 ls_edit-style = cl_gui_alv_grid=>mc_style_disabled.
 ls_edit-style2 = space.
 ls_edit-style3 = space.
 ls_edit-style4 = space.
 ls_edit-maxlen = 10.
 APPEND ls_edit TO lt_edit.
 APPEND LINES OF lt_edit TO ls_outtab-handle_style.
 MODIFY gt_grid INDEX l_tabix FROM ls_outtab TRANSPORTING
 handle_style .
 ENDIF.
ENDLOOP.
Now I finally i m using:
x_layout-lights_tabname = 'handle_style'.
but its giving dump.
I am sure its only because i havent found the corrosponding X_layout field for 'handle_event'.
Please help me, as its urgent.
Points ll be awarded for sure.

Thank you friends
I got the answer.
I used function module
CALL FUNCTION 'LVC_FIELDCATALOG_MERGE'
 EXPORTING
I_BUFFER_ACTIVE =
 i_structure_name = 'ZMESD'
I_CLIENT_NEVER_DISPLAY = 'X'
 i_bypassing_buffer = 'X'
I_INTERNAL_TABNAME =
 CHANGING
 ct_fieldcat = it_fieldcat[].
EXCEPTIONS
INCONSISTENT_INTERFACE = 1
PROGRAM_ERROR = 2
OTHERS = 3
Its solved the problem

Problem with ALV Grid Hotspot

Hi ,
I am having a problem with Hotspot <<removed_by_moderator>>
I need to Open up SE16 and need to skip the first screen of the Table 'ZLE_WH01' and display the selection screen with the MATNR passed from my ALV Report.
I tried using Call Transaction and Submit commands, but couldn't achive my target.
when I used SUBMIT and pass the MATNR Value to the SE16 selection screen for the corresponding Table, the value is appearing in the MATNR field of the Selection screen but the Execute button is not working.
When I try the Call Transaction Method, the value is not capturing in the 2nd screen. Table name is capturing in the first screen.
Kindly advice me how to resolve this issue.
Regards,
Srinivas
Edited by: Vijay Babu Dudla on Feb 25, 2009 11:08 PM

For se16
Use fm SE16N_INTERFACE
a®

Problem with ALV Grid (created via FM)

Dear forumers,
When double-clicking on any data row of an ALV grid, the following runtime error occurs:
Runtime error: PERFORM_NOT_FOUND
Exception: CX_SY_DYN_CALL_ILLEGAL_FORM
Short Text
=======
Call (PERFORM) to a non-existent routine.
What happened?
==========
There exist various options:
Error in the ABAP Application Program
The current ABAP program "SAPLSLVC_FULLSCREEN" had to be terminated
because it has come across a statement that unfortunately cannot be executed.
or
Error in the SAP kernel.
The current ABAP "SAPLSLVC_FULLSCREEN" program had to be terminated because the
ABAP processor detected an internal system error.
How can I resolve this error for an ALV grid? The ALV grid is created via the FM, 'REUSE_ALV_GRID_DISPLAY' and the field catalog is built via the FM, 'REUSE_ALV_FIELDCATALOG_MERGE'.
Please help. Thanks so much.
I also noticed in the Data Browser, SE16 - that if the table contents are displayed in an ALV Grid, double-clicking on any data row will not generate the same error. It also has an additional column on the leftmost to aid the data row selection. Any other ideas on this?
Edited by: Deborah Tan on Jun 23, 2010 8:16 AM

Hi Deborah,
While calling 'REUSE_ALV_GRID_DISPLAY', You should have also passed the parameter I_CALLBACK_USER_COMMAND with any form name, or You have passed table IT_EVENTS with form name 'USER_COMMAND' with a form mentioned in it.
If You do not require any user interaction on your ALV, comment the line where I_CALLBACK_USER_COMMAND is passed, or delete the line for 'USER_COMMAND' from the table that is passed in IT_EVENTS.
Else, if You require user interaction, You need to code a form for user command in your program as FORM_USER_COMMAND USING OK_CODE SELFIELD.
Remember the name of the form (for e.g. 'FORM_USER_COMMAND') should be the same that you pass in CALLBACKUSER_COMMAND or the one in 'USER_COMMAND' in table for IT_EVENTS.
Regards,
Birendra

Background task problem with alv grid display

Hello !
I have a problem when executing my program in background.
In foreground I have no problem, my ALV appears. In the background I have a dump.
The current ABAP program "SAPLKKBL" had to be terminated because one of the statements could not be executed.
I use the function module 'REUSE_ALV_GRID_DISPLAY'
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
 EXPORTING
 i_callback_program = gd_repid
 i_callback_user_command = 'F533_USER_COMMAND'
 is_layout = gd_layout
 it_fieldcat = fieldcatalog[]
 it_special_groups = i_fgroup[]
 i_save = 'X'
 it_sort = gd_sort
 i_buffer_active = ' '
 i_callback_pf_status_set = 'F534_SET_PF_STATUS'
 TABLES
 t_outtab = mytab
 EXCEPTIONS
 program_error = 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.
I don't understand where the problem is. Please help me.
Thank you.

I love replying to old threads:
Try this link
http://scn.sap.com/people/prashant.patil12/blog/2007/02/20/displaying-alv-grid-in-background-job

Problem with ALV Grid Display screen Back Button

Dear Friends ,
I have an ALV Grid Display,Here am facing a problem for my 'Back' button,i haven't defined any PF Status and is using the standard one.But after the Display when i press Back Button a blank Screen is appearing n then again i have to press back button to go to my Selection Screen.
Please Suggest if i have to take care of something else.
I want my Selection Screen when i press Back on my Display Screen.
DATA: IT_FIELDCAT TYPE SLIS_T_FIELDCAT_ALV,
 FIELDCAT TYPE SLIS_FIELDCAT_ALV.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
 EXPORTING
 I_BYPASSING_BUFFER =
 I_BUFFER_ACTIVE =
 I_INTERFACE_CHECK = ' '
 I_CALLBACK_PROGRAM = 'ZRMMPD01A'
 I_CALLBACK_PF_STATUS_SET = ' '
 I_CALLBACK_USER_COMMAND = ' '
 I_CALLBACK_TOP_OF_PAGE = ' '
 I_CALLBACK_HTML_TOP_OF_PAGE = ' '
 I_CALLBACK_HTML_END_OF_LIST = ' '
 I_STRUCTURE_NAME =
 I_BACKGROUND_ID = ' '
 I_GRID_TITLE =
 I_GRID_SETTINGS =
 IS_LAYOUT = I_LAYOUT
 IT_FIELDCAT = IT_FIELDCAT
 IT_EXCLUDING =
 IT_SPECIAL_GROUPS =
 IT_SORT =
 IT_FILTER =
 IS_SEL_HIDE =
 I_DEFAULT = 'X'
 I_SAVE = ' '
 IS_VARIANT =
 IT_EVENTS =
 IT_EVENT_EXIT =
 IS_PRINT =
 IS_REPREP_ID =
 I_SCREEN_START_COLUMN = 0
 I_SCREEN_START_LINE = 0
 I_SCREEN_END_COLUMN = 0
 I_SCREEN_END_LINE = 0
 IMPORTING
 E_EXIT_CAUSED_BY_CALLER =
 ES_EXIT_CAUSED_BY_USER =
 TABLES
 T_OUTTAB = IT_FINAL
 EXCEPTIONS
 PROGRAM_ERROR = 1
 OTHERS = 2
Thanks and Regards,
Ashwini

Hi Vijay ,
No i dont have any write statement in my proggram.
Here it is
REPORT ZRMMPD01A NO STANDARD PAGE HEADING.
TABLES : EQUI,SER03,MKPF,OBJK.
TYPE-POOLS : SLIS.
DATA IT_EQUI LIKE EQUI OCCURS 0 WITH HEADER LINE.
DATA IT_OBJK LIKE OBJK OCCURS 0 WITH HEADER LINE..
DATA IT_SER03 LIKE SER03 OCCURS 0 WITH HEADER LINE.
DATA IT_MKPF LIKE MKPF OCCURS 0 WITH HEADER LINE .
DATA : BEGIN OF IT_DISPLAY OCCURS 0,
 MATNR LIKE EQUI-MATNR,
 SERNR LIKE EQUI-SERNR,
 BWART LIKE SER03-BWART,
 WERK LIKE SER03-WERK,
 CHARGE LIKE SER03-CHARGE,
 LAGERORT LIKE SER03-LAGERORT,
 MBLNR LIKE SER03-MBLNR,
 MJAHR LIKE SER03-MJAHR,
 ZEILE LIKE SER03-ZEILE,
 BUDAT LIKE MKPF-BUDAT,
 BKTXT LIKE MKPF-BKTXT,
 USNAM LIKE MKPF-USNAM,
 XBLNR LIKE MKPF-XBLNR,
 END OF IT_DISPLAY.
DATA : WA_DISPLAY LIKE IT_DISPLAY.
DATA IT_FINAL LIKE IT_DISPLAY OCCURS 0 WITH HEADER LINE.
DATA IT_TEMP LIKE IT_DISPLAY OCCURS 0 WITH HEADER LINE.
DATA: IT_FIELDCAT TYPE SLIS_T_FIELDCAT_ALV,
 FIELDCAT TYPE SLIS_FIELDCAT_ALV.
DATA :I_LAYOUT TYPE SLIS_LAYOUT_ALV,
 I_EVENTS TYPE SLIS_T_EVENT.
SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-001.
SELECT-OPTIONS : S_MATNR FOR EQUI-MATNR MATCHCODE OBJECT MCD,"OBLIGATORY
 S_SERNR FOR EQUI-SERNR, "MATCHCODE OBJECT MCD OBLIGATORY
 S_MBLNR FOR SER03-MBLNR MATCHCODE OBJECT MCD,
 S_BWART FOR SER03-BWART MATCHCODE OBJECT MCD,
 S_WERK FOR SER03-WERK MATCHCODE OBJECT MCD,
 S_LAGET FOR SER03-LAGERORT MATCHCODE OBJECT MCD,
 S_BUDAT FOR MKPF-BUDAT MATCHCODE OBJECT MCD,
 S_XBLNR FOR MKPF-XBLNR MATCHCODE OBJECT MCD.
SELECTION-SCREEN END OF BLOCK B1.
SELECTION-SCREEN BEGIN OF BLOCK B2 WITH FRAME TITLE TEXT-002.
PARAMETERS : R1 RADIOBUTTON GROUP G1 DEFAULT 'X',
 R2 RADIOBUTTON GROUP G1.
SELECTION-SCREEN END OF BLOCK B2.
START-OF-SELECTION.
*Fetch Data.
PERFORM GET_DATA.
*Fill Display Fields.
PERFORM FILL_TABLE.
*Segregate data according to radio button selection.
PERFORM SELECT_CONDITION.
*Fill The Feild catalog.
PERFORM FIELD_CATALOG.
*Display Output.
PERFORM OUTPUT_DISPLAY..
*& Form GET_DATA
 text
--> p1 text
<-- p2 text
FORM GET_DATA.
SELECT * FROM EQUI INTO TABLE IT_EQUI
 WHERE MATNR IN S_MATNR
 AND SERNR IN S_SERNR.
SELECT * FROM OBJK INTO TABLE IT_OBJK
FOR ALL ENTRIES IN IT_EQUI
WHERE EQUNR = IT_EQUI-EQUNR.
SELECT * FROM SER03 INTO TABLE IT_SER03
FOR ALL ENTRIES IN IT_OBJK
WHERE OBKNR = IT_OBJK-OBKNR
AND MBLNR IN S_MBLNR
AND BWART IN S_BWART
AND WERK IN S_WERK
AND LAGERORT IN S_LAGET.
SELECT * FROM MKPF INTO TABLE IT_MKPF
FOR ALL ENTRIES IN IT_SER03
WHERE MBLNR = IT_SER03-MBLNR
AND BUDAT IN S_BUDAT
AND XBLNR IN S_XBLNR.
ENDFORM. " GET_DATA
*& Form FILL_TABLE
 text
--> p1 text
<-- p2 text
FORM FILL_TABLE.
LOOP AT IT_EQUI.
 LOOP AT IT_OBJK.
 IF IT_OBJK-EQUNR <> IT_EQUI-EQUNR.
 SKIP.
 ELSE.
 READ TABLE IT_SER03 WITH KEY OBKNR = IT_OBJK-OBKNR.
 IF SY-SUBRC = 0.
 WA_DISPLAY-MATNR = IT_EQUI-MATNR.
 WA_DISPLAY-SERNR = IT_EQUI-SERNR.
 WA_DISPLAY-BWART = IT_SER03-BWART.
 WA_DISPLAY-WERK = IT_SER03-WERK.
 WA_DISPLAY-CHARGE = IT_SER03-CHARGE.
 WA_DISPLAY-LAGERORT = IT_SER03-LAGERORT.
 WA_DISPLAY-MBLNR = IT_SER03-MBLNR.
 WA_DISPLAY-MJAHR = IT_SER03-MJAHR.
 WA_DISPLAY-ZEILE = IT_SER03-ZEILE.
 READ TABLE IT_MKPF WITH KEY MBLNR = IT_SER03-MBLNR.
 IF SY-SUBRC = 0.
 WA_DISPLAY-BUDAT = IT_MKPF-BUDAT.
 WA_DISPLAY-BKTXT = IT_MKPF-BKTXT.
 WA_DISPLAY-USNAM = IT_MKPF-USNAM.
 WA_DISPLAY-XBLNR = IT_MKPF-XBLNR.
 ENDIF.
 ENDIF.
 ENDIF.
 IF NOT WA_DISPLAY IS INITIAL.
 APPEND WA_DISPLAY TO IT_DISPLAY.
 CLEAR WA_DISPLAY.
 ENDIF.
 ENDLOOP.
ENDLOOP.
ENDFORM. " FILL_TABLE
*& Form FIELD_CATALOG
 text
--> p1 text
<-- p2 text
FORM FIELD_CATALOG.
FIELDCAT-TABNAME = 'IT_DISPLAY'.
FIELDCAT-FIELDNAME = 'MATNR'.
FIELDCAT-SELTEXT_M = 'Material Number'.
FIELDCAT-OUTPUTLEN = 18.
APPEND FIELDCAT TO IT_FIELDCAT.
CLEAR FIELDCAT.
FIELDCAT-TABNAME = 'IT_DISPLAY'.
FIELDCAT-FIELDNAME = 'SERNR'.
FIELDCAT-SELTEXT_M = 'Serial number'.
FIELDCAT-OUTPUTLEN = 18.
APPEND FIELDCAT TO IT_FIELDCAT.
CLEAR FIELDCAT.
FIELDCAT-TABNAME = 'IT_DISPLAY'.
FIELDCAT-FIELDNAME = 'MBLNR'.
FIELDCAT-SELTEXT_L = 'Number of material document'.
FIELDCAT-OUTPUTLEN = 18.
APPEND FIELDCAT TO IT_FIELDCAT.
CLEAR FIELDCAT.
FIELDCAT-TABNAME = 'IT_DISPLAY'.
FIELDCAT-FIELDNAME = 'BWART'.
FIELDCAT-SELTEXT_M = 'Movement type'.
FIELDCAT-OUTPUTLEN = 18.
APPEND FIELDCAT TO IT_FIELDCAT.
CLEAR FIELDCAT.
FIELDCAT-TABNAME = 'IT_DISPLAY'.
FIELDCAT-FIELDNAME = 'WERK'.
FIELDCAT-SELTEXT_M = 'Plant'.
FIELDCAT-OUTPUTLEN = 5.
APPEND FIELDCAT TO IT_FIELDCAT.
CLEAR FIELDCAT.
FIELDCAT-TABNAME = 'IT_DISPLAY'.
FIELDCAT-FIELDNAME = 'CHARGE'.
FIELDCAT-SELTEXT_M = 'Batch number'.
FIELDCAT-OUTPUTLEN = 18.
APPEND FIELDCAT TO IT_FIELDCAT.
CLEAR FIELDCAT.
FIELDCAT-TABNAME = 'IT_DISPLAY'.
FIELDCAT-FIELDNAME = 'LAGERORT'.
FIELDCAT-SELTEXT_M = 'Storage Location'.
FIELDCAT-OUTPUTLEN = 18.
APPEND FIELDCAT TO IT_FIELDCAT.
CLEAR FIELDCAT.
FIELDCAT-TABNAME = 'IT_DISPLAY'.
FIELDCAT-FIELDNAME = 'MJAHR'.
FIELDCAT-SELTEXT_M = 'Material doc. year'.
FIELDCAT-OUTPUTLEN = 18.
APPEND FIELDCAT TO IT_FIELDCAT.
CLEAR FIELDCAT.
FIELDCAT-TABNAME = 'IT_DISPLAY'.
FIELDCAT-FIELDNAME = 'ZEILE'.
FIELDCAT-SELTEXT_L = 'Item in material document'.
FIELDCAT-OUTPUTLEN = 18.
APPEND FIELDCAT TO IT_FIELDCAT.
CLEAR FIELDCAT.
FIELDCAT-TABNAME = 'IT_DISPLAY'.
FIELDCAT-FIELDNAME = 'BUDAT'.
FIELDCAT-SELTEXT_L = 'Posting date in the document'.
FIELDCAT-OUTPUTLEN = 10.
APPEND FIELDCAT TO IT_FIELDCAT.
CLEAR FIELDCAT.
FIELDCAT-TABNAME = 'IT_DISPLAY'.
FIELDCAT-FIELDNAME = 'BKTXT'.
FIELDCAT-SELTEXT_L = 'Document header text'.
FIELDCAT-OUTPUTLEN = 25.
APPEND FIELDCAT TO IT_FIELDCAT.
CLEAR FIELDCAT.
FIELDCAT-TABNAME = 'IT_DISPLAY'.
FIELDCAT-FIELDNAME = 'USNAM'.
FIELDCAT-SELTEXT_M = 'User name'.
FIELDCAT-OUTPUTLEN = 15.
APPEND FIELDCAT TO IT_FIELDCAT.
CLEAR FIELDCAT.
FIELDCAT-TABNAME = 'IT_DISPLAY'.
FIELDCAT-FIELDNAME = 'XBLNR'.
FIELDCAT-SELTEXT_L = 'Reference document number'.
FIELDCAT-OUTPUTLEN = 25.
APPEND FIELDCAT TO IT_FIELDCAT.
CLEAR FIELDCAT.
ENDFORM. " FIELD_CATALOG
*& Form DISPLAY_OUTPUT
 text
--> p1 text
<-- p2 text
FORM OUTPUT_DISPLAY.
IF R1 = 'X'.
 CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
 EXPORTING
 I_CALLBACK_PROGRAM = 'ZRMMPD01A'
 IS_LAYOUT = I_LAYOUT
 IT_FIELDCAT = IT_FIELDCAT
 TABLES
 T_OUTTAB = IT_DISPLAY
 EXCEPTIONS
 PROGRAM_ERROR = 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.
 REFRESH IT_DISPLAY.
 CLEAR IT_DISPLAY.
ELSEIF R2 = 'X'.
 CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
 EXPORTING
 I_CALLBACK_PROGRAM = 'ZRMMPD01A'
 IS_LAYOUT = I_LAYOUT
 IT_FIELDCAT = IT_FIELDCAT
 TABLES
 T_OUTTAB = IT_FINAL
 EXCEPTIONS
 PROGRAM_ERROR = 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.
 REFRESH IT_DISPLAY.
 CLEAR IT_DISPLAY.
ENDIF.
ENDFORM. " DISPLAY_OUTPUT
*& Form SELECT_CONDITION
 text
--> p1 text
<-- p2 text
FORM SELECT_CONDITION.
IF R2 = 'X'.
 CLEAR WA_DISPLAY.
 SORT IT_DISPLAY BY MATNR SERNR MBLNR ZEILE.
 DELETE ADJACENT DUPLICATES FROM IT_DISPLAY.
 LOOP AT IT_DISPLAY WHERE ZEILE = '0002'.
 READ TABLE IT_DISPLAY WITH KEY MATNR = IT_DISPLAY-MATNR
 SERNR = IT_DISPLAY-SERNR ZEILE = '0001'.
 IF SY-SUBRC = 0.
 DELETE IT_DISPLAY.
 ENDIF.
 ENDLOOP.
 SORT IT_DISPLAY BY MATNR SERNR BWART MBLNR.
 DELETE ADJACENT DUPLICATES FROM IT_DISPLAY.
 LOOP AT IT_DISPLAY.
 IF WA_DISPLAY IS INITIAL.
 WA_DISPLAY = IT_DISPLAY.
 ENDIF.
 LOOP AT IT_DISPLAY WHERE MATNR = WA_DISPLAY-MATNR
 AND SERNR = WA_DISPLAY-SERNR.
 IF IT_DISPLAY-BUDAT > WA_DISPLAY-BUDAT.
 WA_DISPLAY = IT_DISPLAY.
 ELSE.
 DELETE IT_DISPLAY.
 ENDIF.
 ENDLOOP.
 APPEND WA_DISPLAY TO IT_TEMP.
 CLEAR WA_DISPLAY.
 ENDLOOP.
 DELETE ADJACENT DUPLICATES FROM IT_TEMP.
 IF NOT IT_TEMP[] IS INITIAL.
 IT_FINAL[] = IT_TEMP[].
 ENDIF.
ENDIF.
ENDFORM. " SELECT_CONDITION
Regards,
Ashwini

New Problem with ALV grid

Hi,
I am working an ALV grid in my report. after executing my report ALV grid is displaying all columns with all records. But if i am trying to see print priview or if i am trying to do export to spreadsheet, many columns are missing & records also jumbling from their exact places.
Why it is coming like this? can u help me. .
Thanks
vishnu

Hi,
if i am trying to do export to spreadsheet, many columns are missing & records also jumbling from their exact places.
Regarding on your query, You will write a query as select query
I.e.., select a query corresponding coloumns and reterive the data
Then check through an select corresponding coloums
Then solved your problem.
Regards,
Sekhar

Problems with alv-grid

hello all,
i've got a little problem with the output of an internal table with the ALV Grid.
i have made the declaration of my internal table (itab) with DATA: Begin of itab... and i have build my own fieldcatalog.
the output of the fieldcatalog is correct but i don't get the results of my itab shown.
it only shows me the numbers of lines in my itab but not the content.
for this im using 'REUSE_ALV_FIELDCATALOG_MERGE' and 'REUSE_ALV_GRID_DISPLAY'
*ALV-Grid
CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
 EXPORTING
 i_program_name = sy-repid
 i_internal_tabname = 'itab'
 i_structure_name = 'itab'
 i_client_never_display
 i_inclname = sy-repid
 CHANGING
 ct_fieldcat = feldkatalog_itab
 EXCEPTIONS
 inconsistent_interface = 1
 program_error = 2
 OTHERS = 3.
*ALV call
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
 EXPORTING
 i_callback_program = sy-repid
 it_fieldcat = feldkatalog_itab
 i_structure_name = 'itab'
 it_events = event_itab
 TABLES
 t_outtab = itab[]
 EXCEPTIONS
 program_error = 1
 OTHERS = 2.
when i debug my programm the lines of the itab are filled.
thanks and regards
Ayse
REPORT z_test_auswertung.
G L O B A L I N T E R N A L T A B L E S
DATA: BEGIN OF itab OCCURS 100,
 status TYPE dimaiobpar-zstatus,
 rtyp TYPE dimaiobpar-zrtyp,
 zahlweg TYPE dimaiobpar-ezawe_x,
 a_status TYPE i,
 a_rtyp TYPE i,
 a_partner TYPE i,
 a_vertraege TYPE i,
 END OF itab .
G L O B A L D A T A
DATA: ok_code LIKE sy-ucomm,
 wa_test_tab LIKE dimaiobpar,
 my_title TYPE lvc_title.
TYPE-POOLS: slis.
DATA: feldkatalog_itab TYPE slis_t_fieldcat_alv,
 wa_feldkatalog TYPE slis_fieldcat_alv,
 event_itab TYPE slis_t_event,
 header_itab TYPE slis_t_listheader,
 wa_header TYPE slis_listheader.
DATA:
mycontainer TYPE scrfname VALUE 'BCALV_VARIANTS_0100_C1',
my_grid TYPE REF TO cl_gui_alv_grid,
my_custom_container TYPE REF TO cl_gui_custom_container.
DATA: t_tab LIKE dimaiobpar.
*selection-screen
SELECTION-SCREEN: SKIP, BEGIN OF BLOCK test WITH FRAME TITLE text-010.
SELECT-OPTIONS: partner FOR t_tab-partner,
 astatus FOR t_tab-zstatus.
SELECTION-SCREEN END OF BLOCK test.
*Radiobutton
SELECTION-SCREEN: SKIP, BEGIN OF BLOCK test2 WITH FRAME TITLE text-020.
PARAMETERS: radio1 RADIOBUTTON GROUP test DEFAULT 'X',
 radio2 RADIOBUTTON GROUP test,
 radio3 RADIOBUTTON GROUP test,
 radio4 RADIOBUTTON GROUP test,
 rafio5 RADIOBUTTON GROUP test.
SELECTION-SCREEN END OF BLOCK test2.
S T A R T - O F - S E L E C T I O N.
START-OF-SELECTION.
PERFORM select_data.
CALL SCREEN 100.
DATA ttab LIKE itab.
MOVE itab TO ttab.
Feldkatalog fuellen.
PERFORM feldkatalog_fuellen .
Feldkatalog übergeben
PERFORM alv_feldkatalog.
ALV mit daten füllen
PERFORM alv_füllen.
END-OF-SELECTION.
SORT itab.
my_title = 'Auswertung Dimaiobpar'.
PERFORM exit_program.
 FORM alv_feldkatalog *
FORM alv_feldkatalog.
CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
 EXPORTING
 i_program_name = sy-repid
 i_internal_tabname = 'ITAB[]'
 i_structure_name = 'TTAB'
 i_client_never_display
 i_inclname = 'ITAB[]'
 i_bypassing_buffer = 'X'
 CHANGING
 ct_fieldcat = FELDKATALOG_ITAB
 EXCEPTIONS
 program_error = 1
 OTHERS = 2.
ENDFORM.
 FORM alv_füllen *
FORM alv_füllen .
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
 EXPORTING
 i_callback_program = sy-repid
 i_grid_title = my_title
 it_fieldcat = FELDKATALOG_ITAB
 i_structure_name = 'ITAB'
 it_events = event_itab
 TABLES
 t_outtab = itab
 EXCEPTIONS
 program_error = 1
 OTHERS = 2.
ENDFORM.
 FORM EXIT_PROGRAM *
FORM exit_program.
CALL METHOD G_CUSTOM_CONTAINER->FREE.
CALL METHOD CL_GUI_CFW=>FLUSH.
LEAVE PROGRAM.
ENDFORM.
 FORM feldkatalog_fuellen *
FORM feldkatalog_fuellen.
IF radio1 = 'X'.
 CLEAR wa_feldkatalog.
 wa_feldkatalog-fieldname = 'status'.
 wa_feldkatalog-seltext_m = 'Status'.
 APPEND wa_feldkatalog TO feldkatalog_itab.
 CLEAR wa_feldkatalog.
 wa_feldkatalog-fieldname = 'rtyp'.
 wa_feldkatalog-seltext_m = 'RTyp'.
 APPEND wa_feldkatalog TO feldkatalog_itab.
 CLEAR wa_feldkatalog.
 wa_feldkatalog-fieldname = 'a_rtyp'.
 wa_feldkatalog-seltext_m = 'Anzahl RTyp'.
 APPEND wa_feldkatalog TO feldkatalog_itab.
ELSEIF radio2 = 'X'.
 CLEAR wa_feldkatalog.
 wa_feldkatalog-fieldname = 'rtyp'.
 wa_feldkatalog-seltext_m = 'RTyp'.
 APPEND wa_feldkatalog TO feldkatalog_itab.
 CLEAR wa_feldkatalog.
 wa_feldkatalog-fieldname = 'a_status'.
 wa_feldkatalog-seltext_m = 'Anzahl Status'.
 APPEND wa_feldkatalog TO feldkatalog_itab.
ELSEIF radio3 = 'X'.
 CLEAR wa_feldkatalog.
 wa_feldkatalog-fieldname = 'status'.
 wa_feldkatalog-seltext_m = 'Status'.
 APPEND wa_feldkatalog TO feldkatalog_itab.
 CLEAR wa_feldkatalog.
 wa_feldkatalog-fieldname = 'rtyp'.
 wa_feldkatalog-seltext_m = 'RTyp'.
 APPEND wa_feldkatalog TO feldkatalog_itab.
 CLEAR wa_feldkatalog.
 wa_feldkatalog-fieldname = 'a_vertraege'.
 wa_feldkatalog-seltext_m = 'Anzahl Vertraege'.
 APPEND wa_feldkatalog TO feldkatalog_itab.
ELSEIF radio4 = 'X'.
 CLEAR wa_feldkatalog.
 wa_feldkatalog-fieldname = 'status'.
 wa_feldkatalog-seltext_m = 'Status'.
 APPEND wa_feldkatalog TO feldkatalog_itab.
 CLEAR wa_feldkatalog.
 wa_feldkatalog-fieldname = 'rtyp'.
 wa_feldkatalog-seltext_m = 'RTyp'.
 APPEND wa_feldkatalog TO feldkatalog_itab.
 CLEAR wa_feldkatalog.
 wa_feldkatalog-fieldname = 'a_gpartner'.
 wa_feldkatalog-seltext_m = 'Anzahl GPartner'.
 APPEND wa_feldkatalog TO feldkatalog_itab.
ELSE.
 CLEAR wa_feldkatalog.
 wa_feldkatalog-fieldname = 'status'.
 wa_feldkatalog-seltext_m = 'Status'.
 APPEND wa_feldkatalog TO feldkatalog_itab.
 CLEAR wa_feldkatalog.
 wa_feldkatalog-fieldname = 'rtyp'.
 wa_feldkatalog-seltext_m = 'RTyp'.
 APPEND wa_feldkatalog TO feldkatalog_itab.
 CLEAR wa_feldkatalog.
 wa_feldkatalog-fieldname = 'zahlweg'.
 wa_feldkatalog-seltext_m = 'Zahlweg'.
 APPEND wa_feldkatalog TO feldkatalog_itab.
 CLEAR wa_feldkatalog.
 wa_feldkatalog-fieldname = 'a_gpartner'.
 wa_feldkatalog-seltext_m = 'Anzahl GPartner'.
 APPEND wa_feldkatalog TO feldkatalog_itab.
ENDIF.
ENDFORM.
 FORM select_data *
FORM select_data.
IF radio1 = 'X' .
 WRITE / 'Radiobutton1: Rechungstypen je Satus'.
WRITE / 'Status, Rtyp, Anzahl-Rtyp'.
 ULINE.
 SELECT
 zstatus AS status
 zrtyp AS rtyp
 COUNT( DISTINCT zrtyp ) AS a_rtyp
 INTO CORRESPONDING FIELDS OF itab
 FROM dimaiobpar
 WHERE
 insobject LIKE 'V%' AND
 partner IN partner AND
 zstatus IN astatus
 GROUP BY ZSTATUS zrtyp
 ORDER BY zstatus.
 APPEND itab.
 WRITE: / itab.
 ENDSELECT.
ELSEIF radio2 = 'X'.
 WRITE / 'Radiobutton2: Status je Rechungstyp'.
 WRITE /.
 SELECT
 zrtyp AS rtyp
 COUNT( DISTINCT zstatus ) AS a_status
 INTO CORRESPONDING FIELDS OF itab
 FROM dimaiobpar
 WHERE
 insobject LIKE 'V%' AND
 partner IN partner AND
 zstatus IN astatus
 GROUP BY ZRTYP
 ORDER BY zrtyp.
 APPEND itab.
 WRITE: / itab-rtyp, itab-a_status.
 ENDSELECT.
ELSEIF radio3 = 'X'.
 WRITE / 'Radiobutton3: Anzahl Verträge je Status und Rtyp'.
 WRITE /.
 SELECT
 zstatus AS status
 zrtyp AS rtyp
 COUNT( DISTINCT insobject ) AS a_vertraege
 INTO CORRESPONDING FIELDS OF itab
 FROM dimaiobpar
 WHERE
 insobject LIKE 'V%' AND
 partner IN partner AND
 zstatus IN astatus
 GROUP BY ZSTATUS zrtyp
 ORDER BY zstatus.
 APPEND itab.
 WRITE: / itab-status, itab-rtyp, itab-a_vertraege.
 ENDSELECT.
ELSEIF radio4 ='X'.
 WRITE: / 'Radiobutton4: Anzahl GPartner je Status und RTyp'.
 WRITE: /.
 SELECT
 zstatus AS status
 zrtyp AS rtyp
 COUNT( DISTINCT partner ) AS a_partner
 INTO CORRESPONDING FIELDS OF itab
 FROM dimaiobpar
 WHERE
 insobject LIKE 'V%' AND
 partner IN partner AND
 zstatus IN astatus
 GROUP BY ZSTATUS zrtyp
 ORDER BY zstatus zrtyp.
 APPEND itab.
 WRITE: / itab-status, itab-rtyp, itab-a_partner.
 ENDSELECT.
ELSE.
 WRITE / 'Radiobutton5: Anzahl Kunden nach Zahlweg'.
 WRITE /.
 SELECT
 zstatus AS status
 zrtyp AS rtyp
 ezawe_x AS zahlweg
 COUNT( DISTINCT partner ) AS a_partner
 INTO CORRESPONDING FIELDS OF itab
 FROM dimaiobpar
 WHERE
 insobject LIKE 'V%' AND
 partner IN partner AND
 zstatus IN astatus AND
 ezawe_x IN ('E', 'F', space)
 GROUP BY ZSTATUS zrtyp EZAWE_X
 ORDER BY zstatus zrtyp.
 APPEND itab.
 WRITE: / itab-status, itab-rtyp, itab-zahlweg, itab-a_partner
 ENDSELECT.
ENDIF.
APPEND itab.
ENDFORM=

Hi,
Make itab into capital letters as below
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
i_callback_program = sy-repid
it_fieldcat = feldkatalog_itab
i_structure_name = 'ITAB'
* it_events = event_itab
TABLES
t_outtab = itab[]
EXCEPTIONS
program_error = 1
OTHERS = 2.
Reward for helpful answers

Problem with ALV Grid display

Hi,
I have developed ALV Grid Report. It is working fine.
But while i am coming from alv grid display to program
by pressing BACK button it is showing one more screen
which is empty. Again I press back button it is coming to
selection screen. I don't want that empty screen.What is
the problem. Can u help me in this regard.?
Thanks
Narasimha

hi
under the usercommand of back button use Exit Statement
like
At user-comand
IF sy-ucom = 'Back'
EXIT
ENdif.
Cheers
Snehi

Problem in ALV Grid control in selecting multiple rows.

Dear All,
I am using ALV grid, in that first column is sel field user will select record and he press the customized button for one record it is working fine, but user unable to select multiple records without using CTRL key, and i used HOTSPOT on LIFNR field in this case when ever i ampressing LIFNR field it is takunf Fcode as &IC1 instead of LIFNR, i tried to solve this but i coudn;t succeded, please help me out in this .
Regards,
Madhu srujan.P
Edited by: Chinnu on Apr 9, 2010 5:26 PM
Edited by: Chinnu on Apr 9, 2010 5:30 PM

I assume the first column contains the standard selection field of the ALV grid.
To enable the proper method of seletion, you need to pass the appropriate SEL_MODE in the your layout structure:
SEL_MODE is either SPACE, A, B, C or D.
Google for ALV grid PDF and you'll find some documentation on ALV grids in general.

Problem with alv grid control editable

Similar Messages

Maybe you are looking for