How to handle the event "GROUPLEVEL_CHANGE" in ALV?

Hi,
I have done a BLOCL ALV report. In i am sorting the first field and not displaying it. But for every change in the first field page break should happen and the particular field is to be printed at every page break at the top. I am handling the page break by passing the IT_SORT-GROUP = '*'. there fore the page breaking is happening well. now i need to have a control such that i print the first field at every page break.
Please help on this...........
I think the event GROUPLEVEL_CHANGE is to used please tell me the parameters to be passed for this subroutine
(Defenitely point will be given)

Hi,
Check the below thread...
Re: Adding row after subtotal in ALV
Regards,
Maha

Similar Messages

How to handle the events of business object (BAPI)

Hi,
How to register to BAPI event and handle?
For example, for a business object 'inv', there is an event as 'created'.
I want to insert entry in a z table when an inv is created.
I assume that the 'created' event is triggered when an inv is created.
How i can register to that event and handle that event so that i can
insert an entry in z table.
Thanks,
Prasad

ComponentListener?
: jay

How to capture the event in ALV grid display?

Hi experts,
How to capture the event in an ALV grid display which is editable. I have to capture the TAB key or ENTER key.
regards,
Arul Jothi.

Hi Arul,
Take a look at sample program BCALV_EDIT_03. (Find string "register ENTER" in the program to see how to register)
Basically you have to Register edit events using method call REGISTER_EDIT_EVENT and then write a handler method for event DATA_CHANGED..
If you are using a REUSE..GRID fm then first get the grid reference using function module GET_GLOBALS_FROM_SLVC_FULLSCR and then repeat the above procedure..
Hope this helps..
Sri
Message was edited by: Srikanth Pinnamaneni

How to handle selection event in alv component

Hi all,
    i am new to webdynpro abap. and i want to know how to handle selection event(such as select all / unselect ) in my simple alv application.
Thanks very much

Hi,
By default when you use the selection mode for the ALV as Multi/Mutli No Lead then this option is enabled.
Try to implement the event ONLEADSELECT and check wether this event is triggered or not.
DATA: lo_value type ref to cl_salv_wd_config_table.
    CALL METHOD lo_value->if_salv_wd_table_settings~set_selection_mode
      EXPORTING
        value = cl_wd_table=>e_selection_mode-multi_no_lead.
Try to implement these event for ALV and put a break-point and test which event is getting triggered.
ON_CLICK
ON_DATA_CHECK
ON_FUNCTION
ON_LEAD_SELECT
ON_STD_FUNCTION_AFTE
ON_STD_FUNCTION_BEFO
Please provide more inputs.
Regards,
Lekha.

How to add a new button in IC tool bar and handle the event for the button?

Hi,
    I am working on CRM 2007 Interaction center. To add a new button to IC toolbar, customizing is available to define a new button and then assign in to the profile.
In SPRO->CRM->IC webclient->Customer Specifc System Modifications->Define Toolbar Buttons, I defined one new button with ID ZSTART.
Now in SPRO->CRM->IC webclient->Basic Functions->Communication Channels->Define Toolbar Profiles , I selected Default profileid and in Generic Layout Buttons Tab, I added the new button ZSTART in Position 3.
     So after completing the customizing when the user logs in using role IC_AGENT, the button (with ID:ZSTART) gets displayed in the IC toolbar too.
      Now on click of this button, I need to create an object.
To do so, I have to catch the event which is raised by this new button.
       Please let me how to implement the event handler for this new button. What will be the event name for this button click event and how I can subscribe for it ?
     Please let me know if anyone of you have already worked on similar requirements.
Regards,
Manas.
Edited by: manas sahoo on Jul 22, 2008 7:49 PM

Hello Manas,
There are a couple of threads in the community that might help you out (if you haven't already found them):
Re: IC Web Client Toolbar
/message/3621917#3621917 [original link is broken]
Regards,
Renee Wilhelm
Edited by: Renee Wilhelm on Nov 6, 2008 7:46 PM

How to handle the drop event

Hi everyone,
Now I'm developing the function about drag-drop source(image & text) from Panel Tree to the document.
I also have a look at the basic drag/drop & Panel Treeview, but all of them is not the source code mentions to how to handle the drop event, almost about drag event only.
Now when user Drags(image, text) from PanelTreeView(example) and drops them to document and then new page Item contains source(image, text) created, so I want to get the page item after drop event.
so anyone know about this please give me suggestion
thanks so much.

i dont think you can.
~~~~~~~~~~~~~~~~
--> Adobe Certified Expert
--> www.mudbubble.com
--> www.keyframer.com
~~~~~~~~~~~~~~~~
keyoke_za wrote:
> Hi,
> How can I get my flash movie to handle the drop event
when dropping objects from outside the flash window.
> Thanks for your help..

How to call the event handler of other application....?

Hi,
I am working on two applications.
Now i need to call a Event handler from my first application to my second application.
I need a same process in this aaplication also. So i need to call the event handler of that application.
So, Kindly tell me about the process to call the even handler of another application.
Thanks in Advance.
Regards,
Prithivi

hi,Prithivi..
Unfortunately, as far as i know, i should tell you that : you cann't call the event-hanlder in another Application if the 2 applicaions are run in different IE browser...
If your 2 component are used in the same IE browser, maybe you can make one interface event, and trigger it in one component, then handle the event in the second component(by reimplemented the former)...
However, from your description, i think, you want to trigger the event handler in another application in different IE Browser...
So, very upset..We cann't communicate between the 2 applications, as far as i know...
Best wishes.

How to add Select event in dynamic ALV

Hi,
I have created dynamic ALV and now i want to checked the selected row value.
If in the selected row contain 'A' value then i have to disable the Button given on the screen.
If in the selected row contain B' value then i have to enable the Button given on the screen.
How to add the event once I select the row.
I have done like this . but it is not
lw_api_2->do_dynamic_navigation(
          source_window_name          = 'ZWDCHHR_EX_TASK_DELE'
          source_vusage_name          = 'ZWDVHHR_EX_TASK_DELE_USAGE_1'
          source_plug_name            = 'TO_ALV'
          target_component_name       = 'SALV_WD_TABLE'
          target_component_usage      = 'ALV_USAGE1'
          target_view_name            = 'TABLE'
          target_plug_name            = 'DEFAULT'
          target_embedding_position   = 'ZWDVHHR_EX_TASK_DELE/VIEW_DELEG_MY_TASKS' ).
register event handler
    lw_cmp_usage_2->add_event_handler(
       listener        = lw_api_2
       handler_name    = 'ONSELECT_TAB1'
       controller_name = 'INTERFACECONTROLLER'
       event_name      = 'ON_SELECT' ).
Thanks and regards
Amita Gandhi

Hi Amita,
You can try fetch the number of the row which was leadselected through R_PARAM->INDEX. (This would be just a normal integer variable. You can try check this out in debugging mode. ) Now you can just read the data of this row from the context node by saying as GET_ATTRIBUTE up on the nodes reference with the index as R_PARAM->INDEX.
Regards,
Uday

How to cancel the event in Item Adding and display javascript message and prevent the page from redirecting to the SharePoint Error Page?

How to cancel the event in Item Adding without going to the SharePoint Error Page?
Prevent duplicate item in a SharePoint List
The following Event Handler code will prevent users from creating duplicate value in "Title" field.
ItemAdding Event Handler
public override void ItemAdding(SPItemEventProperties properties)
base.ItemAdding(properties);
if (properties.ListTitle.Equals("My List"))
try
using(SPSite thisSite = new SPSite(properties.WebUrl))
SPWeb thisWeb = thisSite.OpenWeb();
SPList list = thisWeb.Lists[properties.ListId];
SPQuery query = new SPQuery();
query.Query = @"<Where><Eq><FieldRef Name='Title' /><Value Type='Text'>" + properties.AfterProperties["Title"] + "</Value></Eq></Where>";
SPListItemCollection listItem = list.GetItems(query);
if (listItem.Count > 0)
properties.Cancel = true;
properties.ErrorMessage = "Item with this Name already exists. Please create a unique Name.";
catch (Exception ex)
PortalLog.LogString("Error occured in event ItemAdding(SPItemEventProperties properties)() @ AAA.BBB.PreventDuplicateItem class. Exception Message:" + ex.Message.ToString());
throw new SPException("An error occured while processing the My List Feature. Please contact your Portal Administrator");
Feature.xml
<?xml version="1.0" encoding="utf-8"?>
<Feature Id="1c2100ca-bad5-41f5-9707-7bf4edc08383"
Title="Prevents Duplicate Item"
Description="Prevents duplicate Name in the "My List" List"
Version="12.0.0.0"
Hidden="FALSE"
Scope="Web"
DefaultResourceFile="core"
xmlns="http://schemas.microsoft.com/sharepoint/">
<ElementManifests>
<ElementManifest Location="elements.xml"/>
</ElementManifests>
</Feature>
Element.xml
<?xml version="1.0" encoding="utf-8" ?>
<Elements xmlns="http://schemas.microsoft.com/sharepoint/">
<Receivers ListTemplateId="100">
<Receiver>
<Name>AddingEventHandler</Name>
<Type>ItemAdding</Type>
<SequenceNumber>10000</SequenceNumber>
<Assembly>AAA.BBB, Version=1.0.0.0, Culture=neutral, PublicKeyToken=8003cf0cbff32406</Assembly>
<Class>AAA.BBB.PreventDuplicateItem</Class>
<Data></Data>
<Filter></Filter>
</Receiver>
</Receivers>
</Elements>
Below link explains adding the list events.
http://www.dotnetspark.com/kb/1369-step-by-step-guide-to-list-events-handling.aspx
Reference link:
http://msdn.microsoft.com/en-us/library/ms437502(v=office.12).aspx
http://msdn.microsoft.com/en-us/library/ff713710(v=office.12).aspx
Amalaraja Fernando,
SharePoint Architect
Please Mark As Answer if my post solves your problem or Vote As Helpful if a post has been helpful for you. This post is provided "AS IS" with no warrenties and confers no rights.

Recommended way for binding the list event handler to the list instance is through feature receivers.
You need to create a feature file like the below sample
<?xmlversion="1.0"encoding="utf-8"?>
<Feature xmlns="http://schemas.microsoft.com/sharepoint/"
Id="{20FF80BB-83D9-41bc-8FFA-E589067AF783}"
Title="Installs MyFeatureReceiver"
Description="Installs MyFeatureReceiver" Hidden="False" Version="1.0.0.0" Scope="Site"
ReceiverClass="ClassLibrary1.MyFeatureReceiver"
ReceiverAssembly="ClassLibrary1, Version=1.0.0.0, Culture=neutral,
PublicKeyToken=6c5894e55cb0f391">
</Feature>For registering/binding the list event handler to the list instance, use the below sample codeusing System;
using Microsoft.SharePoint;
namespace ClassLibrary1
    public class MyFeatureReceiver: SPFeatureReceiver
        public override void FeatureActivated(SPFeatureReceiverProperties properties)
            SPSite siteCollection = properties.Feature.Parent as SPSite;
            SPWeb site = siteCollection.AllWebs["Docs"];
            SPList list = site.Lists["MyList"];
            SPEventReceiverDefinition rd = list.EventReceivers.Add();
            rd.Name = "My Event Receiver";
            rd.Class = "ClassLibrary1.MyListEventReceiver1";
            rd.Assembly = "ClassLibrary1, Version=1.0.0.0, Culture=neutral,
                PublicKeyToken=6c5894e55cb0f391";
            rd.Data = "My Event Receiver data";
            rd.Type = SPEventReceiverType.FieldAdding;
            rd.Update();
        public override void FeatureDeactivating(SPFeatureReceiverProperties properties)
            SPSite sitecollection = properties.Feature.Parent as SPSite;
            SPWeb site = sitecollection.AllWebs["Docs"];
            SPList list = site.Lists["MyList"];
            foreach (SPEventReceiverDefinition rd in list.EventReceivers)
                if (rd.Name == "My Event Receiver")
                    rd.Delete();
        public override void FeatureInstalled(SPFeatureReceiverProperties properties)
        public override void FeatureUninstalling(SPFeatureReceiverProperties properties)
}Reference link: http://msdn.microsoft.com/en-us/library/ff713710(v=office.12).aspxOther ways of registering the list event handlers to the List instance are through code, stsadm commands and content types.
Amalaraja Fernando,
SharePoint Architect
Please Mark As Answer if my post solves your problem or Vote As Helpful if a post has been helpful for you. This post is provided "AS IS" with no warrenties and confers no rights.

How to handle the dynamic rows in pdf table

Dear All,
earlier i posted one thread reagarding getting pdf table data
[facing problem while getting interactive form table data;
this is working fine, i sued bind_table in wddoinit, but here i am fixing the rows count and bind_table.
for example i have initially taken row count as 3 then i want to increase the rows in pdf table.
i know we can use the formcalc to increase the rows by taking a button in pdf layout.
this also working, but the data is not picking for newly added rows, i hope the problem is because the table node in the context is not binded for this new rows.
even i tried using with webdynpro native button controlls still not working.
any one help me what exactly this bind_table is doing and how to handle this code in form calc.
since my table is pdf table.
Thanks,
Mahesh.Gattu

Hi Thomas,
Thanks for your confirmation,
i have checked the paramets of submit button we have only wdevent parameters they are
CL_WD_CUSTOM_EVENT
          PARAMETERS - Hashed table having 2 columns
          ID     ->IF_TDS (Interactive Form element Name)
         CONTEXT_ELEMENT     ->->
these are same in case of submit button1 and submit button 2.
          NAME - Name of the Button Event i.e ON_SUBMIT ( this is also same in both the buttons).
so i think it is not possible to work with multiple buttons by assinging to multiple tables on form.
The other option is to place the buttons outside of the forum in the surrounding WDA area.
This way you have no problem handling the events.
in wddoinit if i use bind_table with 5 rows form table is populating with 5 rows, but when i take a button
out side the form and use bind_table by incremeting the rows the pdf table rows are not adding, if i enter
some thing on pdf table then click on add row button then the table rows are getting add. if i don't do any
action on pdf table and click on add row button pdf is not getting update.
is there any issue.. if i don't keep cursor on table and type some thing.. the add button is not updating
the rows.
if i take a button on wd view i.e outside the form and use bind table i shall add the rows.. but in case of remove rows how to do.
in case of normal table we can use Remove_Element( ) but how can i know the selected row from the pdf table, please help me in this concern also.
Regards,
Mahesh.Gattu
Edited by: Maheshkumar gattu on Jan 7, 2009 3:57 PM
Edited by: Maheshkumar gattu on Jan 7, 2009 4:03 PM
Edited by: Maheshkumar gattu on Jan 7, 2009 5:21 PM

Hi gurur's how we do the interactive report in ALV

hi gurur's how we do the interactive report in ALV.
PLZ HELP ME

Hi Srivasu,
                I will send a sample code along with Comments check it once ok.copy the below code and execute it and debug it ok..
*& Report YPURCHASEORDER_ALV_LISTDISP                                 *
*& DEVELOPER : KIRAN KUMAR.G                                         *
& PURPOSE    : CREATING A PURCHASE ORDER BASED ON PURCHASE DOC NUMBER
*& CREATION DT: 22/11/2007                                            *
*& REQUEST   : ERPK900035                                             *
REPORT YPURCHASEORDER_ALV_LISTDISP.
Tables
TABLES : ekko, "Purchasing Document Header
         ekpo. "Purchasing Document Item
Type pools
TYPE-POOLS: slis.
Internal Tables
DATA: BEGIN OF gt_headerdat OCCURS 0,
       ebeln LIKE ekko-ebeln,        " Purchasing Document Number
       bukrs LIKE ekko-bukrs,        " Company Code
       bstyp LIKE ekko-bstyp,        " Purchasing Document Category
       bsart LIKE ekko-bsart,        " Purchasing Document LIKE
       aedat LIKE ekko-aedat,        " Date on which the recordwascreate
       ernam LIKE ekko-ernam,        " Name of Person who Created Object
       lifnr LIKE ekko-lifnr,        " Vendor's account number
       spras LIKE ekko-spras,        " Language Key
       ekorg LIKE ekko-ekorg,        " Purchasing Organization
       ekgrp LIKE ekko-ekgrp,        " Purchasing group
      END OF gt_headerdat.
DATA: BEGIN OF gt_item OCCURS 0,
       matnr LIKE ekpo-matnr,        "Material Number
       werks LIKE ekpo-werks,        "Plant
       lgort LIKE ekpo-lgort,        "Storage location
       matkl LIKE ekpo-matkl,        "Material group
       menge LIKE ekpo-menge,        "Purchase order quantity
       meins LIKE ekpo-meins,        "Order unit
       netpr LIKE ekpo-netpr,        "Net price in purchasing document
       kunnr LIKE ekpo-kunnr,        "Customer Number 1
      END OF gt_item.
Global Structures
DATA: gt_header    TYPE slis_t_listheader, "For Headings
      wa_header    TYPE slis_listheader,
      gt_fieldcat TYPE slis_t_fieldcat_alv, "Structure Defintion
      wa_fieldcat TYPE slis_fieldcat_alv,
      gt_fieldcat1 TYPE slis_t_fieldcat_alv,
      wa_fieldcat1 TYPE slis_fieldcat_alv,
      wa_layout    TYPE slis_layout_alv,     "Layout
      gt_events    TYPE slis_t_event,        "For Events
      wa_events    TYPE slis_alv_event.
Selection Screen
SELECTION-SCREEN: BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
SELECT-OPTIONS : s_ebeln FOR ekko-ebeln.
SELECTION-SCREEN: END OF BLOCK b1.
Initialization
INITIALIZATION.
PERFORM initial.
Fetch Data
START-OF-SELECTION.
PERFORM fetch_data.
END-OF-SELECTION.
Bulid fieldcatalog
PERFORM fieldcat.
Change fieldcatalog
PERFORM fieldcat_change.
Events Triggering
PERFORM place_events.
Layout.
PERFORM layout.
Display Data
SORT gt_headerdat BY ebeln.
PERFORM display_list.
*&      Form initial
      text
--> p1        text
<-- p2        text
FORM initial .
s_ebeln-sign    = 'I'.
s_ebeln-option = 'BT'.
s_ebeln-low     = '3000000090'.
s_ebeln-high    = '3000000166'.
APPEND s_ebeln.
ENDFORM.                    " initial
*&      Form fetch_data
      text
--> p1        text
<-- p2        text
FORM fetch_data .
REFRESH gt_headerdat. "Clear the Body of Internal Table
CLEAR   gt_headerdat. "Clear Header Line
SELECT ebeln
         bukrs
         bstyp
         bsart
         aedat
         ernam
         lifnr
         spras
         ekorg
         ekgrp
    FROM ekko
    INTO TABLE gt_headerdat
   WHERE ebeln IN s_ebeln.
ENDFORM.                    " fetch_data
*&      Form display_list
      text
--> p1        text
<-- p2        text
FORM display_list .
CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
   EXPORTING
I_INTERFACE_CHECK              = ' '
I_BYPASSING_BUFFER             =
I_BUFFER_ACTIVE                = ' '
    i_callback_program             = sy-cprog
I_CALLBACK_PF_STATUS_SET       = ' '
    i_callback_user_command        = 'USERCOMMAND'
I_STRUCTURE_NAME               =
    is_layout                      = wa_layout
    it_fieldcat                    = gt_fieldcat
IT_EXCLUDING                   =
IT_SPECIAL_GROUPS              =
IT_SORT                        =
IT_FILTER                      =
IS_SEL_HIDE                    =
I_DEFAULT                      = 'X'
I_SAVE                         = ' '
IS_VARIANT                     =
    it_events                      = gt_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                       = gt_headerdat
   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.
ENDFORM.                    " display_list
*&      Form place_events
      text
--> p1        text
<-- p2        text
FORM place_events .
CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
    EXPORTING
      i_list_type     = 0
    IMPORTING
      et_events       = gt_events
    EXCEPTIONS
      list_type_wrong = 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.
CLEAR wa_events.   "Clear Header Line
READ TABLE gt_events INTO wa_events WITH KEY name = 'TOP_OF_PAGE'.
IF sy-subrc = 0.
    wa_events-form = 'HEADING'.
    MODIFY gt_events FROM wa_events INDEX sy-tabix.
ENDIF.
CLEAR wa_events.   "Clear Header Line
READ TABLE gt_events INTO wa_events WITH KEY name = 'END_OF_LIST'.
IF sy-subrc = 0.
    wa_events-form = 'PAGEDOWN'.
    MODIFY gt_events FROM wa_events INDEX sy-tabix.
ENDIF.
CLEAR wa_events.    "Clear Header Line
READ TABLE gt_events INTO wa_events WITH KEY name = 'USER_COMMAND'.
IF sy-subrc = 0.
    wa_events-form = 'USERCOMMAND'.
    MODIFY gt_events FROM wa_events INDEX sy-tabix.
ENDIF.
ENDFORM.                    " place_events
*&      Form layout
      text
--> p1        text
<-- p2        text
FORM layout .
CLEAR wa_layout.                   "Clear Header Line
wa_layout-zebra = 'X'.             "Zebra Lines in the Output
wa_layout-colwidth_optimize = 'X'. "Optimize the Column Width
ENDFORM.                    " layout
*&      Form heading
      text
FORM heading.
WRITE:/6 'THIS REPORT DISPLAYS THE PURCHASE ORDER DETAILS'.
WRITE:/6 'CLICK ON PURCHASE DOC NO FIELD(INTERACTIVE LIST)'.
ENDFORM.                    "heading
*&      Form fieldcat
      text
--> p1        text
<-- p2        text
FORM fieldcat .
CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
   EXPORTING
    i_program_name               = SY-CPROG
    i_internal_tabname           = 'GT_HEADERDAT'
I_STRUCTURE_NAME             =
I_CLIENT_NEVER_DISPLAY       = 'X'
    i_inclname                   = SY-CPROG
I_BYPASSING_BUFFER           =
I_BUFFER_ACTIVE              =
    CHANGING
    ct_fieldcat                  = gt_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.
ENDFORM.                    " fieldcat
*&      Form fieldcat_change
      text
--> p1        text
<-- p2        text
FORM fieldcat_change .
LOOP AT gt_fieldcat INTO wa_fieldcat.
    CASE wa_fieldcat-fieldname.
      WHEN 'EBELN'.
        wa_fieldcat-hotspot = 'X'.
    ENDCASE.
    MODIFY gt_fieldcat FROM wa_fieldcat INDEX sy-tabix.
ENDLOOP.
ENDFORM.                    " fieldcat_change
*&      Form pagedown
      text
FORM pagedown.
WRITE:/35 'HAVE A NICE DAY...' COLOR 4.
ENDFORM.                    "pagedown
*&      Form usercommand
      text
     -->UCOMM      text
     -->SELFIELD   text
FORM usercommand USING ucomm LIKE sy-ucomm selfield TYPE slis_selfield.
READ TABLE gt_headerdat INDEX selfield-tabindex.
CASE selfield-sel_tab_field.
    WHEN 'GT_HEADERDAT-EBELN'.
      REFRESH : gt_item.
      CLEAR   : gt_item.
      SELECT matnr
             werks
             lgort
             matkl
             menge
             meins
             netpr
             kunnr
        FROM ekpo
        INTO TABLE gt_item
       WHERE ekpo~ebeln EQ gt_headerdat-ebeln.
*Build a Field Catalog
      PERFORM fieldcat1.
*For Heading in the Interactive List
      PERFORM heading1.
*Display Interactive Data
      PERFORM display_data1.
ENDCASE.
ENDFORM.                    "usercommand
*&      Form fieldcat1
      text
--> p1        text
<-- p2        text
FORM fieldcat1 .
REFRESH : gt_fieldcat1.
CLEAR   : wa_fieldcat1.
wa_fieldcat1-col_pos    = '1'.           "Column Postion
wa_fieldcat1-fieldname = 'MATNR'.       "Field Name
wa_fieldcat1-tabname    = 'GT_ITEM'.   "Internal Table
wa_fieldcat1-key        = 'X'.           "Blue Color
wa_fieldcat1-seltext_l = 'MATERIAL NO'. "Display Text Screen
APPEND wa_fieldcat1 TO gt_fieldcat1.
CLEAR wa_fieldcat1.
wa_fieldcat1-col_pos    = '2'.           "Column Postion
wa_fieldcat1-fieldname = 'WERKS'.       "Field Name
wa_fieldcat1-tabname    = 'GT_ITEM'.   "Internal Table
wa_fieldcat1-seltext_l = 'PLANT'.       "Display Text Screen
APPEND wa_fieldcat1 TO gt_fieldcat1.
CLEAR wa_fieldcat1.
wa_fieldcat1-col_pos    = '3'.           "Column Postion
wa_fieldcat1-fieldname = 'LGORT'.       "Field Name
wa_fieldcat1-tabname    = 'GT_ITEM'.   "Internal Table
wa_fieldcat1-seltext_l = 'STORAGE LOCATION'."Display Text Screen
APPEND wa_fieldcat1 TO gt_fieldcat1.
CLEAR wa_fieldcat1.
wa_fieldcat1-col_pos    = '4'.            "Column Postion
wa_fieldcat1-fieldname = 'MATKL'.        "Field Name
wa_fieldcat1-tabname    = 'GT_ITEM'.    "Internal Table
wa_fieldcat1-seltext_l = 'MATERIAL GRP'. "Display Text Screen
APPEND wa_fieldcat1 TO gt_fieldcat1.
CLEAR wa_fieldcat1.
wa_fieldcat1-col_pos    = '5'.            "Column Postion
wa_fieldcat1-fieldname = 'MENGE'.        "Field Name
wa_fieldcat1-tabname    = 'GT_ITEM'.    "Internal TAble
wa_fieldcat1-seltext_l = 'PO QUANTITY'. "Display Text Screen
APPEND wa_fieldcat1 TO gt_fieldcat1.
CLEAR wa_fieldcat1.
wa_fieldcat1-col_pos    = '6'.            "Column Pos tion
wa_fieldcat1-fieldname = 'MEINS'.        "Field Name
wa_fieldcat1-tabname    = 'GT_ITEM'.    "Internal TAble
wa_fieldcat1-seltext_l = 'BASE UNIT MEASURE'."Display Text Screen
APPEND wa_fieldcat1 TO gt_fieldcat1.
CLEAR wa_fieldcat1.
wa_fieldcat1-col_pos    = '7'.            "Column Postion
wa_fieldcat1-fieldname = 'NETPR'.        "Field Name
wa_fieldcat1-tabname    = 'GT_ITEM'.    "Internal Table
wa_fieldcat1-seltext_l = 'NET PRICE'.    "Display Text Screen
APPEND wa_fieldcat1 TO gt_fieldcat1.
CLEAR wa_fieldcat1.
wa_fieldcat1-col_pos    = '8'.            "Column Postion
wa_fieldcat1-fieldname = 'KUNNR'.        "Field Name
wa_fieldcat1-tabname    = 'GT_ITEM'.    "Internal Table
wa_fieldcat1-seltext_l = 'CUSTOMER NO'. "Display Text Screen
APPEND wa_fieldcat1 TO gt_fieldcat1.
CLEAR wa_fieldcat1.
ENDFORM.                                                    " fieldcat1
*&      Form heading1
      text
--> p1        text
<-- p2        text
FORM heading1 .
REFRESH : gt_header.
CLEAR   : wa_header.
wa_header-typ = 'H'.
wa_header-info = 'THIS IS AN INTERACTIVE LIST'.
APPEND wa_header TO gt_header.
ENDFORM.                                                    " heading1
*&      Form top
      text
FORM top.
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
    EXPORTING
    it_list_commentary       = gt_header
I_LOGO                   =
I_END_OF_LIST_GRID       =
ENDFORM.                    "top
*&      Form display_data1
      text
--> p1        text
<-- p2        text
FORM display_data1 .
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
   EXPORTING
I_INTERFACE_CHECK                 = ' '
I_BYPASSING_BUFFER                = ' '
I_BUFFER_ACTIVE                   = ' '
    i_callback_program                = SY-CPROG
I_CALLBACK_PF_STATUS_SET          = ' '
I_CALLBACK_USER_COMMAND           = ' '
    i_callback_top_of_page            = 'TOP'
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                       = gt_fieldcat1
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
IT_ALV_GRAPHICS                   =
IT_HYPERLINK                      =
IT_ADD_FIELDCAT                   =
IT_EXCEPT_QINFO                   =
I_HTML_HEIGHT_TOP                 =
I_HTML_HEIGHT_END                 =
IMPORTING
E_EXIT_CAUSED_BY_CALLER           =
ES_EXIT_CAUSED_BY_USER            =
    TABLES
    t_outtab                          = gt_item
   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.
ENDFORM.                    " display_data1
Reward points if helpful.
Kiran Kumar.G.A
        Have a Nice Day..

How to handle server event in component through BOL Concept

Hi All,
            Please let me know how o handle Server event in Component through BOL Concept.
Thanks,
Prameela.

Hi Prameela,
If you want the server event to be triggered in the search view, you have to add the code in the GET_DQUERY_DEFINITIONS method.
DATA: lv_getter TYPE string.
CONCATENATE 'GET_P_' <rt_result>-field INTO lv_getter.
    TRANSLATE lp_getter TO UPPER CASE.                    "#EC SYNTCHAR
    TRY.
        CALL METHOD me->(lp_getter)
          CHANGING
            cs_result = <rt_result>.
      CATCH cx_sy_dyn_call_illegal_method.
*     no P-Getter found
    ENDTRY.
Regards,
Leon

How to handle the selected record

how to handle the selected record when using alv classes

Hi,
use method : get_current_cell
CALL METHOD grid1->get_current_cell
                      IMPORTING es_row_id = ls_row_id
                                es_col_id = ls_col_id
                                 e_value = l_value.

How to create the event in the report for jobs scheduling.

Hi Experts,
i have a requirement like as follows:
The following triggers for Batch Jobs in the SCM system will be created.i.
Background Processing Event = u201CAPO Background Processing Eventu201D. After sending the Event, write a Log Report line u201CEvent u201CAPO Background Processing Eventu201D sentu201D.
Could you please suggest me how we create the Event or which transaction ?
Please give me a steps for creating events so that based on these events we use
CALL METHOD cl_batch_event=>raise
    EXPORTING
      i_eventid                      = p_bpeve
      i_server                       = p_server
      i_ignore_incorrect_server      = p_ignore
    EXCEPTIONS
      excpt_raise_failed             = 1
      excpt_server_accepts_no_events = 2
      excpt_raise_forbidden          = 3
      excpt_unknown_event            = 4
      excpt_no_authority             = 5
      OTHERS                         = 6.
Right now i received message "APO Background Processing Event" is doesn't exists.
Thanks in Advance.
Puneet.

Hi Puneet,
Goto transaction SM62 and in there to BckProcEvents tab. There you can create the events.
You just need to specify the name and Description of an event.
Hope this serves your purpose.
Thanks

How to get the actual data in ALV report

I am doing some upgradation work in that i am using Submit & And return and also i am using some function modules like LIST FROM MEMORY , LIST TO TXT wnd WRITE LIST , it gives output in normal list format , But i need to print in ALV report .
With the use of set table for 1st display i got the ALV report but not with actual data, (some junk value is showing) , So can any 1 suggest me how to get the actual data in ALV report, With the use of Any Function Module or with Coding,
with regards,

Hi Saravana
I am sure you must be getting the values in tables of table parameters from every FM.
consolidate the values from tables of all FMs in one table and built ALV for that table only.
I hope this way you can show the actual data in ALV.
thanks
Lalit

How to handle the event "GROUPLEVEL_CHANGE" in ALV?

Similar Messages

Maybe you are looking for