Quantcast
Channel: SCN: Message List
Viewing all articles
Browse latest Browse all 8776

Re: PF status in ALV LIST

$
0
0

Hi Bharani,

 

Please find the abap code for REUSE_ALV_GRID_DISPLAY and it is similar to REUSE_ALV_LIST_DISPLAY.

 

 

*-- Local Constants Declarations.

   CONSTANTS : lc_c_formname    TYPE slis_formname VALUE 'GUI_SET',

               lc_c_usercommand TYPE slis_formname VALUE 'USER_COMMAND'.

 

*-- Checking the data is available or not.

   IF gt_porder_item[] IS NOT INITIAL.

 

*-- Displaying the ALV Grid Display.

 

     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          = lc_c_formname

        i_callback_user_command           = lc_c_usercommand

*      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                      = text-035

*      I_GRID_SETTINGS                   =

*      IS_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             = 1

        i_screen_start_line               = 1

        i_screen_end_column               = 200

        i_screen_end_line                 = 30

*      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                          = gt_porder_item[]

      EXCEPTIONS

        program_error                     = 1

        OTHERS                            = 2.

     IF sy-subrc <> 0.

       MESSAGE s000(00) WITH text-049 DISPLAY LIKE c_e.

     ENDIF.

   ELSE.

*-- Raising the message if data is not there.

     MESSAGE s001(00) WITH text-034 DISPLAY LIKE c_e.

   ENDIF.



*&---------------------------------------------------------------------*

*&      Form  GUI_SET

*&---------------------------------------------------------------------*

*       PF STATUS

*----------------------------------------------------------------------*

*      -->RT_EXTAB   Function Code

*----------------------------------------------------------------------*

FORM gui_set USING rt_extab TYPE slis_t_extab .

 

*-- Set pf-status

   SET PF-STATUS 'GETDATA' .

 

ENDFORM.                    "GUI_SET



Thanks & Regards,

Raghunadh Kodali.




Viewing all articles
Browse latest Browse all 8776


<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>