Size of Push Button

Hi,
does anybody knows how to set the size of the push button in the selection screen...
Thank you...
regards,
mae

hi
SELECTION-SCREEN PUSHBUTTON (20) w_button USER-COMMAND BUT1.
and see the following link
http://help.sap.com/saphelp_nw04/helpdata/en/9f/dba81635c111d1829f0000e829fbfe/content.htm
Narasimha

Similar Messages

How to add push button in report.

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

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

How to upload an icon for a toolbar push button

I'd like to be able to define/upload an icon that I can use for a new push button on a toolbar for the FB03 screen.
1) How can I upload the button icon?
      From here?
      ABAP User Dialogs ->Screens ->Complex Screen Elements ->GUI controls on screen
      Or somewhere totally differently?
2) What file format does a button icon need to be in and what is the suggested pixel size?
This is how I'm thinking of creating the button:
lv_icon             = '@11@'.
adding button to toolbar
call method gref_toolbar->add_button
   exporting
    fcode            = lv_fcode
    icon             = lv_icon
    is_disabled      = lv_is_disabled
    butn_type        = cntb_btype_button
    quickinfo        = lv_quickinfo
   exceptions
    cntl_error       = 1
    cntb_btype_error = 2
    cntb_error_fcode = 3
    others           = 4

Hi
In Module Pool Programming (Or Dialog Programming) we can set the icons to buttons in the Menu Painter (SE 41).
Go to SE41 and select the FCODE for which you want to upload icon. Double Click on the FCODE it will POP a Screen
in which you can see the field to upload icon.
Hope this would help you.
Murthy

'Create' Push button is not working in BDC and LSMW while uploading G/L master data

Hello Experts:
I am facing the following problem:
While uploading G/L master data with the BDC program, 'create' push button is not working even after executing following lines.
PERFORM BDC_DYNPRO      USING 'SAPLGL_ACCOUNT_MASTER_MAINTAIN' '2001'.
PERFORM BDC_FIELD       USING 'BDC_OKCODE'
                               '=ACC_CRE'.
Create G/L account screen is not coming in BDC. Please suggest me what to do.
Thanks !!

Re: 'Create' Push button is not working in BDC and LSMW while uploading G/L master data
Re: 'Create' Push button is not working in BDC and LSMW while uploading G/L master data
Hi Glen Anthony
Thank you for the reply Glen Anthony please take a look at the following code.
REPORT ZFI_BDC_FS00
        NO STANDARD PAGE HEADING LINE-SIZE 255.
*INCLUDE BDCRECX1.
TYPES : BEGIN OF STR,
   BUKRS TYPE GLACCOUNT_SCREEN_KEY-BUKRS,        "Company Code
   SAKNR TYPE GLACCOUNT_SCREEN_KEY-SAKNR,        "G/L Account Number
   KTOKS TYPE GLACCOUNT_SCREEN_COA-KTOKS,        "G/L Account Group
   XPLACCT TYPE GLACCOUNT_SCREEN_COA-XPLACCT,    "P&L statement account
   XBILK TYPE GLACCOUNT_SCREEN_COA-XBILK,        "Indicator: Account is a balance sheet account?
   TXT20_ML TYPE GLACCOUNT_SCREEN_COA-TXT20_ML, "G/L account short text
   TXT50_ML TYPE GLACCOUNT_SCREEN_COA-TXT50_ML, "G/L account short text
   WAERS TYPE GLACCOUNT_SCREEN_CCODE-WAERS,      "Account currency
   XSALH TYPE GLACCOUNT_SCREEN_CCODE-XSALH,      "Indicator: Only Manage Balances in Local Currency
   MWSKZ TYPE GLACCOUNT_SCREEN_CCODE-MWSKZ,      "Tax Category in Account Master Record
   XMWNO TYPE GLACCOUNT_SCREEN_CCODE-XMWNO,      "Indicator: Tax code is not a required field
   MITKZ TYPE GLACCOUNT_SCREEN_CCODE-MITKZ,      "Account is reconciliation account
   XOPVW TYPE GLACCOUNT_SCREEN_CCODE-XOPVW,      "Indicator: Open item management?
   XKRES TYPE GLACCOUNT_SCREEN_CCODE-XKRES,      "Indicator: Can Line Items Be Displayed by Account?
   ZUAWA TYPE GLACCOUNT_SCREEN_CCODE-ZUAWA,      "Key for sorting according to assignment numbers
   FSTAG TYPE GLACCOUNT_SCREEN_CCODE-FSTAG,      "Field status group
   XINTB TYPE GLACCOUNT_SCREEN_CCODE-XINTB,      "Indicator: Is account only posted to automatically?
   END OF STR.
DATA : ITAB TYPE TABLE OF STR WITH HEADER LINE,
        IT_BDCDATA TYPE TABLE OF BDCDATA WITH HEADER LINE,
        TXT(4096) TYPE C OCCURS 0,
        MSG TYPE STRING,
        COUNT(5) TYPE N.
SELECTION-SCREEN : BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-001.
   PARAMETERS : MY_FILE TYPE RLGRAP-FILENAME.
SELECTION-SCREEN : END OF BLOCK B1.
AT SELECTION-SCREEN ON VALUE-REQUEST FOR MY_FILE.
CALL FUNCTION 'F4_FILENAME'
EXPORTING
    PROGRAM_NAME        = SYST-CPROG
    DYNPRO_NUMBER       = SYST-DYNNR
*   FIELD_NAME          = ' '
IMPORTING
    FILE_NAME           = MY_FILE
CALL FUNCTION 'TEXT_CONVERT_XLS_TO_SAP'
   EXPORTING
*   I_FIELD_SEPERATOR          =
*   I_LINE_HEADER              =
     I_TAB_RAW_DATA             = TXT
     I_FILENAME                 = MY_FILE
   TABLES
     I_TAB_CONVERTED_DATA       = ITAB[]
EXCEPTIONS
    CONVERSION_FAILED          = 1
    OTHERS                     = 2
IF SY-SUBRC <> 0.
* IMPLEMENT SUITABLE ERROR HANDLING HERE
ENDIF.
START-OF-SELECTION.
COUNT = 0.
LOOP AT ITAB.
*PERFORM OPEN_GROUP.
REFRESH IT_BDCDATA.
PERFORM BDC_DYNPRO      USING 'SAPLGL_ACCOUNT_MASTER_MAINTAIN' '2001'.
PERFORM BDC_FIELD       USING 'BDC_CURSOR'
                               'GLACCOUNT_SCREEN_KEY-BUKRS'.
PERFORM BDC_FIELD       USING 'BDC_OKCODE'
                               '=ACC_CRE'.
*PERFORM BDC_FIELD       USING 'BDC_CURSOR'
*                              'GLACCOUNT_SCREEN_KEY-BUKRS'.
PERFORM BDC_FIELD       USING 'GLACCOUNT_SCREEN_KEY-SAKNR'
                               ITAB-SAKNR. "'5'.
PERFORM BDC_FIELD       USING 'GLACCOUNT_SCREEN_KEY-BUKRS'
                               ITAB-BUKRS. "'TATA'.
PERFORM BDC_DYNPRO      USING 'SAPLGL_ACCOUNT_MASTER_MAINTAIN' '2001'.
PERFORM BDC_FIELD       USING 'BDC_OKCODE'
                               '=2102_GROUP'.
PERFORM BDC_FIELD       USING 'BDC_CURSOR'
                               'GLACCOUNT_SCREEN_COA-KTOKS'.
PERFORM BDC_FIELD       USING 'GLACCOUNT_SCREEN_COA-KTOKS'
                               ITAB-KTOKS. "'GL'.
PERFORM BDC_FIELD       USING 'GLACCOUNT_SCREEN_COA-XPLACCT'
                               ITAB-XPLACCT. "'X'.
PERFORM BDC_DYNPRO      USING 'SAPLGL_ACCOUNT_MASTER_MAINTAIN' '2001'.
PERFORM BDC_FIELD       USING 'BDC_OKCODE'
                               '=2102_BS_PL'.
PERFORM BDC_FIELD       USING 'BDC_CURSOR'
                               'GLACCOUNT_SCREEN_COA-XBILK'.
PERFORM BDC_FIELD       USING 'GLACCOUNT_SCREEN_COA-KTOKS'
                               ITAB-KTOKS. "'GL'.
PERFORM BDC_FIELD       USING 'GLACCOUNT_SCREEN_COA-XPLACCT'
                               ITAB-XPLACCT. "''.
PERFORM BDC_FIELD       USING 'GLACCOUNT_SCREEN_COA-XBILK'
                               ITAB-XBILK. "'X'.
PERFORM BDC_DYNPRO      USING 'SAPLGL_ACCOUNT_MASTER_MAINTAIN' '2001'.
PERFORM BDC_FIELD       USING 'BDC_OKCODE'
                               '=TAB02'.
PERFORM BDC_FIELD       USING 'GLACCOUNT_SCREEN_COA-KTOKS'
                               ITAB-KTOKS. "'GL'.
PERFORM BDC_FIELD       USING 'GLACCOUNT_SCREEN_COA-XBILK'
                               ITAB-XBILK. "'X'.
PERFORM BDC_FIELD       USING 'BDC_CURSOR'
                               'GLACCOUNT_SCREEN_COA-TXT50_ML'.
PERFORM BDC_FIELD       USING 'GLACCOUNT_SCREEN_COA-TXT20_ML'
                               ITAB-TXT20_ML. "'G/L ACCOUNT'.
PERFORM BDC_FIELD       USING 'GLACCOUNT_SCREEN_COA-TXT50_ML'
                               ITAB-TXT50_ML. "'G/L ACCOUNT'.
PERFORM BDC_DYNPRO      USING 'SAPLGL_ACCOUNT_MASTER_MAINTAIN' '2001'.
PERFORM BDC_FIELD       USING 'BDC_OKCODE'
                               '=TAB03'.
PERFORM BDC_FIELD       USING 'GLACCOUNT_SCREEN_CCODE-WAERS'
                               ITAB-WAERS. "'INR'.
PERFORM BDC_FIELD       USING 'GLACCOUNT_SCREEN_CCODE-XSALH'
                               ITAB-XSALH. "'X'.
PERFORM BDC_FIELD       USING 'GLACCOUNT_SCREEN_CCODE-MWSKZ'
                               ITAB-MWSKZ. "'*'.
PERFORM BDC_FIELD       USING 'GLACCOUNT_SCREEN_CCODE-XMWNO'
                               ITAB-XMWNO. "'X'.
PERFORM BDC_FIELD       USING 'GLACCOUNT_SCREEN_CCODE-MITKZ'
                               ITAB-MITKZ. "''.
PERFORM BDC_FIELD       USING 'BDC_CURSOR'
                               'GLACCOUNT_SCREEN_CCODE-ZUAWA'.
PERFORM BDC_FIELD       USING 'GLACCOUNT_SCREEN_CCODE-XOPVW'
                               ITAB-XOPVW. "'X'.
PERFORM BDC_FIELD       USING 'GLACCOUNT_SCREEN_CCODE-XKRES'
                               ITAB-XKRES. "'X'.
PERFORM BDC_FIELD       USING 'GLACCOUNT_SCREEN_CCODE-ZUAWA'
                               ITAB-ZUAWA. "'1'.
PERFORM BDC_DYNPRO      USING 'SAPLGL_ACCOUNT_MASTER_MAINTAIN' '2001'.
PERFORM BDC_FIELD       USING 'BDC_OKCODE'
                               '=SAVE'.
PERFORM BDC_FIELD       USING 'BDC_CURSOR'
                               'GLACCOUNT_SCREEN_CCODE-XINTB'.
PERFORM BDC_FIELD       USING 'GLACCOUNT_SCREEN_CCODE-FSTAG'
                               ITAB-FSTAG. "'G019'.
PERFORM BDC_FIELD       USING 'GLACCOUNT_SCREEN_CCODE-XINTB'
                               ITAB-XINTB. "'X'.
*PERFORM BDC_TRANSACTION USING 'FS00'.
CALL TRANSACTION 'FS00' USING IT_BDCDATA MODE 'E' UPDATE 'S'.
COUNT = COUNT + 1.
*PERFORM CLOSE_GROUP.
ENDLOOP.
CONCATENATE COUNT ' RECORDS UPDATED SUCCESSFULLY' INTO MSG.
MESSAGE MSG TYPE 'I'.
FORM BDC_DYNPRO USING PROGRAM DYNPRO.
   CLEAR IT_BDCDATA.
   IT_BDCDATA-PROGRAM = PROGRAM.
   IT_BDCDATA-DYNPRO   = DYNPRO.
   IT_BDCDATA-DYNBEGIN = 'X'.
   APPEND IT_BDCDATA.
ENDFORM.
*        INSERT FIELD                                                  *
FORM BDC_FIELD USING FNAM FVAL.
* IF FVAL <> NODATA.
     CLEAR IT_BDCDATA.
     IT_BDCDATA-FNAM = FNAM.
     IT_BDCDATA-FVAL = FVAL.
     APPEND IT_BDCDATA.
* ENDIF.
ENDFORM.

How can I resolve the push button dot issue in oracle forms 10g..?

Hi All,
We have migrated to forms6i to forms10g, in 6i all the push button labels are displaying properly, but in 10g forms its giving dots like this … after displaying some characters. I guess its width problem but how come its changing in 10g alone.
Kindly give me any workaround to resolve this issue
Thanks in Advance
Thangaraj.

Hi All,
We have migrated the forms 6i to forms 10g R2.We are facing push button issue like,the lable is displayed in the button is reduced.Assume the button's label name is Cancel.Actully it is displaying like Can.....Due to Java used in forming the buttons.We have forms count nearly 300.We have diffent size buttons.
We have solution like
1.Manually
2.PC Creation
3.Java Class and Jar Files
4.JDAPI
5.basejini.htm
The method five,we have tried.But there is no changes after this changes also.
Can you guys please let us know the correct menthod(with steps 1 by 1) to do this in quickly.
2.There are look and feel 2 types oracle and generic,rather than this do we have any other type.We are looking for any cusrtomized settings in config files.
Thanks in Advance.
Regards,
GR

Increase the height of push button ?

Hi,
I want to increase the height of the push button in the selection screen in module pool. Please suggest.
Thanks in Advance.

Ya, the length can be increased. But.. Actually the problem is: there is a module pool program executing which a selection screen comes first. In the selection screen, there is a push button with some text written in it.
I need to increase the size of the push button , as well as the Text size, so that the people viewing the screen from the distance, will be able to see the Text clearly.
Please suggest some solution.
Thanks,
Saheli.

Is it possible to increase the height of the Push button in a screen?

Dear All,
Is it Possible to increase the height of the Push button in a screen (Module Pool Programming)?
Is it possible to increase the font size of the characters in a screen (Module Pool Programming)?

Hi Vijay,
My question is.. I want to know whether it is possible to increase the height of the Push button in a screen. If it is possible, How to increase the height of the Push button?

Push buttons

How many application buttons we can put on single selection screen?

Hi sandeep,
you use maximum of 83 buttons of size 1 each
only restriction is that offset you can use can be 83 only
run the below code
REPORT ZUPLOAD line-size 900.
TABLES sscrfields.
TYPE-POOLS icon.
SELECTION-SCREEN:
BEGIN OF SCREEN 500 AS WINDOW TITLE title,
    PUSHBUTTON 2(2) but1 USER-COMMAND cli1,
     PUSHBUTTON 4(2) but3 USER-COMMAND cli3,
      PUSHBUTTON 6(2) but4 USER-COMMAND cli4,
       PUSHBUTTON 8(2) but5 USER-COMMAND cli5,
        PUSHBUTTON 10(2) but6 USER-COMMAND cli6,
    PUSHBUTTON 12(2) but2 USER-COMMAND cli2,
       PUSHBUTTON 14(2) but9 USER-COMMAND cli9,
     PUSHBUTTON 16(2) but10 USER-COMMAND cli10,
         PUSHBUTTON 18(2) but11 USER-COMMAND cli11,
     PUSHBUTTON 20(2) but12 USER-COMMAND cli13,
      PUSHBUTTON 22(2) but13 USER-COMMAND cli14,
       PUSHBUTTON 24(2) but14 USER-COMMAND cli15,
        PUSHBUTTON 26(2) but15 USER-COMMAND cli16,
    PUSHBUTTON 28(2) but16 USER-COMMAND cli12,
       PUSHBUTTON 30(2) but7 USER-COMMAND cli7,
     PUSHBUTTON 83(2) but8 USER-COMMAND cli8,
     PUSHBUTTON 85(2) but9 USER-COMMAND cli9,
END OF SCREEN 500.
AT SELECTION-SCREEN.
break-point.
CASE sscrfields.
    WHEN 'CLI1'.
    WHEN 'CLI2'.
ENDCASE.
START-OF-SELECTION.
title = 'Push button'.
but1 = 'Button 1'.
but3 = 'Button 1'.
but3 = 'Button 1'.
but4 = 'Button 1'.
but5 = 'Button 1'.
but6 = 'Button 1'.
CALL FUNCTION 'ICON_CREATE'
    EXPORTING
      name   = icon_information
      text   = 'Button 2'
      info   = 'My Quickinfo'
    IMPORTING
      RESULT = but2
    EXCEPTIONS
      OTHERS = 0.
CALL SELECTION-SCREEN '0500' STARTING AT 10 10.
at debugger check the value of sscrfields here you can view every time a button is pressed you get respective values.
now think you must have got the point
reward points if info useful

Please increase the size of the button "Send" for ...

I use the iPad mini. The program is very small Skype button to send the message "Send". Its hard to push. Places nearby lot. Please increase the size of the button "Send"

Yeah, I too think the send button size is stupidly small. Do the Skype developers actually use iOS or do they all use a stylus when doing so? I guess they all use Windows Phones considering things .
I think they read this thread and intentionally made the button smaller in the latest release and, what's whats with using the iOS Location 'arrow' (GPS usage symbol) as the send button? Is the icon meant to be a paper plane?
Additionally, in my case, there is no need to have the emoticon button next to the send button because I have the emoticon (additonal) keyboard configured, so I can use that is I don't know the actual key systax to get a smilely face.

Forms push buttons' behavior at runtime

Hi
I would like to imitate the push buttonâs appearance & behavior like all built-in buttons in Oracle.
i.e.: when the mouse enters the button the button is raised and when mouse leaves the button is flattened.
Any ideas are appreciated.
Regards
Tony S. Garabedian

Hi Grant
Thanks for the reply, yeah that will help me since i want to do that too, i have 2 different sizes from the same icon and when the mouse enters the icon changes, just like the OEM buttons.
But i also wanna try the 'raise button' effect, it will be very nice to have a customized toolbar with that effect. I'll try it and post my results.
Regards
Tony S. Garabedian

My IPod nano doesn't know when I'm pushing buttons/using the wheel.

I tried everything Apple suggests for resetting it that didn't require pushing buttons on the actual IPod. I have even restored it to the factor settings. The HOLD button is NOT on, however when I slide to unlock, the Apple Icon comes up and then the home screen will come up, but then nothing. PLEASE HELP!

Do you have any better luck with that if you update to iTunes 10.6.1.7?
From the notes for the release:
iTunes 10.6.1 provides a number of improvements, including:
• Fixes several issues that may cause iTunes to unexpectedly quit while playing videos, changing artwork size in Grid view and syncing photos to devices.
• Addresses an issue where some iTunes interface elements are incorrectly described by VoiceOver and WindowEyes.
• Fixes a problem where iTunes may become unresponsive while syncing iPod nano or iPod shuffle.
• Resolves an ordering problem while browsing TV episodes in your iTunes library on Apple TV.
http://www.apple.com/itunes/download/

How do I use a push button digital trigger with my 6034E DAQ board?

I am only a Lab View toddler.
I am currently using a push button, wired to PFIO/TRIG1 and DGND, with a anolog trigger. However noise is causing my program to be triggered. I was told that a digital trigger would help to reduce the random triggering. How do I create a push button digital trigger?
Thanks

implement a schmitt trigger.
Struggling with Labview wrote in message
<[email protected]>...
>I am only a Lab View toddler.
>I am currently using a push button, wired to PFIO/TRIG1 and DGND, with
>a anolog trigger. However noise is causing my program to be triggered.
>I was told that a digital trigger would help to reduce the random
>triggering. How do I create a push button digital trigger?
>Thanks

Push button query!!!!!!! help needed

hello all,
I HAVE USED THIS LOGIC FOR MAKING THE DATA ASCENDING AND
DESECENDING,AND TRIED ALL THE
SOLUTIONS THAT WERE SUPPLIED BY MY FRIENDS IN THIS GROUP,BUT COULD NOT
CHANGE THE
VISUAL ATTRIBUTE OF THE BUTTON.I AM REPEATING MY QUERY.I WANT TO HAVE
THE
PUSH BUTTON TO SIGNIFY VISUALLY THE ASCENDING AND DESCENDING DATA I.E
WHEN THE
DATA COMES IN THE ASCENDING WAY,THE PUSH BUTTON
SHOULD HAVE A "inverted v"ACC CODE"" ALONG WITH NAME "ACC CODE" I.E IT SHOULD
LOOK LIKE "ACC CODE "ACC CODE inverted v "
AND WHEN THE DATA COMES IN THE DESCENDING WAY,THE PUSH BUTTON
SHOULD HAVE A " v".I.E IT SHOULD
LOOK LIKE "ACC CODE "ACC CODE' v' ".SO PLZ HELP me TO GET THIS .
Any changes should be made to nls_lang parameter in registry???????????
PLZ LET ME KNOW WHAT IS FONT THAT I SHOULD USE.U CAN CHANGE THE CODING
THAT I HAVE WRITTEN
IN THE "WHEN BUTTON PRESSED" TRIGGER OF ACC_CODE.
BEGIN
go_block('age_tran');
BEGIN
IF
get_item_property('PB_ACC_ORDER',LABEL)='&Acc Code' THEN
set_block_property('age_tran',order_by,'acc_code ASC');
execute_query(no_validate);
SET_ITEM_PROPERTY('PB_ACC_ORDER',LABEL,'&Acc Code'||'
'||upper(chr(94)));
ElSIF
get_item_property('pb_acc_order',LABEL)='&Acc Code'||'
'||upper(chr(94)) THEN
Set_block_property('age_tran',order_by,' acc_code DESC');
execute_query(no_validate);
SET_ITEM_PROPERTY('pb_acc_order',LABEL,'&Acc Code'||' '||'v');
ELSE
Set_block_property('age_tran',order_by,'BALANCE DESC');
execute_query(no_validate);
SET_ITEM_PROPERTY('pb_acc_order',LABEL,'&Acc Code');
END IF;
END;
END;
THANKING U

Hi Shiju,
U can use the combination of fornt slash(/) and back slash(\) to fulfil ur requirement.
For ascending u can use /\ and for descending u can use \/. Does this solve the purpose?
I think it will.
Suprabhat.

How can I open a .pdf file in a browser on a click on a push button

I am using oracle 10g developer suit for form designing.
There is a .pdf file in the application server.
I want it to open it in a browser when a push button is clicked.
Could you please tell me how can I do that?
Regards

hi
u can use web.show_document() for that.
but if you want to open pdf file only then use
client_host()
sarah

How to get GUI Status(Push Buttons) in ALV Report

Hi Friends
I have a requirement in a way that:
Once selection-screen was processed,an ALV report has to come and above the ALV List,I need a custom GUI Status(4 Push Button) with Push Buttons Logic.
Once I had clicks on thesse push button,I need to display one more ALV List and above this List,again I need a custom GUI Status(2 Push Buttons) with Push Buttons Logic.
Can anyone throw some light how we can achieve this.
Thanks for your cooperation!
Regards,
Madisetty

data: rt_extab type slis_t_extab,
        g_ucomm like sy-ucomm ,
        g_selfield type slis_selfield.
form alv_display .
call function 'REUSE_ALV_LIST_DISPLAY'
     exporting
     i_callback_program             = g_repid
     i_callback_pf_status_set       = 'PF_STATUS'
     i_callback_user_command        = 'USER_COMM'
       it_fieldcat                    = it_fldcat
      tables
        t_outtab                       = it_final1
perform pf_status using rt_extab.
perform user_comm using g_ucomm g_selfield .
endform.
form pf_status using    p_rt_extab.
set pf-status 'PF_STATUS' excluding p_rt_extab.
endform.
form user_comm using    p_ucomm like sy-ucomm
                         p_selfield type slis_selfield.
data: l_row type i.
case p_ucomm.
    when 'DISPLAY_PO'.
      loop at it_final1 into wa_final1.
        if wa_final1-sel eq 'X' .
          l_row = l_row + 1.
        endif.
        if l_row gt 1.
          message e004.
        endif.
        clear wa_final1.
      endloop.
      p_selfield-fieldname = 'SEL'.
      read table it_final1 into wa_final1 index p_selfield-tabindex .
      set parameter id 'BES' field wa_final1-ebeln.
      call transaction 'ME23N'.
endcase.
endform.
*create user interface for gui status by double clicking on 'PF_STATUS'.
*Check the above sample code .

Size of Push Button

Similar Messages

Maybe you are looking for