Push button set to calculate form

Hi Friends,
Ive to create calculator by simple form without any data service. Ive modeled form with push button to assign value from one field to another (push button option->action->system action->dynamic->action->formula with correct pass value from one field to another, but it doesn't work, it means field is empty after push button. do you know how to modeled button to put the result to the field? At the moment value puts to field automatically. I want to control this event by button. How?
Martin

Data Lines to be used as inputsSome parallel ports can be configured to use the data lines as inputs. It depends a great deal on the way the manufacturer designed the parallel port. With some models the data lines can be read the same way we read the control lines, by driving them to high logic so they will take on the value of an external signal. However, most parallel ports require that you set the direction bit for input. This is bit 5 in the Control register (base+2). If the port is capable of it, setting the direction bit high has the effect of making the lines tri-state so it can be driven externally. Sometimes it is also necessary to toggle bit 6 high or low. However, it should be noted that some manufacturers actually lock these bits so that software cannot change them. An example is shown below in Figure 7.
To test whether your data lines can be used for input, try the following:
Set bit 5 of the control register high (at base address+2).
With nothing connected to the port, write a couple of values to the data port, and read each back after you write it.
If the reads DON'T match the writes, your port is probably bidirectional. Setting C5 disabled the data outputs and you're reading the open inputs of the data-port buffer. If the reads DO match the writes, your port isn't bidirectional. The data outputs are still enabled, you're reading back what you wrote, and you won't be able to read external signals. If it is possible to use your data lines for input, then you just need to set control register bit 5 high and read from the value of the data lines at the base address.

Similar Messages

  • Push Button in Multirecord block and Record Number

    Hi All,
    I have a push button in Multirecord block.
    for eg. there are 5 records in that block and cursor is on 1st record. if users pressess the push button on 3rd record (or other than 1st record) i want to get that 3rd record number. i am not able to get this. i checked :system.trigger_record, cursor_record, mouse_record values but it is not working correctly.
    what code should i write in when-button-pressed trigger to work it the way i want.
    can anybody help.
    regds

    Yes i got it
    Re: multi-record push button
    set mouse navigable property to true for push button and you get the :system.trigger_record value.

  • How to Enable a Push Button In The Form That Is Always Greyed Out?

    Greetings All,
    I am trying to enable an existing "Return" Push Button(PB) which is always greyed out whenever the form is called in either an update or review mode. After some research, I found that this PB's functional property is "Enabled" (i.e. the enabled value = 'Yes'), and it is coded programatically set 'Off' in 30 places and 'On' in 2 places in the form that I inherit from my predecessor by using the following code:
    SET_ITEM_ON_OR_OFF('BLK_UPDATE.PB_RETURN', <XXXXX>);
    Where <XXXXX> could be either TRUE or FALSE. I've been spending a lot of time in trying to enable this "Return" PB (without modifying the existing programming code) by adding the 'SET_ITEM_ON_OR_OFF' built-in command to set the PB on in WHEN-BUTTON-PRESSED TRIGGER for the PB_RETURN and WHEN-NEW-FORM-INSTANCE Trigger, but all tries in vain. Could you please help me with the following question?
    What is the easiest way to enable a PB that is set programmatically?
    Is there something else I should know to enable a PB, in addition to what I have already mentioned above?
    Thanks in advance,
    Jinlan
    --

    Thanks all for your information and help. I included the following code, as suggested by Manu, in WHEN-MOUSE-DOWN TRIGGER for the PB_RETURN and WHEN-NEW-FORM-INSTANCE TRIGGER:
    SET_ITEM_PROPERTY ('BLK_UPDATE.PB_RETURN_WORK_REQ', ENABLED, PROPERTY_TRUE);
    and I made sure there was no " SET_ITEM_ON_OR_OFF('BLK_UPDATE.PB_RETURN_WORK_REQ', FALSE);" statements after the above code, but, the "Return" PB is still in grey; in other words, it is still not accessible when my form is called.
    Perhaps, I need to place the above SET_ITEM_PROPERTY code in a different trigger other than the triggers mentioned above, uh? Any thoughts on this?
    Manu,
    You are absolutely right that the "SET_ITEM_ON_OR_OFF" is an ih-house written procedure which is defined/stored in the Attached Libraries. (I should have checked before making the "built-in" assumption. Thanks for catching and clarifying this.) Please help me with the following questions:
    How do I view the procedure in the Attached Libraries???
    Thanks in advance,
    Jinlan
    --

  • Displaying Icons on Push Buttons in forms 10g

    How can i Display Icons on Push Buttons in forms 10g ?

    Set the property "Iconic" of the button to "Yes" and enterthe iconname in the Property "Icon Name" (without path and extension).
    About how to make items accesible in forms, have a look at this http://download.oracle.com/docs/cd/B14099_19/web.1012/b14032/configure009.htm

  • Issue with Icons display in PUSH BUTTONS in forms 11g

    Hello,
    This is regarding an issue with the icons background for the push buttons in the forms 11g. When we enable the icons for the buttons (.gif) they are visible on the
    top left corner of the buttons and not in the centre. In one of the forums it was written like this is a common problem in Forms 11g. Is there any way by which we can
    centralize this icons on the Forms buttons. Also I have heard that image editing tools can be used to centralize the icons. I tried with one of the tools but it seems
    like it is not working.
    Can somebody suggest a workaround for this?
    Thanks in Advance
    Ram

    I will assume you are attempting to use the images included in the Forms applet jar. These images are purposely structured so that the subject is off-centered. You should not see that same behavior if you use your own images or edit the ones built-in to Forms. However, keep in mind that the images packaged in the Forms applet jar are intended to be used in a menu toolbar and not custom buttons.
    For more information, refer to MyOracleSupport note 1391073.1 where I explain this in detail.
    Michael Ferrante
    Senior Principal Support Engineer
    Forms Global Technical Lead
    Oracle Corporation
    .

  • 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

  • Forms 9i/Forms 6i Push Button problems

    Hello All,
    I have a form that is using a bunch of Push Buttons. Each of these Push Buttons has a Access Key assigned to it.
    The main canvas is a tab canvas and there are some stacked canvases too. All of them are being displayed on the same window.
    If I press the access key a Push button when it is not being displayed on the screen, it still executes the When-Button-Pressed Trigger and is causing me some pain.
    How can I stop the When-Button-Pressed trigger from executing when the Push Button is hidden from view ?
    Your help will be greatly appreciated.
    Thanks
    Sriram

    You could make the button disabled when it is hidden.
    Regards,
    Robin Zimmermann
    Forms Product Management

  • Color of the push button in Forms 6i

    HI,
    I want to change the color of the push button from the default gray color to something else and also the font type. Is it possible? If yes, how to do it ?

    On Microsoft Windows, the colors of buttons, window title bars, and window borders are controlled by the Windows Control Panel color
    settings specified for these elements. You cannot override these colors in Form Builder even by using visual attributes.
    The button color attributes are controlled exclusively by the Color facility in the Control Panel.
    To define button color attributes do the following :
    1. To do this go to 'Settings' + 'control panel'.
    2. Double-click on 'display' and select 'appearance' from the menu .
    3. Select '3D Objects' from the 'item' list .
    4. The background color and the foreground color can be changed to your favourite ones.
    But the important thing to note here is that this will affect all the 3D objects in all the applications in your system .
    Or you can try this workaround if it is suitable. Use a display item with a "Bevel" property of "Raised" and the "Default Value"
    property whatever the label should be. Then attach a WHEN-MOUSE-CLICK trigger to it. You can change the foreground and background colors to whatever you want since it's really just a field.
    Abhijith Unnikannan,
    Oracle Support Services
    null

  • Text Items And Push Buttons Created on a customized form does not appear.

    Hi,
    I created a custom form and attached it to ebs. The form opens without any error.
    I had 3 text items and 2 push buttons with proper property class applied to them. But I am only able to see the prompt of the first text item. All the other widgets are not visible. What could be the possible cause for this.
    Deepak

    How are you running the form? Have you deployed it properly and attached it to a menu/form function and are viewing it within EBS?
    Did you open the TEMPLATE.fmb form and save a copy of it as the starting point for your custom form?
    --Johnnie                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                           

  • I want to stop loop through push button forms 10g

    I want to stop looping through push button forms 10g it is like (SwingWorker() in java) (DoEvent() in .net)
    The problem in forms 10g that when you start looping the form will freeze and you can't push any button on form, I found solution for that in form 6i through package d2kwutil **WIN_API_UTILITY.InterruptCheck(hButton)**
    But in 10g I can't find solution, Please help>>>>>
    declare
         hButton          PLS_INTEGER;
    begin
    :interruptcheck.counter := 0;
    hButton := get_item_property('INTERRUPTCHECK.PB_OFF',WINDOW_HANDLE);
    go_item('interruptcheck.loopcount');
    set_item_property('INTERRUPTCHECK.PB_OFF',ENABLED,PROPERTY_TRUE);
    set_item_property('INTERRUPTCHECK.PB',ENABLED,PROPERTY_FALSE);
    set_application_property(CURSOR_STYLE,'HELP');
    set_application_property(CURSOR_STYLE,'<d2kwut60>WAIT');
    for i in 1..:interruptcheck.loopcount LOOP
         if WIN_API_UTILITY.InterruptCheck(hButton) then
              exit;
         end if;
         :interruptcheck.counter := i;
         synchronize;
    end loop;
    set_item_property('INTERRUPTCHECK.PB_OFF',ENABLED,PROPERTY_FALSE);
    set_item_property('INTERRUPTCHECK.PB',ENABLED,PROPERTY_TRUE);
    set_application_property(CURSOR_STYLE,'DEFAULT');
    end;
    Edited by: wael amar on May 1, 2010 11:03 PM

    Ok, here's a working testcase.
    The idea is taken from an article from an oracle magazine (i don't have it at hand, , so i tried to rebuild it by "memory". As far as i remember the original was from the german doag-magazine and was written by Gerd Volberg).
    Procedure to do the looping:
    PROCEDURE PR_DO_THE_LOOP IS
      nNumberInOneStep NUMBER:=2;
      tm               TIMER;
    BEGIN
         DEFAULT_VALUE(0, 'GLOBAL.INDEX');
      IF :GLOBAL.INDEX=0 THEN
           -- Didn't run yet, determine the max count
           :GLOBAL.MAX:=10000;
      END IF;
      LOOP
           -- Do the looping stuff
           -- Decrease counter
           nNumberInOneStep:=nNumberInOneStep-1;
           -- Increase globale counter
           :GLOBAL.INDEX:=:GLOBAL.INDEX+1;
           -- Exit conditions
           EXIT WHEN nNumberInOneStep=0;
           EXIT WHEN TO_NUMBER(:GLOBAL.INDEX)>=TO_NUMBER(:GLOBAL.MAX);
      END LOOP;
      -- reset index at end
      IF TO_NUMBER(:GLOBAL.INDEX)>=TO_NUMBER(:GLOBAL.MAX) THEN
           :GLOBAL.INDEX:=0;
      ELSE
           -- start timer for next iteration
           tm:=CREATE_TIMER('TM', 10, NO_REPEAT);
      END IF;
    END;The WHEN-TIMER-EXPIRED-trigger
    IF :GLOBAL.INTERRUPTED='Y' THEN
         MESSAGE('Interrupted at index ' || :GLOBAL.INDEX);
    ELSE
         PR_DO_THE_LOOP;
    END IF;The WHEN-BUTTOn-PRESSED-trigger on the interrupt-button
    :GLOBAL.INTERRUPTED:='Y';The WHEN-BUTTOn-PRESSED-trigger on the "start"-button
    :GLOBAL.INTERRUPTED:='N';
    PR_DO_THE_LOOP;

  • Is it possible to set up a form with a submit button where the data in the fields gets added to an existing excel file, just like 'collect response' but without connecting to the internet?

    I have a form that I want to use to collect peoples information with a submit button. I am trying to get the data that gets inserted to be added to an existing excel doc when the submit button gets hit, the form then resets and someone else can fill in the same form, hit submit and his data gets added to the existing data in the same excel doc. It is basically the same as the 'collecting response' option but without having to be online. The form is going to be used at a boat-show and I am going to get people to fill it out on an iPad. Does anybody know if this is possible?

    You could connect a bunch of 3700s to each computer and do this . 
    Or...since you're the one who monitors the monthly limit, you could restrict an individual's internet access once you see that you guys are coming too close to the cap. 
    I don't work for Cisco. I'm just here to help.

  • Set the position of push buttons

    Hi,
    I have created two push buttons using the method add_button of cl_gui_toolbar class. But those two push buttons are coming side by side. But I need to show them one after the other.
    Is there any way to display the buttons one after the other. I tried set_position, set_left, set_height. But still they are coming side by side.
    Plesae guide me in this regard.
    Regards,
    Kishore

    >But those two push buttons are coming side by side. But I need to show them one after the other.
    I am not sure what you want from this....side by side and one after the other
    * append a separator to normal toolbar
        CLEAR ls_toolbar.
        MOVE 3 TO ls_toolbar-butn_type. "<----Separator
        APPEND ls_toolbar TO e_object->mt_toolbar.
    * append an icon to show booking table
        CLEAR ls_toolbar.
        MOVE 'BUTTON' TO ls_toolbar-function.
        MOVE icon_employee TO ls_toolbar-icon.
        MOVE 'Show Bookings'(111) TO ls_toolbar-quickinfo.
        MOVE 'Detail'(112) TO ls_toolbar-text.
        MOVE ' ' TO ls_toolbar-disabled.
        APPEND ls_toolbar TO e_object->mt_toolbar.
    * append a separator to normal toolbar
        CLEAR ls_toolbar.
        MOVE 3 TO ls_toolbar-butn_type. "<----Separator
        APPEND ls_toolbar TO e_object->mt_toolbar.
    * append an icon to show booking table
        CLEAR ls_toolbar.
        MOVE 'BUTTON2' TO ls_toolbar-function.
        MOVE icon_ok TO ls_toolbar-icon.
        MOVE 'Show Flight'(113) TO ls_toolbar-quickinfo.
        MOVE 'Flights'(114) TO ls_toolbar-text.
        MOVE ' ' TO ls_toolbar-disabled.
        APPEND ls_toolbar TO e_object->mt_toolbar.
    Now you will get a separator in between the two buttons.
    |   BUTTTON1  |   BUTTON2

  • 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

  • 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 .

  • Push button in alv report

    Dear Experts,
             How to add pushbutton in alv report.....
    *& Report  ZTT_TEST_ALV
    REPORT  ZTT_TEST_ALV.
    *data declarations
    type-pools : SLIS.
    *  data : BEGIN OF wa_kna1,
    *                kunnr type kunnr,
    *                name1 type name1,
    *         end of wa_kna1,
    * it_kna1 like tABLE OF wa_kna1.
    data : begin of wa_mara,
      matnr type matnr,
      end of wa_mara,
      it_mara like table of wa_mara.
      data : it_fcat type slis_t_fieldcat_alv,
             wa_fcat like line of it_fcat.
    *selection screen
      SELECTION-SCREEN begin of block k with frame title text-001.
    *  select-OPTIONS : s_kunnr for wa_kna1-kunnr.
         select-OPTIONS : s_matnr for wa_mara-matnr.
      SELECTION-SCREEN end of block k.
    *select auery
    *SELECT kunnr name1 INTO table it_kna1 from kna1 where kunnr in s_kunnr.
    select matnr into table it_mara from mara where matnr in s_matnr.
    *for displaying fieldcatalog
      PERFORM fcat using '1' 'MATNR' 'material Number' 'C410' '20'.
    *  PERFORM fcat using '2' 'NAME1' 'Customer Name' 'C410' '36'.
    *for displaying output
    CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
    EXPORTING
    *   I_INTERFACE_CHECK                 = ' '
    *   I_BYPASSING_BUFFER                = ' '
    *   I_BUFFER_ACTIVE                   = ' '
    *   I_CALLBACK_PROGRAM                = ' '
       I_CALLBACK_PF_STATUS_SET          = 'SET_PF_STATUS'
    *   I_CALLBACK_USER_COMMAND           = ' '
    *   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                      = 'Report for Customer Details'
    *   I_GRID_SETTINGS                   =
    *   IS_LAYOUT                         =
       IT_FIELDCAT                       = it_fcat[]
    *   IT_EXCLUDING                      =
    *   IT_SPECIAL_GROUPS                 =
    *   IT_SORT                           =
    *   IT_FILTER                         =
    *   IS_SEL_HIDE                       =
    *   I_DEFAULT                         = 'X'
    *   I_SAVE                            = ' '
    *   IS_VARIANT                        =
    *   IT_EVENTS                         =
    *   IT_EVENT_EXIT                     =
    *   IS_PRINT                          =
    *   IS_REPREP_ID                      =
    *   I_SCREEN_START_COLUMN             = 0
    *   I_SCREEN_START_LINE               = 0
    *   I_SCREEN_END_COLUMN               = 0
    *   I_SCREEN_END_LINE                 = 0
    *   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                          = it_mara.
    * EXCEPTIONS
    *   PROGRAM_ERROR                     = 1
    *   OTHERS                            = 2
    IF sy-subrc <> 0.
    * MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
    *         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
    ENDIF.
    *CALL FUNCTION 'REUSE_ALV_HIERSEQ_LIST_DISPLAY'
    *  EXPORTING
    ****   I_INTERFACE_CHECK              = ' '
    ****   I_CALLBACK_PROGRAM             =
    ****   I_CALLBACK_PF_STATUS_SET       = ' '
    ****   I_CALLBACK_USER_COMMAND        = ' '
    ****   IS_LAYOUT                      =
    *   IT_FIELDCAT                    = it_fcat
    ****   IT_EXCLUDING                   =
    ****   IT_SPECIAL_GROUPS              =
    ****   IT_SORT                        =
    ****   IT_FILTER                      =
    ****   IS_SEL_HIDE                    =
    ****   I_SCREEN_START_COLUMN          = 0
    ****   I_SCREEN_START_LINE            = 0
    ****   I_SCREEN_END_COLUMN            = 0
    ****   I_SCREEN_END_LINE              = 0
    ****   I_DEFAULT                      = 'X'
    ****   I_SAVE                         = ' '
    ****   IS_VARIANT                     =
    ****   IT_EVENTS                      =
    ****   IT_EVENT_EXIT                  =
    ***    i_tabname_header               =
    ***    i_tabname_item                 =
    ****   I_STRUCTURE_NAME_HEADER        =
    ****   I_STRUCTURE_NAME_ITEM          =
    ***    is_keyinfo                     =
    ****   IS_PRINT                       =
    ****   IS_REPREP_ID                   =
    ****   I_BYPASSING_BUFFER             =
    ****   I_BUFFER_ACTIVE                =
    ****   IR_SALV_HIERSEQ_ADAPTER        =
    ****   IT_EXCEPT_QINFO                =
    ****   I_SUPPRESS_EMPTY_DATA          = ABAP_FALSE
    **** IMPORTING
    ****   E_EXIT_CAUSED_BY_CALLER        =
    ****   ES_EXIT_CAUSED_BY_USER         =
    *  tables
    **    t_outtab_header                = it_
    *    t_outtab_item                  = it_kna1.
    **** EXCEPTIONS
    ****   PROGRAM_ERROR                  = 1
    ****   OTHERS                         = 2
    ***IF sy-subrc <> 0.
    **** MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
    ****         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
    ***ENDIF.
    *&      Form  FCAT
    *       text
    *      -->P_0052   text
    *      -->P_0053   text
    *      -->P_0054   text
    form FCAT  using    fp_col_pos
                        fp_fieldname
                        fp_seltext_m
                        fp_emphasize
                        fp_outputlen..
    wa_fcat-col_pos = fp_col_pos.
    wa_fcat-fieldname = fp_fieldname.
    wa_fcat-seltext_m = fp_seltext_m.
    wa_fcat-emphasize = fp_emphasize.
    wa_fcat-outputlen = fp_outputlen.
    append wa_fcat to it_fcat.
    clear : wa_fcat.
    endform.                    " FCAT
    FORM SET_PF_STATUS                                         .
    SET PF-STATUS 'ZNEWSTATUS' .
    "Copy of 'STANDARD' pf_status from fgroup SALV
    endform.
    i need one push button in alv output display.
    Thanks and Regards,
    Thirukumaran. R

    HI THIRU TRY FOLLOWING CODES:
    *& Report  ZSAMPLE
    REPORT  ZSAMPLE.
    TABLES:MARA.
    TYPE-POOLS: SLIS.
    TYPES:BEGIN OF TY_ITAB,
          MATNR LIKE MARA-MATNR,
          ERSDA LIKE MARA-ERSDA,
          END OF TY_ITAB.
    DATA:ITAB TYPE STANDARD TABLE OF TY_ITAB WITH HEADER LINE.
    DATA:FCAT TYPE SLIS_T_FIELDCAT_ALV,
              WA_FCAT TYPE SLIS_FIELDCAT_ALV,
              LAYOUT TYPE SLIS_LAYOUT_ALV,
              WA_LAYOUT TYPE SLIS_LAYOUT_ALV.
    SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-001.
    PARAMETERS:P_MATNR TYPE MARA-MATNR.
    SELECTION-SCREEN END OF BLOCK B1.
    START-OF-SELECTION.
      PERFORM FIELDCAT.
      LAYOUT-ZEBRA = 'X'.
      PERFORM OUTPUT.
    *&      Form  PF_STATUS
          text
         -->RT_EXTAB   text
    FORM PF_STATUS USING RT_EXTAB TYPE SLIS_T_EXTAB.
      SET PF-STATUS 'BUTT'.
    ENDFORM.                    "PF_STATUS
    *&      Form  PUSH_BUTT1
          text
         -->R_UCOMM      text
         -->RS_SELFIELD  text
    FORM GET USING R_UCOMM LIKE SY-UCOMM RS_SELFIELD TYPE SLIS_SELFIELD.
      CASE R_UCOMM.
        WHEN 'GET'.
          IF SY-SUBRC EQ 0.
            CALL TRANSACTION 'SE11'.
          ELSE.
          ENDIF.
        WHEN 'EXIT' OR 'CANCEL' .
          LEAVE PROGRAM.
      ENDCASE.
    ENDFORM.                                                    "PUSH_BUTT1
    *&      Form  FIELDCAT
          text
    -->  p1        text
    <--  p2        text
    FORM FIELDCAT .
      WA_FCAT-SELTEXT_L = 'Select'.
      WA_FCAT-COL_POS = '1'.
      WA_FCAT-FIELDNAME = 'CHECK'.
      WA_FCAT-CHECKBOX = 'X'.
      WA_FCAT-TABNAME = 'ITAB'.
      WA_FCAT-OUTPUTLEN =  '4'.
      WA_FCAT-INPUT(1) = 'X'.
    WA_FCAT-EDIT_MASK(1) = 'X'.
      WA_FCAT-EDIT(1) = 'X'.
      APPEND WA_FCAT TO FCAT.
      CLEAR WA_FCAT.
      WA_FCAT-SELTEXT_L = 'Material Number'.
      WA_FCAT-COL_POS = '2'.
      WA_FCAT-FIELDNAME = 'MATNR'.
      WA_FCAT-TABNAME = 'ITAB'.
      WA_FCAT-OUTPUTLEN =  '18'.
      APPEND WA_FCAT TO FCAT.
      CLEAR WA_FCAT.
      WA_FCAT-SELTEXT_L = 'Date'.
      WA_FCAT-COL_POS = '3'.
      WA_FCAT-FIELDNAME = 'ERSDA'.
      WA_FCAT-TABNAME = 'ITAB'.
      WA_FCAT-OUTPUTLEN =  '8'.
      APPEND WA_FCAT TO FCAT.
      CLEAR WA_FCAT.
    ENDFORM.                    " FIELDCAT
    *&      Form  OUTPUT
          text
    -->  p1        text
    <--  p2        text
    FORM OUTPUT .
      SELECT MATNR ERSDA FROM MARA
        INTO TABLE ITAB
        WHERE MATNR EQ  P_MATNR.
      IF SY-SUBRC EQ 0.
        PERFORM GRID.
      ELSE.
        MESSAGE 'No Records Found' TYPE 'I'.
      ENDIF.
    ENDFORM.                    " OUTPUT
    *&      Form  GRID
          text
    -->  p1        text
    <--  p2        text
    FORM GRID .
      CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
       EXPORTING
       I_CALLBACK_PROGRAM              = SY-REPID
       I_CALLBACK_PF_STATUS_SET        = 'PF_STATUS'
       I_CALLBACK_USER_COMMAND         = 'GET'
       IS_LAYOUT                         = LAYOUT
         IT_FIELDCAT                     = FCAT
       I_DEFAULT                         = 'X'
        TABLES
          T_OUTTAB                          = ITAB.
    ENDFORM.                    " GRID
    REGARDS,
    SAKTHIVEL.VT

Maybe you are looking for

  • Problem with Adobe Reader and IE

    I'm using Vista Home Premium and IE9 with the latest Reader available.  Starting yesterday, I cannot read PDF files on the web.  This is a new problem.  I tried to download newer versions of IE and the Reader, but both tell me I've got the newest ver

  • [Patch] Reduce syscalls

    Looking at the strace output, pacman seems to invoke lots of unnecessary syscalls. This patch has reduced the number of needed syscalls on my system by 70%: http://pastebin.archlinux.fr/406557 Reading the "desc" files is still inefficient: open("/var

  • Player in browser

    My player associated with my browseris currently not working. I work for an online radio station and was using my bb to listen Live to the broadcast www.Kmn1061.com through the flash player on the website. Currently... I'm getting nothing! The page w

  • Is it possible to write a result of query to a CLOB field in another table

    Hi all, I have a table with 50 columns which will ideally have around 250,000 rows. I want to select all the rows from this table and insert the result in to another table's CLOB or BLOB column. ( I think CLOB is preferred for strings !!) f.i Table1

  • Sqlplus cannot be executed

    Hi All, I have NW04s installed on AIX 5.3 with oracle 10g. When ever i try to do a sqlplus i get the following error: <Hostname>:ora<sid>> sqlplus SP2-1503: Unable to initialize Oracle call interface SP2-0152: ORACLE may not be functioning properly <