Menu items in the screen

[Former Member]

Hi Everyone,

I have created screens and for this i have the application toolbar, standard toolbar, menu bar.

like the program help etc.

I want to create menu items in the menu bar apart from program & help which is created by default, like eg say screen object etc. and within each item i want a drop down menu with item like in the screen i have 3 pushbuttons, i want in the screen drop down menu these menu items but1, but2 etc.

How do i acheive this,

Any help on this will be of great use to me.

Thanks in advance,

Prabs.

[Former Member]

Hi Everyone,

I have created screens and for this i have the application toolbar, standard toolbar, menu bar.

like the program help etc.

I want to create menu items in the menu bar apart from program & help which is created by default, like eg say screen object etc. and within each item i want a drop down menu with item like in the screen i have 3 pushbuttons, i want in the screen drop down menu these menu items but1, but2 etc.

How do i acheive this,

Any help on this will be of great use to me.

Thanks in advance,

Prabs.

[Former Member]

You need to create a menu in SE41 and call it in your PBO of the screen using the syntax SET PF-STATUS 'ABC'.

[RichHeilman]

The menu is just another part of the gui status. If you double click on the SET PF-STATUS 'XXX' in your program, it will take you to the gui status. Here in the first section is the Menu setup. Here is where you will build your menu.

Regards,

Rich Heilman

[Former Member]

Hi,

Double click on the ZSTATUS and in the applictaion toolbar create the buttons pass the function code BUT1 and perform some opertaion.

MODULE status_9001 OUTPUT.

  IF o_dockingcontainer IS INITIAL.

    SET PF-STATUS 'ZSTATUS'.
    SET TITLEBAR 'ZTITLE'.
.................
  ENDIF.

ENDMODULE.                 " STATUS_9001  OUTPUT

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.

    WHEN 'BACK'.
      PERFORM f9600_free_objects:
               USING o_alvgrid 'ALV' text-e02,
               USING o_dockingcontainer 'DOCKING'
                       text-e01.
      SET SCREEN '0'.
      LEAVE SCREEN.
<b>    WHEN 'BUT1'.
     perform...............</b>

    WHEN OTHERS.

  ENDCASE.

ENDMODULE.                 " USER_COMMAND_9001  INPUT

Hope this too helps.