How to add push button in report.

Question

Hi,
how to add a push button in the standard list report and on clicking which the line-size of the screen should reduce from 300 to 100.
how to proceed.
Can anyone help me.
Regards
Guhapriyan

Answer 1

Hii Guhapriyam,
You can ceate PUSHBUTTON in selection-screen like Below
SELECTION-SCREEN PUSHBUTTON 2(10) text-004 USER-COMMAND CL1.
Create a variable to hold the processed PUSHBUTTON value like
DATA v_flag TYPE flag.
The PUSHBUTTON will be processed at the event AT SELECTION-SCREEN. So write your code like below
AT SELECTION-SCREEN.
   IF sy-ucomm EQ 'CL1'.
     v_flag = 1.          "Buttob clicked
   ENDIF.
START-OF-SELECTION.
IF v_flag EQ 1.
     NEW-PAGE LINE-SIZE 100.
ENDIF.
OR
The best way of doing this by setting PF-STATUS like
START-OF-SELCTION.
SET PF-STATUS 'ZSTATUS'.  "Double click on this and set the pushButton in standard toolbar option and in function key specify the BACK, EXIT and CANCEL button .
Then write your logic at the event AT USER-COMMAND.
AT USER-COMMAND.
   CASE sy-ucomm.
     WHEN 'RED'.
       NEW-PAGE LINE-SIZE 100.
     WHEN 'BACK' OR 'CANCEL' OR 'EXIT'.
       LEAVE SCREEN.
     WHEN OTHERS.
   ENDCASE.
regards
Syed