V.V.Urgent(PF Status)

Question

I need to put some fields in the menu bar.
I got a T.code Z123.
If i executed it goes onto report screen 1000 and then calls Screen painter 100.
I need to put some  menu foelds in the Report screen.
I am sending the code to.
where to write PF status and its code for the menu feilds.
Want it Urgently.
Code Below
*& Report  Z_URL
REPORT  Z_URL MESSAGE-ID ZMSGID1..
TABLES PROJ.
DATA: html_control TYPE REF TO cl_gui_html_viewer,
      my_container TYPE REF TO cl_gui_custom_container.
DATA : BEGIN OF GI_DATA OCCURS 0,
       PSPID TYPE PROJ-PSPID,
       END OF GI_DATA.
initialization.
SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-001.
PARAMETERS P TYPE PROJ-PSPID.
SELECTION-SCREEN END OF BLOCK B1.
DATA PATH(2045) TYPE C.
AT SELECTION-SCREEN.
CALL SCREEN 200.
GI_DATA-PSPID = PROJ-PSPID.
APPEND GI_DATA.
CLEAR GI_DATA.
loop at gi_data.
  CONCATENATE 'http://manaswini/dm/indexsap.html?pr_id=' gi_data-pspid
',des_id=' gi_data-pspid into paTH(2045).
endloop.
  CALL SCREEN 0100.
*&      Module  ALV_DISPLAY  OUTPUT
      text
MODULE ALV_DISPLAY OUTPUT.
  IF my_container IS INITIAL.
    CREATE OBJECT my_container
        EXPORTING
            container_name = 'H_CONTAINER'
        EXCEPTIONS
            others = 1.
    CASE sy-subrc.
      WHEN 0.
      WHEN OTHERS.
        RAISE cntl_error.
    ENDCASE.
  ENDIF.
  IF html_control IS INITIAL.
    CREATE OBJECT html_control
         EXPORTING
              parent    = my_container.
    IF sy-subrc NE 0.
      RAISE cntl_error.
    ENDIF.
  endif.
  CALL METHOD html_control->show_url
    EXPORTING
      URL = path.
ENDMODULE.
*&      Module  STATUS_0100  OUTPUT
      text
MODULE STATUS_0100 OUTPUT.
  SET PF-STATUS 'ZSTATUS'.
  SET TITLEBAR '100'.
ENDMODULE.                 " STATUS_0100  OUTPUT
*&      Module  USER_COMMAND_0100  INPUT
      text
MODULE USER_COMMAND_0100 INPUT.
CASE SY-UCOMM.
WHEN 'RETURN'.
CALL SCREEN '1000'.
WHEN 'CANCEL'.
LEAVE PROGRAM.
ENDCASE.
ENDMODULE.                 " USER_COMMAND_0100  INPUT
*&      Module  cancel  INPUT
      text
MODULE cancel INPUT.
LEAVE PROGRAM.
ENDMODULE.                 " cancel  INPUT

Answer 1

double click on ur PF-STAUS in your program,
expand the + symbol beside the menu bar, then enter the text of the main menu, double click on the text to add more menu options under the main menu along with the associated tcode. now handle the tcode of the menu buttons in the PAI of the screen.
Ex:
CASE sy-ucomm.
  WHEN 'MENU1_ITEM1'
  WHEN MENU1_ITEM2'.
ENDCASE.