URGENT..DISPLAY IN ALV USING SALV...

im usingg salv class for alv display .....in that if any header details are repeating say for ex equipment,equipment description like that about 10 fields related to equipment...., i need to show only one in the alv(the first record of that group)..this should be done without sort function bcoz sorting cannot be used since an sorting with one key field.alreday done...kindly reply....rewards will be given

Hi,
Please refer to the code below:
      call function 'REUSE_ALV_GRID_DISPLAY'
        exporting
          i_bypassing_buffer       = gs_test-bypassing_buffer
          i_buffer_active          = gs_test-buffer_active
          i_callback_program       = g_repid
          i_callback_pf_status_set = 'F01_ALV_EVENT_PF_STATUS_SET'
          i_callback_user_command = 'F01_ALV_EVENT_USER_COMMAND'
And
form f01_alv_event_user_command using r_ucomm     like sy-ucomm
                                      rs_selfield type slis_selfield.
                                                            "#EC *
data: ls_outtab    type g_ty_s_outtab,
        ls_vari      type disvariant,
        ls_slis_layo type slis_layout_alv,
        lt_slis_fcat type slis_t_fieldcat_alv,
        lt_slis_sort type slis_t_sortinfo_alv,
        lt_slis_filt type slis_t_filter_alv,
        ls_slis_prnt type slis_print_alv,
        ls_lvc_layo type lvc_s_layo,
        lt_lvc_fcat type lvc_t_fcat,
        lt_lvc_sort type lvc_t_sort,
        lt_lvc_filt type lvc_t_filt,
        ls_lvc_prnt type lvc_s_prnt.
case r_ucomm.
    when 'REFRESH'.
      rs_selfield-refresh = con_true.
Thanks,
Sriram Ponna.
Edited by: Sriram Ponna on Mar 11, 2008 6:41 PM

Similar Messages

Adding header in split alv using SALV

Hello Champs,
I have a requirement to display 6 diff reports in a screen. I have achieved it by using SALV(Split Container). Now I need to add header to each ALV report. The normal way of adding header in SALV doesnt work in the split ALV.
Can someone help me with this.
Thanks,
Greg

Hi, im experiencing the same situation right now, have you solved the problem? any inputs would be appreciated. thanks!

List display for ALV using class and methods

Hi friends
I want the list display for the ALV using Class and methods
which class and methods i can use.
Here we can't use the REUSE_ALV_LIST_DISPLAY and also GRID
I was done GRID display using class and methods but i want only list display for using class.
plz Give me sample code of list display not for grid.
Thanks
Nani.

hi
please check with this code...
declare grid and container.
DATA : o_alvgrid TYPE REF TO cl_gui_alv_grid,
o_dockingcontainer TYPE REF TO cl_gui_docking_container,
i_fieldcat TYPE lvc_t_fcat,"fieldcatalogue
w_layout TYPE lvc_s_layo."layout
If any events like double click,etc., are needed we have to add additional functionality.
call the screen in program.
Then , create the container as follows
IF cl_gui_alv_grid=>offline( ) IS INITIAL.
CREATE OBJECT o_dockingcontainer
EXPORTING
ratio = '95'
EXCEPTIONS
cntl_error = 1
cntl_system_error = 2
create_error = 3
lifetime_error = 4
lifetime_dynpro_dynpro_link = 5
others = 6.
ENDIF.
CREATE OBJECT o_alvgrid
EXPORTING
i_parent = o_dockingcontainer.
Build the fieldcatalog
create a output structure in SEll for the ALV output
CALL FUNCTION 'LVC_FIELDCATALOG_MERGE'
EXPORTING
i_structure_name = <alv output>
CHANGING
ct_fieldcat = i_fieldcat[]
EXCEPTIONS
inconsistent_interface = 1
program_error = 2
OTHERS = 3.
IF sy-subrc <> 0.
MESSAGE i030."Error in building the field catalogue
LEAVE LIST-PROCESSING.
ENDIF.
*If you need to modify the field catalog,modify it using field sysmbols
*setting the layout
w_layout-grid_title = title.
w_layout-zebra = 'X'.
then displaying the output
CALL METHOD o_alvgrid->set_table_for_first_display
EXPORTING
i_save = 'A'
is_layout = w_layout
CHANGING
it_outtab = i_output[]
it_fieldcatalog = i_fieldcat[]
EXCEPTIONS
invalid_parameter_combination = 1
program_error = 2
too_many_lines = 3
OTHERS = 4.
IF sy-subrc <> 0.
MESSAGE i032 ."Error in Displaying
LEAVE LIST-PROCESSING.
ENDIF.
*After that in PAI of the screen, you need to free the *object while going back from the screen(according to *your requirement)
MODULE user_command_9001 INPUT.
CASE sy-ucomm.
WHEN 'EXIT' OR 'CANC'.
PERFORM f9600_free_objects:
USING o_alvgrid 'ALV' text-e02,
USING o_dockingcontainer 'DOCKING'
text-e01.
LEAVE PROGRAM.
ENDCASE.
ENDMODULE. " USER_COMMAND_9001 INPUT
*in the program, write the follwoing code
FORM f9600_free_objects USING pobject
value(ptype)
value(ptext).
DATA: l_objectalv TYPE REF TO cl_gui_alv_grid.
CASE ptype.
WHEN 'ALV'.
l_objectalv = pobject.
IF NOT ( l_objectalv IS INITIAL ).
CALL METHOD l_objectalv->free
EXCEPTIONS
cntl_error = 1
cntl_system_error = 2
OTHERS = 3.
CLEAR: pobject, l_objectalv.
PERFORM f9700_error_handle USING ptext.
ENDIF.
WHEN 'DOCKING'.
DATA: lobjectdock TYPE REF TO cl_gui_docking_container.
lobjectdock = pobject.
IF NOT ( lobjectdock IS INITIAL ).
CALL METHOD lobjectdock->free
EXCEPTIONS
cntl_error = 1
cntl_system_error = 2
OTHERS = 3.
CLEAR: pobject, lobjectdock.
PERFORM f9700_error_handle USING ptext.
ENDIF.
WHEN 'CONTAINER'.
DATA: lobjectcontainer TYPE REF TO cl_gui_container.
lobjectcontainer = pobject.
IF NOT ( lobjectcontainer IS INITIAL ).
CALL METHOD lobjectcontainer->free
EXCEPTIONS
cntl_error = 1
cntl_system_error = 2
OTHERS = 3.
CLEAR: pobject, lobjectcontainer.
PERFORM f9700_error_handle USING ptext.
ENDIF.
WHEN OTHERS.
sy-subrc = 1.
PERFORM f9700_error_handle USING
text-e04.
ENDCASE.
ENDFORM. " f9600_free_objects
FORM f9700_error_handle USING value(ptext).
IF sy-subrc NE 0.
CALL FUNCTION 'POPUP_TO_INFORM'
EXPORTING
titel = text-e03
txt2 = sy-subrc
txt1 = ptext.
ENDIF.
endform.
also check with this
http://help.sap.com/printdocu/core/Print46c/en/data/pdf/BCSRVALV/BCSRVALV.pdf
Hope this helps
if it helped, you can acknowledge the same by rewarding
regards
dinesh

Editable ALV Using SALV Class.

Hi Experts,
I need to make ALV Editable using SALV Class only.
Thanks in Advance
Regards,
Ankit.
Moderator message: please do some research before asking.
Edited by: Thomas Zloch on Feb 25, 2011 1:47 PM

Hi Aniket,
This is a restriction and not provided in SALV class.
Please have look at the earlier posts in SCN .
Thanks.

Upload an excel file input into an itab,display in ALV using ABAP objects

Requirement:
Create a selection screen which takes an excel file as input with parameters emp id, emp name, salary, mnth, ph no.
Create a database table with the same fields.
The program needs to have two modes. Display mode and update mode.
Display mode only displays the file data in alv grid and update mode updates database table with similar parameters as above and also shows alv grid output.
task is to do using Object oriented approach. This should also have the facility to modify the cell values in ALV grid and once saved then it needs to update the database accordingly.
I have done the same functionality in a report program without using ABAP objects but finding difficulty in using object oriented approach.Please help me as i am new to abap-objects.
Thanks in advance.......

Hi,
The selection screen design and all remains the same.
Get all the detials which you need in your final internal table.
This internal table will be used to display in the ALV grid.
The approach remains the same as the normal programing.
Prepare a field catalog table and then use it along with the internal table to display in the grid.
The only change is that instead of FM you will have to make us of classes and their methods.
Firstly you will have to create a screen.
On this screen create a custom control object and give it some name. say for eg. CC_CONTAINER.
This will be a container on which the ALV grid object will be placed.
2 objects are needed to display the grid
CL_GUI_CUSTOM_CONTAINER and CL_GUI_ALV_GRID.
In the PBO of the screen first create an instance of object CL_GUI_CUSTOM_CONTAINER
CREATE OBJECT y_lobj_cont
      EXPORTING
         container_name              = 'CC_CONTAINER'
      EXCEPTIONS
        cntl_error                  = 1
        cntl_system_error           = 2
        create_error                = 3
        lifetime_error              = 4
        lifetime_dynpro_dynpro_link = 5
        OTHERS                      = 6.
    IF sy-subrc NE 0.
      MESSAGE ID sy-msgid TYPE y_k_s NUMBER sy-msgno
               WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
    ENDIF.
Then create a instance of the GRID
IF y_lobj_grid IS INITIAL.
      CREATE OBJECT y_lobj_grid
        EXPORTING
          i_parent          = y_lobj_cont
         EXCEPTIONS
           error_cntl_create = 1
           error_cntl_init   = 2
           error_cntl_link   = 3
           error_dp_create   = 4
           OTHERS            = 5 .
      IF sy-subrc NE 0.
        MESSAGE ID sy-msgid TYPE y_k_s NUMBER sy-msgno
                   WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
      ENDIF.
    ENDIF.
Then call the method SET_TABLE_FOR_FIRST_DISPLAY to display the grid.
CALL METHOD y_lobj_grid->set_table_for_first_display
      EXPORTING
        it_toolbar_excluding          = y_v_lt_exclude
      CHANGING
        it_outtab                     = y_li_tbl
        it_fieldcatalog               = y_li_fcat
      EXCEPTIONS
        invalid_parameter_combination = 1
        program_error                 = 2
        too_many_lines                = 3
        OTHERS                        = 4.
    IF sy-subrc NE 0.
      MESSAGE ID sy-msgid TYPE y_k_s NUMBER sy-msgno
                 WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
    ENDIF.
Check the example program BCALV_GRID_EDIT for better understanding.
Regards,
Ankur Parab

Error while display in ALV using SORT

Hi,
   I Displaying the data in ALV and after display using the ls_fieldcat-edit changing the value and saving.but i cant sort the displayed data.so how tocome out this issue.
Thanks in advance for the answers.
Regards,
Dessanth

Hi,
Please refer to the code below:
      call function 'REUSE_ALV_GRID_DISPLAY'
        exporting
          i_bypassing_buffer       = gs_test-bypassing_buffer
          i_buffer_active          = gs_test-buffer_active
          i_callback_program       = g_repid
          i_callback_pf_status_set = 'F01_ALV_EVENT_PF_STATUS_SET'
          i_callback_user_command = 'F01_ALV_EVENT_USER_COMMAND'
And
form f01_alv_event_user_command using r_ucomm     like sy-ucomm
                                      rs_selfield type slis_selfield.
                                                            "#EC *
data: ls_outtab    type g_ty_s_outtab,
        ls_vari      type disvariant,
        ls_slis_layo type slis_layout_alv,
        lt_slis_fcat type slis_t_fieldcat_alv,
        lt_slis_sort type slis_t_sortinfo_alv,
        lt_slis_filt type slis_t_filter_alv,
        ls_slis_prnt type slis_print_alv,
        ls_lvc_layo type lvc_s_layo,
        lt_lvc_fcat type lvc_t_fcat,
        lt_lvc_sort type lvc_t_sort,
        lt_lvc_filt type lvc_t_filt,
        ls_lvc_prnt type lvc_s_prnt.
case r_ucomm.
    when 'REFRESH'.
      rs_selfield-refresh = con_true.
Thanks,
Sriram Ponna.
Edited by: Sriram Ponna on Mar 11, 2008 6:41 PM

How to display a alv using in a html frame?

Hi,
Is it possible to show a ALV grid in a html frame? Please suggest. Thanks in advance.

hi,
Refer this links, it will be helpful to you...
https://wiki.sdn.sap.com/wiki/display/ABAP/ALVeasytutorial
https://wiki.sdn.sap.com/wiki/display/ABAP/100%20abap%20questions
https://wiki.sdn.sap.com/wiki/display/ABAP/Types%20of%20Reports
Regards,
Ahamed.

ALV USING FM(FIELDCATALOG_MERGE)

What is the purpose of fm
"REUSE_ALV_FIELDCATALOG_MERGE"
explain briefly with sample code.

Hi,
Using REUSE_ALV_FIELDCATALOG_MERGE can automatically determine the fieldstructure from this source program, no need to maunally build fieldcatalog for the fields defined in the internal table.
REPORT Z_ALV_SIMPLE_EXAMPLE_WITH_ITAB .
*data definition
tables:
marav. "Table MARA and table MAKT
* Data to be displayed in ALV
* Using the following syntax, REUSE_ALV_FIELDCATALOG_MERGE can auto-
* matically determine the fieldstructure from this source program
Data:
begin of imat occurs 100,
matnr like marav-matnr, "Material number
maktx like marav-maktx, "Material short text
matkl like marav-matkl, "Material group (so you can test to make
                        " intermediate sums)
ntgew like marav-ntgew, "Net weight, numeric field (so you can test to
                        "make sums)
gewei like marav-gewei, "weight unit (just to be complete)
end of imat.
* Other data needed
* field to store report name
data i_repid like sy-repid.
* field to check table length
data i_lines like sy-tabix.
* Data for ALV display
TYPE-POOLS: SLIS.
data int_fcat type SLIS_T_FIELDCAT_ALV.
select-options:
s_matnr for marav-matnr matchcode object MAT1.
start-of-selection.
* read data into table imat
select * from marav
into corresponding fields of table imat
where
matnr in s_matnr.
* Check if material was found
clear i_lines.
describe table imat lines i_lines.
if i_lines lt 1.
*   Using hardcoded write here for easy upload
    write: /
    'No materials found.'.
    exit.
endif.
end-of-selection.
* Now, we start with ALV
* To use ALV, we need a DDIC-structure or a thing called Fieldcatalogue.
* The fieldcatalouge can be generated by FUNCTION
* 'REUSE_ALV_FIELDCATALOG_MERGE' from an internal table from any
* report source, including this report.
* The only problem one might have is that the report and table names
* need to be in capital letters. (I had it :-( )
* Store report name
i_repid = sy-repid.
* Create Fieldcatalogue from internal table
CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
       EXPORTING
            I_PROGRAM_NAME         = i_repid
            I_INTERNAL_TABNAME     = 'IMAT' "capital letters!
            I_INCLNAME             = i_repid
       CHANGING
            CT_FIELDCAT            = int_fcat
       EXCEPTIONS
            INCONSISTENT_INTERFACE = 1
            PROGRAM_ERROR          = 2
            OTHERS                 = 3.
*explanations:
*    I_PROGRAM_NAME is the program which calls this function
*    I_INTERNAL_TABNAME is the name of the internal table which you want
*                       to display in ALV
*    I_INCLNAME is the ABAP-source where the internal table is defined
*               (DATA....)
*      CT_FIELDCAT contains the Fieldcatalouge that we need later for
*      ALV display
IF SY-SUBRC <> 0.
    write: /
    'Returncode',
    sy-subrc,
    'from FUNCTION REUSE_ALV_FIELDCATALOG_MERGE'.
ENDIF.
*This was the fieldcatlogue
* And now, we are ready to display our list
* Call for ALV list display
CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
       EXPORTING
*            I_CALLBACK_PROGRAM = 'Z_ALV_SIMPLE_EXAMPLE_WITH_ITAB'
            I_CALLBACK_PROGRAM = i_repid
            IT_FIELDCAT        = int_fcat
            I_SAVE             = 'A'
       TABLES
            T_OUTTAB           = imat
       EXCEPTIONS
            PROGRAM_ERROR      = 1
            OTHERS             = 2.
*explanations:
*    I_CALLBACK_PROGRAM is the program which calls this function
*    IT_FIELDCAT (just made by REUSE_ALV_FIELDCATALOG_MERGE) contains
*                 now the data definition needed for display
*    I_SAVE allows the user to save his own layouts
*      T_OUTTAB contains the data to be displayed in ALV
IF SY-SUBRC <> 0.
    write: /
    'Returncode',
    sy-subrc,
    'from FUNCTION REUSE_ALV_LIST_DISPLAY'.
ENDIF.
Thanks,
Sriram Ponna.

How to display 3 level hierarchy alv report using SALV

Hi ,
      I need to display a Hierarchy ALV report with 3 level.I thought of trying CL_SALV_HIERSEQ_TABLE but i am able to display only two level report.
      How can i display the 3 - level heirarchy report using SALV. I don't want to use SALV_TREE.
      Regards,
      Aditya Tanguturi.

Hi Aditya,
Please check this thread
Is it possible to display more than 2 levels us... | SCN
Thanks !
Amit

Multiple ALV display in one screen using SALV(Factory method)...

Hello Experts,
I tried using the old 'REUSE_ALV_BLOCK_LIST_APPEND' but it does not suit my
requirement. So will it be possible to display multiple ALV display(block) using
SALV?

check the sample code..
REPORT zsalv_demo_multiple.
DATA: salv1 TYPE REF TO cl_salv_table,
      salv2 TYPE REF TO cl_salv_table,
      salv3 TYPE REF TO cl_salv_table.
DATA: g_custom TYPE REF TO cl_gui_custom_container,
o_splitter    TYPE REF TO cl_gui_splitter_container,
o_grid1 TYPE REF TO cl_gui_container,
o_grid2 TYPE REF TO cl_gui_container,
o_grid3 TYPE REF TO cl_gui_container.
DATA: it_flight TYPE STANDARD TABLE OF sflight,
      it_carr TYPE TABLE OF scarr,
      it_book TYPE TABLE OF sbook.
START-OF-SELECTION.
SELECT * FROM sflight
INTO TABLE it_flight
UP TO 20 ROWS.
SELECT * FROM scarr
INTO TABLE it_carr
UP TO 20 ROWS.
SELECT * FROM sbook
INTO TABLE it_book
UP TO 20 ROWS.
CALL SCREEN 100.
*&      Module STATUS_0100 OUTPUT
*       text
MODULE status_0100 OUTPUT.
SET PF-STATUS 'ABC'.
CREATE OBJECT g_custom
EXPORTING container_name = 'CONT'.
CREATE OBJECT o_splitter
EXPORTING parent = g_custom
rows    = 3
columns = 1.
CALL METHOD o_splitter->get_container
    EXPORTING
      row       = 1
      column    = 1
    RECEIVING
      container = o_grid1.
CALL METHOD o_splitter->get_container
    EXPORTING
      row       = 2
      column    = 1
    RECEIVING
      container = o_grid2.
CALL METHOD o_splitter->get_container
    EXPORTING
      row       = 3
      column    = 1
    RECEIVING
      container = o_grid3.
cl_salv_table=>factory(
    EXPORTING
      r_container    = o_grid1
    IMPORTING
      r_salv_table   = salv1
    CHANGING
      t_table        = it_flight
cl_salv_table=>factory(
    EXPORTING
      r_container    = o_grid2
    IMPORTING
      r_salv_table   = salv2
    CHANGING
      t_table        = it_carr
cl_salv_table=>factory(
    EXPORTING
      r_container    = o_grid3
    IMPORTING
      r_salv_table   = salv3
    CHANGING
      t_table        = it_book
CALL METHOD salv1->display.
CALL METHOD salv2->display.
CALL METHOD salv3->display.
ENDMODULE.                 " STATUS_0100 OUTPUT
*&      Module USER_COMMAND_0100 INPUT
*       text
MODULE user_command_0100 INPUT.
CASE sy-ucomm.
    WHEN 'BACK'.
      LEAVE TO SCREEN 0.
ENDCASE.
ENDMODULE.                 " USER_COMMAND_0100 INPUT
Flow Logic..
PROCESS BEFORE OUTPUT.
MODULE STATUS_0100.
PROCESS AFTER INPUT.
MODULE USER_COMMAND_0100.
in the Screen i placed a custom control and named it as CONT

Need to display texts on to the ALV grid using SALV

Hi evryone,
               There is a requirement to print an ALV grid containing the row titles and their subsequent values. The display shouild look like as below
Summary                                     ItemsA cost                                                             111111
                                                    ItemsB cost                                                              222222
                                                    ItemC cost                                                                333333
                                                    New items
                                                    ItemD cost                                                                                111111
                                                    ItemE cost                                                                                222222
                                                    ItemF cost                                                                                333333
                                                             Total                                                                 666666        666666
The headings pertaining to ItemA to itemB should come in a single column and their subsequent values as shown above. The total should be displayed below the corresponding block of items. Can anyone please suggest me the way we can acheive this using SALV and container concept.

Sorry my earlier did not get displayed as expected. Please find below the format how the ALV should get displayed.
Summary -
ITEMA----
1111
ITEMB----
2222
ITEMC----
3333
ITEMD----
1111
ITEME----
2222
ITEMF -
3333
Total--6666--
6666
Please ignore the dots here they are just written to indicate spaces between the texts. The text summary and the texts "ItemA, B, C etc" should have 1 coulmn gap and the prices for the first item block should have 1 column block from the texts and the prices for second Item block should have a 2 coulumn block from the texts and total value should be displayed below each block.
Edited by: Phaniacumen on May 8, 2010 1:59 PM

Multiple ALV display using SALV(Factory method)...

Hello Experts,
Please provide me any examples on how to display multiple ALV
displays in a screen using SALV(Factory method).
Hope you can help me guys.
Thank you and take care!

Hi Viraylab,
Kindly check the program below, this will help you..
*& Report Z101754_REPORT
REPORT z101754_report.
TABLES: zvbak_101754,zvbap_101754,mara.
TYPE-POOLS: slis.
DATA : i_fieldcat TYPE slis_t_fieldcat_alv.
DATA: FLDNAME(24).
DATA : BEGIN OF itab_zvbap OCCURS 0,
       zvbeln LIKE zvbap_101754-zvbeln,
zposnr LIKE zvbap_101754-zposnr,
zmatnr LIKE zvbap_101754-zmatnr,
zbrgew LIKE zvbap_101754-zbrgew,
zgi_qty LIKE zvbap_101754-zgi_qty,
zinv_qty LIKE zvbap_101754-zinv_qty,
       END OF itab_zvbap.
SELECTION-SCREEN BEGIN OF BLOCK block1 WITH FRAME TITLE text-t01.
SELECT-OPTIONS : s_zvbeln FOR zvbak_101754-zvbeln,
                 s_zkunwe FOR zvbak_101754-zkunwe,
                 s_zerdat FOR zvbak_101754-zerdat,
                 s_zmatnr FOR zvbap_101754-zmatnr.
SELECTION-SCREEN END OF BLOCK block1.
SELECTION-SCREEN: BEGIN OF BLOCK block2 WITH FRAME TITLE t02.
PARAMETERS     : invoiced AS CHECKBOX,
                 s_gi AS CHECKBOX .
SELECTION-SCREEN: END OF BLOCK block2.
SELECTION-SCREEN: BEGIN OF BLOCK block3 WITH FRAME TITLE t03.
PARAMETERS     : alv_list RADIOBUTTON GROUP g1,
                 alv_grid RADIOBUTTON GROUP g1,
                 s_class RADIOBUTTON GROUP g1.
SELECTION-SCREEN: END OF BLOCK block3.
Screen Field Validation event
AT SELECTION-SCREEN ON s_zvbeln.
SELECT SINGLE *
   FROM zvbak_101754 WHERE zvbeln IN s_zvbeln.
IF sy-subrc NE 0.
    MESSAGE e000(z754).
ENDIF.
AT SELECTION-SCREEN ON s_zkunwe.
SELECT SINGLE *
   FROM zvbak_101754 WHERE zkunwe IN s_zkunwe.
IF sy-subrc NE 0.
    MESSAGE e001(z754).
ENDIF.
AT SELECTION-SCREEN ON s_zerdat.
SELECT SINGLE *
     FROM zvbak_101754 WHERE zerdat IN s_zerdat.
IF sy-subrc NE 0.
    MESSAGE e002(z754).
ENDIF.
AT SELECTION-SCREEN ON s_zmatnr.
SELECT SINGLE *
   FROM zvbap_101754    WHERE zmatnr IN s_zmatnr.
IF sy-subrc NE 0.
    MESSAGE e003(z754).
ENDIF.
Start-Of-Selection Event
START-OF-SELECTION.
PERFORM select-data.
End-Of-Selection Event
END-OF-SELECTION.
PERFORM display.
*&      Form select-data
      text
--> p1        text
<-- p2        text
FORM select-data .
SELECT zvbeln zposnr zmatnr zbrgew zgi_qty zinv_qty
     INTO CORRESPONDING FIELDS OF TABLE itab_zvbap
     FROM zvbap_101754
     WHERE zvbeln IN s_zvbeln.
ENDFORM.                    " select-data3
TOP-OF-PAGE.
AT LINE-SELECTION.
FORMAT HOTSPOT.
*GET THE FIELD NAME ON LINE SELECTION
GET CURSOR FIELD FLDNAME . "value field_value.
IF FLDNAME = 'itab_zvbap-zvbeln'.
SET PARAMETER ID 'BES' FIELD itab_zvbap-zvbeln.
CALL TRANSACTION 'ZVA01_101754'.
ENDIF.
*&      Form DISPLAY
      text
--> p1        text
<-- p2        text
FORM display .
IF s_class ='X'.
    PERFORM display_header.
    LOOP AT itab_zvbap.
      WRITE : / sy-vline,
              itab_zvbap-zvbeln ,
              13 sy-vline,
              itab_zvbap-zposnr ,
              30 sy-vline,
              itab_zvbap-zmatnr ,
              45 sy-vline,
              itab_zvbap-zbrgew UNIT mara-meins ,
              65 sy-vline,
              itab_zvbap-zgi_qty UNIT mara-meins,
              85 sy-vline,
              itab_zvbap-zinv_qty UNIT mara-meins,
              105 sy-vline,
              / sy-uline(105).
    ENDLOOP.
ENDIF.
*&     Creating the fieldcatalog.
CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
   EXPORTING
     i_program_name               = sy-repid
     i_internal_tabname           = 'ITAB_ZVBAP'
I_STRUCTURE_NAME             =
I_CLIENT_NEVER_DISPLAY       = 'X'
     i_inclname                   = sy-repid
I_BYPASSING_BUFFER           =
I_BUFFER_ACTIVE              =
    CHANGING
      ct_fieldcat                  = i_fieldcat
EXCEPTIONS
inconsistent_interface       = 1
program_error                = 2
OTHERS                       = 3
IF sy-subrc <> 0.
    MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
           WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
IF alv_list = 'X'.
    CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
     EXPORTING
I_INTERFACE_CHECK              = ' '
I_BYPASSING_BUFFER             =
I_BUFFER_ACTIVE                = ' '
       i_callback_program             = sy-repid
       i_callback_pf_status_set       = ' '
       i_callback_user_command        = 'USER_COMMAND '
I_STRUCTURE_NAME               =
IS_LAYOUT                      =
       it_fieldcat                    = i_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
IR_SALV_LIST_ADAPTER           =
IT_EXCEPT_QINFO                =
I_SUPPRESS_EMPTY_DATA          = ABAP_FALSE
IMPORTING
E_EXIT_CAUSED_BY_CALLER        =
ES_EXIT_CAUSED_BY_USER         =
      TABLES
        t_outtab                       = itab_zvbap[]
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.
ENDIF.
IF alv_grid = 'X'.
    CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
EXPORTING
I_INTERFACE_CHECK                 = ' '
I_BYPASSING_BUFFER                = ' '
I_BUFFER_ACTIVE                   = ' '
       i_callback_program                = sy-repid
    i_callback_pf_status_set          = ' '
    i_callback_user_command           = '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                         =
    it_fieldcat                       = i_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
I_HTML_HEIGHT_TOP                 = 0
I_HTML_HEIGHT_END                 = 0
IT_ALV_GRAPHICS                   =
IT_HYPERLINK                      =
IT_ADD_FIELDCAT                   =
IT_EXCEPT_QINFO                   =
IR_SALV_FULLSCREEN_ADAPTER        =
IMPORTING
E_EXIT_CAUSED_BY_CALLER           =
ES_EXIT_CAUSED_BY_USER            =
   TABLES
     t_outtab                          = itab_zvbap[]
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.
ENDIF.
ENDFORM.                    " DISPLAY
*&      Form display_header
      text
--> p1        text
<-- p2        text
FORM display_header .
WRITE : / sy-vline,
              'ORDER NO',
              13 sy-vline,
               'ITEM NO',
              30 sy-vline,
               'MATERIAL NO',
              45 sy-vline,
               'ORDER QTY',
              65 sy-vline,
               'GI QTY',
              85 sy-vline,
              'INVOICED QTY',
              105 sy-vline,
              / sy-uline(105).
ENDFORM.                    " display_header
Please let me know if you have any doubt.
Regards,
Amit.

Problem in alv report coumn header in the background while using salv

Hi all,
        now i am working on alv report for this i have used salv i mean oops alv ,So here i am facing one issue while executing the report in background
        the report column headers are not displaying properly as it is displaying in front end.
       In the back ground it is always displaying column header as data element field label short text. i have written a code to pick the long text
       but it is working fine if run the report in the frontend where as in the backgroiund it is always displaying short text but it is wrong.
here i am attaching the output screen shots in front end and background.

Hi Satish,
I have tried this scenario with Reuse ALV grid 1st i found the same issue as u said in background job,
then i set in field catalog as,
wa_fcat-ddictxt = 'L'. Now its working fine. L stands for long text.
Before...
After...
For LVC u can try the below fields in fieldcatlog.
COLDDICTXT = 'L'.
SELDDICTXT = 'L'

How to display two grids in same screen using SALV Method

Hi Freinds,
Please let me know how to display two grids in same screen using SALV Method.
Thank you
Regards,
SDV

Using the same concept as described in How to dispaly Three Internal Table Data (One below another) in ALV OOPS .
All you need to add is passing your new containers as r_container parementer of factory method.
"1st one
      cl_salv_table=>factory(
         EXPORTING
           R_CONTAINER    = g_top_container
"2nd one
      cl_salv_table=>factory(
         EXPORTING
           R_CONTAINER    = g_bottom_container
Regards
Marcin

Column Heading are not displayed in ALV Report using CL_SALV_DISPLAY?

Hi,
   I am using CL_SALV_DISPLAY class to display data. I Created an Internal Table Dynamically based fieldcatalog which was prepared based data at run time. When i displayed data using CL_SALC_DISPALY data is display in output but column headings are not displayed.
can anyone suggest me how to display heading in ALV using CL_SALV_DISPLAY class, My code is
      CLASS lcl_report DEFINITION
CLASS lcl_report DEFINITION.
PUBLIC SECTION.
    METHODS:
      display IMPORTING l_table TYPE string
                         l_fcat   TYPE string.
ENDCLASS.                    "lcl_report DEFINITION
      CLASS lcl_report IMPLEMENTATION
CLASS lcl_report IMPLEMENTATION.
METHOD display.
    DATA: gr_table   TYPE REF TO cl_salv_table.
    DATA: gr_columns TYPE REF TO cl_salv_columns_table,
          gr_column TYPE REF TO cl_salv_column_table,
          ls_fcat    TYPE slis_fieldcat_alv.
    DATA: gr_display TYPE REF TO cl_salv_display_settings.
    DATA: l_o_functions TYPE REF TO cl_salv_functions_list,
          l_field    TYPE string.
    FIELD-SYMBOLS : <fs_table>    TYPE STANDARD TABLE,
                    <ft_fcat>     TYPE STANDARD TABLE.
Get the ALV object refering to the output table
    ASSIGN (l_table) TO <fs_table>.
    ASSIGN (l_fcat) TO <ft_fcat>.
    TRY.
        cl_salv_table=>factory(
          IMPORTING
            r_salv_table = gr_table
          CHANGING
            t_table      = <fs_table> ).
      CATCH cx_salv_msg.                                "#EC NO_HANDLER
    ENDTRY.
Add basic default functionality in the ALV report
Functions
    l_o_functions = gr_table->get_functions( ).
    l_o_functions->set_all( abap_true ).
    gr_columns = gr_table->get_columns( ).
    gr_columns->set_headers_visible( abap_true ).
Display the list
    gr_table->display( ).
ENDMETHOD.                    "extract
ENDCLASS.                    "lcl_report IMPLEMENTATION
*& start-of-selection declaration
START-OF-SELECTION.
PERFORM :
get store codes
    get_storecodes    USING      p_stfile
                      CHANGING   it_t001w,
fetching mard data
    read_mard_data,
preparing fieldcatalog for Final Data
    create_filedcat   USING      it_t001w
                                 it_site
                      CHANGING   it_fieldcat,
preparing structure & internal table for Final Data
    create_final_table_structure USING it_fieldcat,
prepare output data
    prepare_final_data.
*& end-of-selection declaration
END-OF-SELECTION.
PERFORM :
display data
    display_data    USING l_table
                          l_fcat.
*&      Form get_storecodes
FORM get_storecodes USING    p_p_stfile
                     CHANGING p_it_t001w LIKE it_t001w[].
DATA :
internal table for RAW
lt_raw    TYPE truxs_t_text_data,
rs_site   LIKE LINE OF rt_site,
l_index   LIKE sy-tabix.
FIELD-SYMBOLS :
field symbol for it_t001w
<fs_t001w>   LIKE LINE OF p_it_t001w.
calling function module to get Stores Data from File
CALL FUNCTION 'TEXT_CONVERT_XLS_TO_SAP'
    EXPORTING
      i_line_header        = 'X'
      i_tab_raw_data       = lt_raw
      i_filename           = p_p_stfile
    TABLES
      i_tab_converted_data = p_it_t001w[]
    EXCEPTIONS
      conversion_failed    = 1
      OTHERS               = 2.
IF sy-subrc <> 0.
    EXIT.
ENDIF.
SORT p_it_t001w BY werks.
CLEAR rs_site.
rs_site-sign   = 'I'.
rs_site-option = 'EQ'.
rs_site-low    = p_dccode.
APPEND rs_site TO rt_site.
IF it_t001w[] IS NOT INITIAL.
    LOOP AT p_it_t001w ASSIGNING <fs_t001w>.
      l_index   = sy-tabix.
      CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
        EXPORTING
          input = <fs_t001w>-werks
        IMPORTING
          output = <fs_t001w>-werks.
      MODIFY p_it_t001w FROM <fs_t001w> INDEX l_index.
      IF <fs_t001w>-werks GE s_site-low AND <fs_t001w>-werks LE s_site-high.
      append site to ranges
        CLEAR rs_site.
        rs_site-sign   = 'I'.
        rs_site-option = 'EQ'.
        rs_site-low    = <fs_t001w>-werks.
        APPEND rs_site TO rt_site.
        CONTINUE.
      ENDIF.
    ENDLOOP.
    SORT p_it_t001w BY werks.
    SORT rt_site.
ENDIF.
ENDFORM.                    " get_storecodes
*&      Form create_final_table_structure
FORM create_filedcat   USING    p_it_t001w      LIKE it_t001w[]
                                p_it_site       LIKE it_site[]
                       CHANGING p_it_fieldcat   LIKE it_fieldcat[].
FIELD-SYMBOLS :
field symbol for p_it_t001w
<fs_t001w>     LIKE LINE OF p_it_t001w,
field symbol for p_it_site
<fs_site>      LIKE LINE OF p_it_site.
DATA :
fieldname
l_fieldname    TYPE slis_fieldname,
workarea for site ranges
rs_site        LIKE LINE OF rt_site.
CLEAR : l_fieldname, rs_site.
l_fieldname    = p_dccode.
PERFORM
prepare fieldcatalog
build_fieldcatalog USING :   'MTART'      'CHAR'        '5' ,
                               'MTBEZ'      'CHAR'        '25' ,
                               'MATKL'      'CHAR'        '6' ,
                               'WGBEZ'      'CHAR'        '20' ,
                               'MATNR'      'CHAR'        '18' ,
                               'MAKTX'      'CHAR'        '30' ,
                                l_fieldname 'CHAR'        '17' .
create header for excel
PERFORM create_excel_header USING : 'Division',
                                       'Divsion Description',
                                       'MC Code',
                                       'MC Description',
                                       'Article',
                                       'Article Description',
                                        l_fieldname.
loop for creating fieldcatalog
LOOP AT it_site ASSIGNING <fs_site>.
    READ TABLE it_t001w ASSIGNING <fs_t001w> WITH KEY werks = <fs_site>-werks
                                                              BINARY SEARCH.
    IF sy-subrc = 0           AND <fs_t001w> IS ASSIGNED AND
       <fs_site> IS ASSIGNED AND <fs_site>-stock GT 0.
      CLEAR : l_fieldname, rs_site.
      l_fieldname    = <fs_site>-werks.
    prepare fieldcatalog
      PERFORM build_fieldcatalog USING : l_fieldname    'CHAR'   '17'.
    create header for excel
      PERFORM create_excel_header USING l_fieldname .
      CONTINUE.
    ENDIF.
ENDLOOP.
l_fcat = 'it_fieldcat[]'.
ENDFORM.                    " create_final_table_structure
*&      Form build_fieldcatalog
FORM build_fieldcatalog USING    p_fieldname      TYPE slis_fieldname
                                  p_datatype       TYPE datatype_d
                                  p_length         TYPE intlen.
DATA : ls_fieldcat    LIKE LINE OF it_fieldcat.
CLEAR : ls_fieldcat.
ls_fieldcat-fieldname   = p_fieldname.
ls_fieldcat-datatype    = p_datatype.
ls_fieldcat-intlen      = p_length.
APPEND ls_fieldcat TO it_fieldcat.
ENDFORM.                    " build_fieldcatalog
*&      Form create_final_table_structure
FORM create_final_table_structure USING    p_it_fieldcat.
Create dynamic internal table and assign to FS
CALL METHOD cl_alv_table_create=>create_dynamic_table
    EXPORTING
      it_fieldcatalog = it_fieldcat
    IMPORTING
      ep_table        = t_table.
ASSIGN t_table->* TO <ft_final>.
ENDFORM.                    " create_final_table_structure
*&      Form create_excel_header
FORM create_excel_header USING    p_p_fieldname.
DATA : ls_header LIKE LINE OF it_header.
CLEAR ls_header.
ls_header-col_name = p_p_fieldname.
APPEND ls_header TO it_header.
ENDFORM.                    " create_excel_header
*&      Form prepare_final_data
FORM prepare_final_data .
DATA          : l_matnr       LIKE g_matnr,
                  l_werks       LIKE g_werks,
                  l_index       LIKE sy-tabix.
FIELD-SYMBOLS : <fs_mard>     LIKE LINE OF it_mard.
Getting No. of Lines in IT_MARD internal table
DESCRIBE TABLE it_mard LINES g_lines.
LOOP AT it_mard ASSIGNING <fs_mard>.
    l_index    = sy-tabix.
    IF l_matnr IS INITIAL.
      l_matnr = <fs_mard>-matnr.
      CLEAR : l_werks.
      l_werks    = <fs_mard>-werks.
      UNASSIGN : <fs_value>, <fs_final>.
    Create dynamic work area and assign to FS
      CREATE DATA t_line LIKE LINE OF <ft_final>.
      ASSIGN t_line->*   TO <fs_final>.
      ASSIGN COMPONENT 'MATNR' OF STRUCTURE <fs_final> TO <fs_value>.
      <fs_value>        = <fs_mard>-matnr.
      ASSIGN COMPONENT l_werks OF STRUCTURE <fs_final> TO <fs_value>.
      <fs_value>        = <fs_value> + <fs_mard>-labst.
    getting Article Type,MC & its Descriptions
      PERFORM get_other_data    USING     l_matnr
                                          l_werks.
    ELSEIF l_matnr <> <fs_mard>-matnr.
      APPEND <fs_final> TO <ft_final>.
      CLEAR l_matnr.
      l_matnr = <fs_mard>-matnr.
      CLEAR : l_werks.
      l_werks    = <fs_mard>-werks.
      UNASSIGN : <fs_value>, <fs_final>.
    Create dynamic work area and assign to FS
      CREATE DATA t_line LIKE LINE OF <ft_final>.
      ASSIGN t_line->*   TO <fs_final>.
      ASSIGN COMPONENT 'MATNR' OF STRUCTURE <fs_final> TO <fs_value>.
      <fs_value>        = <fs_mard>-matnr.
      ASSIGN COMPONENT l_werks OF STRUCTURE <fs_final> TO <fs_value>.
      <fs_value>        = <fs_value> + <fs_mard>-labst.
    getting Article Type,MC & its Descriptions
      PERFORM get_other_data    USING     l_matnr
                                         l_werks.
    ELSE.
      CLEAR : l_werks.
      l_werks    = <fs_mard>-werks.
      ASSIGN COMPONENT l_werks OF STRUCTURE <fs_final> TO <fs_value>.
      <fs_value>        = <fs_value> + <fs_mard>-labst.
    ENDIF.
    IF l_index = g_lines.
      APPEND <fs_final> TO <ft_final>.
    ENDIF.
ENDLOOP.
l_table = '<ft_final>[]'.
ENDFORM.                    " prepare_final_data
*&      Form get_other_data
FORM get_other_data USING    p_l_matnr
                              p_l_werks.
FIELD-SYMBOLS : <fs_mara>     LIKE LINE OF it_mara,
                  <fs_t023t>    LIKE LINE OF it_t023t,
                  <fs_t134t>    LIKE LINE OF it_t134t,
                  <fs_makt>     LIKE LINE OF it_makt.
READ TABLE it_mara ASSIGNING <fs_mara> WITH KEY matnr = p_l_matnr.   " BINARY SEARCH.
IF sy-subrc = 0 AND <fs_mara> IS ASSIGNED.
    ASSIGN COMPONENT 'MTART' OF STRUCTURE <fs_final> TO <fs_value>.
    <fs_value>        = <fs_mara>-mtart.
    ASSIGN COMPONENT 'MATKL' OF STRUCTURE <fs_final> TO <fs_value>.
    <fs_value>        = <fs_mara>-matkl.
    READ TABLE it_makt ASSIGNING <fs_makt> WITH KEY matnr = <fs_mara>-matnr   BINARY SEARCH.
    IF sy-subrc = 0 AND <fs_makt> IS ASSIGNED.
      ASSIGN COMPONENT 'MAKTX' OF STRUCTURE <fs_final> TO <fs_value>.
      <fs_value>        = <fs_makt>-maktx.
    ENDIF.
    READ TABLE it_t023t ASSIGNING <fs_t023t> WITH KEY matkl = <fs_mara>-matkl BINARY SEARCH.
    IF sy-subrc = 0 AND <fs_t023t> IS ASSIGNED.
      ASSIGN COMPONENT 'WGBEZ' OF STRUCTURE <fs_final> TO <fs_value>.
      <fs_value>      = <fs_t023t>-wgbez.
    ENDIF.
    READ TABLE it_t134t ASSIGNING <fs_t134t> WITH KEY mtart = <fs_mara>-mtart BINARY SEARCH.
    IF sy-subrc = 0 AND <fs_t134t> IS ASSIGNED.
      ASSIGN COMPONENT 'MTBEZ' OF STRUCTURE <fs_final> TO <fs_value>.
      <fs_value>      = <fs_t134t>-mtbez.
    ENDIF.
ENDIF.
ENDFORM.                    " get_other_data
*&      Form display_data
      text
FORM display_data USING    p_l_table
                            p_l_fcat.
DATA:
Variable for Object Creation
o_report TYPE REF TO lcl_report.
CREATE OBJECT o_report.
o_report->display( EXPORTING l_table = p_l_table
                               l_fcat = p_l_fcat ).
ENDFORM.                    " display_data

I don't know how to read the code you pasted or I would have checked this myself.
Do your fields in the internal table reference dictionary objects or elementary types? If not using dictionary types, the column names will be blank by default. If you can't change your fields to be dictionary types, you can try this to change the column names:
I made a method inside my local class to add the names:
        call method set_colname
          EXPORTING iv_tab = alv_tab
                    iv_colid = 'xxxx' "fieldname from the table
                    iv_stxt = text-t54
                    iv_mtxt = text-t55
                    iv_ltxt = text-t55.
METHOD set_colname .
data:
          alv_cols type REF TO cl_salv_columns_table,
          alv_col type REF TO cl_salv_column.
TRY .
*... Change fieldnames
        call METHOD iv_tab->get_columns RECEIVING value = alv_cols.
        call method alv_cols->get_column EXPORTING columnname = iv_colid RECEIVING value = alv_col.
        IF iv_stxt <> ''.
          CALL METHOD alv_col->set_short_text EXPORTING value = iv_stxt.
        ENDIF.
        IF iv_mtxt <> ''.
          CALL METHOD alv_col->set_medium_text EXPORTING value = iv_mtxt.
        ENDIF.
        IF iv_ltxt <> ''.
          CALL METHOD alv_col->set_long_text EXPORTING value = iv_ltxt.
        ENDIF.
   CATCH cx_salv_not_found.
ENDTRY.
ENDMETHOD. "set_colname

URGENT..DISPLAY IN ALV USING SALV...

Similar Messages

Maybe you are looking for