Table Control in Editable mode

Hello All,
I have created an infotype which has a table control. But all the table control lines are in non-editable mode. I would like to have all the lines in editable mode.
Kindly help out.
Regards,
shails

If your internal table contains no record and when you are refering to the table control then all the lines will get disabled.
Now you will be knowing the number of lines your table control displays in singe page...say 10 lines.
So initially in the PBO append 10 initial lines to your itab. then set the property lines of the table control to the total lines of internal table.
Now in pbo capture the user command page down and append 10 initial lines to your itab.
Hope you got the idea.
Now if your itab already has some records , then just set the lines as total record count of your internal table.
Also change the property in the screen attributes for each field of the control

Similar Messages

  • Table control in create mode

    Hi,
    I created a table control in a standard transaction code.
    when iam clicking create button, The table control
    is displaying in display mode.Now I should provide to the user
    to add the entries in the table control in create mode.
    Can any body resolve this issue with coding.
    urgent requirement.

    Hi,
    In a PBO module of the screen, ypu have to write a code to find out the number of lines of the internal table used for the table control.
    The code for this would be.
      DESCRIBE TABLE tb_line LINES lin.   * 'tb_line' is the internal table and 'lin' holds the number of lines*
      tcl_item-lines = lin.                             tcl_item is the name of the table control*
    Now in the PBO, you have to make the table control editable or non editable by checking with the transaction.
    Here i in the below code, there are 3 transactions for create,display and change.
    If the transaction code is either 'ZCREATE09' or 'ZCHANGE09' , then the lines in the table control are checked.If the table control is not empty,then it is  editable.
    During the display transaction,it is kept in non editable mode.
    CASE sy-tcode.
        WHEN 'ZCREATE09' OR 'ZCHANGE09'.
    ***Checking if the table control is empty or not***
          IF lin NE 0.
            LOOP AT SCREEN.
    ***To make the screen editable****
              screen-input = 1.
            ENDLOOP.
          ELSE.
            LOOP AT SCREEN.
              IF screen-name CS 'TB_LINE'.
    ****To make the screen non-editable if no values are present in the
    ***table control****
                screen-input = 0.
                MODIFY SCREEN.
              ENDIF.
            ENDLOOP.
          ENDIF.
    ****To make screen non editable during the display transaction****
        WHEN 'ZDISPLAY09'.
          LOOP AT SCREEN.
            screen-input = 0.
            MODIFY SCREEN.
          ENDLOOP.
      ENDCASE.
    Reward if helpfull.
    Thanks,
    Kashyap

  • HOW TO MAKE TABLE CONTROL NON EDITABLE

    hi all
    how to make table control non editable
    Thanks & Regards
    harsha

    Hi,
    Try this code in the PBO inside the module in the LOOP...ENDLOOP.
       IF SY-TCODE EQ 'ZEMPLDISPLAY'.
        LOOP AT SCREEN.
         if screen-name eq 'column1' or screen-name eq 'column2'.  "Give the names of the columns in the table control
          SCREEN-INPUT = '0'.
          MODIFY SCREEN.
        endif.
        ENDLOOP.
      ENDIF.
    Or you can go the Layout of the table control in Change mode and for every column's attributes, make it 'Output' only field. Check  'Output only' field.

  • Transport controls on edit mode audition 2

    I seem to have lost my transport controls on edit mode for adobe audition 2.  How do I get
    it back to the way it should be?  Also, where can I buy updated versions of adobe audition?

    You've probably just covered up the transport controls - it's not that difficult to do. Just shift a few panes around along the bottom, and they'll probably reappear.
    You can't purchase a perpetual Audition licence any more - you have to rent the software through the Creative Cloud. If you look around this forum, you will find plenty of comments about that...

  • Table control in display mode

    Hello All,
    Please tell me how to show table control in display mode,
    My requirement is , whenever ill put T-code for table maintainace it should be appear in display mode.
    Thanks,
    Gaurav

    table control or table maintenance?
    Ok, let me assume that you have table mainteance view done for ZTEST table with Z_V_TABLE (maintenance view generated)
    create a tcode now
    1) transaction with parameters - se93 - tcode Z_TABLE
    2) Transaction SM30
    3) skip initial screen checked
    4) maintain below values in default values in se93
    VIEWNAME     Z_V_TABLE
    SHOW     X
    now when we run with Z_TABLE table it will always show in display mode.
    Hope - I understood your question correctly

  • [iPhone] Not hiding cell accessories when table is in editing mode

    I've got a UITableView, and I want the cells to show disclosure indicators when the table is in editing mode... is there a way to do this? I've implemented this line
    - (UITableViewCellAccessoryType)tableView:(UITableView *)aTableView accessoryTypeForRowWithIndexPath:(NSIndexPath *)indexPath {
    return UITableViewCellAccessoryDisclosureIndicator;
    but the accessories are still hidden. Is there a property of the table I'm missing somewhere?
    Thanks!

    You need to set
    cell.hidesAccessoryWhenEditing = NO;
    for the cell(s) you want in your
    - (UITableViewCell *)tableView:(UITableView *)tableView cellForRowAtIndexPath:(NSIndexPath *)indexPath
    Andreas

  • How to Make a Table control Field Editable but input disabled

    Hi All,
        I got a requirement that in table control one column should be in edit mode (i.e. input enabled) but user should not be able to type anything in that field or column rather he can select the value from F4 help (or pick list) associated with that field or column. How to do this ? Please dont say make sceeen-input = 0 for that field.
    Experts please help me out...........
    Thankx in Advance
    Rizwan Ahmad Siddiqui

    Hi,
    I suggest you to go for a drop down instead of a search help.
    Regards,
    Charumathi.B

  • Columns in table control in display mode in display transaction

    Hi all,
    I have a table control in a custom screen .Now i have few columns in the table control which need to be input enbaled but should be dislay only when thetransaction mode is "display" e.g VL33N.
    I have written the follwoing lines of code:
    IF sy-tcode = 'VL33N'.
        IF g_trtyp = 'A'.
          LOOP AT tc01-cols INTO wa_tc01.
            IF wa_tc01-screen-group1 = 'G2'.
              wa_tc01-screen-input = 0.
              MODIFY tc01-cols FROM wa_tc01.
            ENDIF.
          ENDLOOP.
    ENDIF.
    ENDIF.
    However the specific olumns in table control are not displayed in display mode when in display transaction!
    Can anyone suggest what am i doing wrong?
    thanks.

    I would have answered if you followed forum rules (as I can see in your previous posts, missing feedback, closed without any info)

  • Control display/edit mode of an Assignment Block through code

    Hi all,
    Requirement : If status in Opportunity is XYZ (BT111H_OPPT/Details - BTStatus/Struct.Act_Status), I need to show items Assignment block((BT111H_OPPT/ItemsList) in display mode. When user tries to go into edit mode, display error saying - "With XYZ status, items are not editable."
    Observations so far :  In "BT111H_OPPT/OpportunityOVViewSet", method set_view_group_context involves interface "IF_BSP_WD_VIEW_GROUP_CONTEXT" that has methods SET_VIEW_EDITABLE etc., But there is no method to change to display mode. CL_BSP_WD_VIEW_GROUP_CONTEXT uses this interface and has a subclass CL_CRM_WFD_VIEWGRP_CTXT. This subclass has the method SET_VIEW_DISPLAY_MODE.
    Question : How to access this method SET_VIEW_DISPLAY_MODE in my requirement? I tried to use the code from this method in my logic, but since attribute 'EDITABLE_VIEWS_TAB' is protected, I'm not able to do anything. Also is there any other way to get solution for my requirement.
    Thanks in advance,
    Vinoth

    HI Vinoth,
    if that method is not accessible then try with the below logic.
    In the item , fetch the required status(gv_status) which you required .
    THen in the item assignment block view, HTM..
    check for the diaplpy mode. and store the value in a llocal variable.
    lv_disaply_mode = controller->view_group_context->is_view_in_display_mode( controller ) .
    if controller->gv_status = 'XYZ'.
    lv_display_mode = abap_true.
    endif
    then pass this lv_display_mode varaible to the configtable display mode Attribute.
    <chtmlb:configTable id                    = "Table"
                          displayMode           = "<%= lv_displaymode %>"
    Hope this will help..
    Thanks
    Sudhansu

  • Table Control: Disabling editing for a column

    Hi everyone. Greetings from Buenos Aires, Argentina.
    First of all, I want to apologize for this question in case of it has already been made. The forum is too large to read it completely and I really need the answer, if any, to my trouble.
    I have a table control inside a screen. In it's PBO, I coded a module to change the table control attributes. I declared a work area like the line of the table control's control in order to loop it. I mean this:
    In the TOP of Table Control (I made it by using the wizard) I have this:
    CONTROLS: TC_1 TYPE TABLE VIEW USING SCREEN dynpro_number)
    And in the PBO module I have typed the following:
    MODULE control_change_attrs OUTPUT.
    DATA: wa_tc_1 LIKE LINE OF TC_1-COLS.
    LOOP AT TC_1-COLS INTO wa_tc_1.
    ENDLOOP.
    ENDMODULE.
    In the (...), I have put code with such a logic that, depending of the contents of certain fields in the dynpro, it will hide (or not) some columns of the Table Control. This part is made correctly.
    This logic, also makes (or should make) the table control to disable the input of a column, depending wether a flag is active or not. This flag is activated in other screen's PAI, which is called depending on the contents of the sy-ucomm field of this screen (the one with the table control).
    The (...) is something like this (I'll omit some parts):
    IF wa_tc_1-screen-name = 'COLUMN_TO_HIDE'.
       IF gv_flag = 'X'.
          wa_tc_1-screen-input = 0.
       ENDIF.
       MODIFY TC_1-COLS FROM wa_tc_1.
    ENDIF.
    In a PAI module of this screen, I have coded the following:
    MODULE user_command INPUT.
    CASE gv_ok_code.
       WHEN 'RUN'.
          PERFORM RUN.
        WHEN ...
    ENDCASE.
    END MODULE.
    And in the RUN subroutine, obviusly among other things, I have this:
    CALL SCREEN 0150 STARTING AT XX YY.
    In a module in the PBO of the screen 0150, I clear gv_ok_code. In a PAI module, this is what I have put:
    CASE gv_ok_code.
       WHEN 'ACCEPT'.
          gv_flag = 'X'.
          CLEAR gv_ok_code.
          LEAVE TO SCREEN 0.
      WHEN ...
      WHEN ...
    ENDCASE
    The thing is, when the contents of gv_ok_code is 'ACCEPT' and therefore the flag is activated, then the 0150 screen's PAI finishes and the previous screen's PBO is processed, I know for sure (by the mean of the debugging mode) that the table controls's atrributes are correctly modified, and the most important thing, they stay like that... But, the column desired does not gets disabled, at least not until the NEXT PBO (I mean, it gets disabled when I press the Enter key).
    Why is happening this?

    Thanks a lot for the response, Max.
    I' ve been testing your answer. When I implemented the code that you suggested, after the first PAI, the table control's columns appear as I want.
    The thing is, in order to test if the changes in the columns are reflected in the screen after the call of the dynpro no. 0150 (and the obvious return to the first one), I need to be able to select one or more table control's rows (since when I followed the table control wizard, I made it with selection column, and with multiple selection). But, after implementing your code, I'm not able any longer to select any rows.
    I click on them, but they don't turn yellow. I commented the call of the module inside the LOOP AT itab... of the PBO and I was able to select them once again, so we're sure the problem is caused because of the call to this new module. But why?
    Note: you should know, since the table control is with multilpe selection, the LOOP sentence in the PBO is like this:
    LOOP AT itable
           INTO work_area
           CONTROL tc_1
           WITH CURSOR tc_1-current_line.
    MODULE change_attribs.
    ENDLOOP.
    Does that give a hint to you?

  • Table view in EDIT mode

    Hi Team ,
    I created custom Result view which is bound to BOL entity.
    Now i need to EDIT result list.I made  allRowsEditable       = "TRUE".
    But still result list is coming in display mode only .
    Pl help me on this.
    Thanks in advance, Vijay

    Hi Raj,
      Please check the below code in HTM page of my custom view it is wotking fine for me.
    <%@page language="abap" %>
    <%@extension name="thtmlb" prefix="thtmlb" %>
    <%@extension name="chtmlb" prefix="chtmlb" %>
    <%@extension name="bsp" prefix="bsp" %>
    <%
      data: lv_xml    type string.
            lv_xml    = controller->CONFIGURATION_DESCR->GET_CONFIG_DATA( ).
    %>
    <thtmlb:areaFrameSetter toolbarButtons  = "<%= controller->gt_buttons %>"
                            maxButtonNumber = "14" />
    <chtmlb:tableExtension tableId = "tv1"
                           layout  = "FIXED" >
    <chtmlb:configTable xml="<%= lv_xml %>"
                        id="tv1"
                        navigationMode="BYPAGE"
                        onRowSelection        = "select"
                        table="//CONTEXTNODE/Table"
                        allRowsEditable = "TRUE"
                        downloadToExcel  = "TRUE"
                        personalizable        = "TRUE"
                        width="100%"
                        displayMode = "<%= controller->view_group_context->is_view_in_display_mode( controller ) %>"
                        headerVisible= "FALSE"
                        hasLeadSelection= "FALSE"
                        selectedRowIndex      = "<%= CONTEXTNODE->SELECTED_INDEX %>"
                        selectedRowIndexTable = "<%= CONTEXTNODE->SELECTION_TAB %>"
                        selectionMode         = "<%= CONTEXTNODE->SELECTION_MODE %>"
                        visibleFirstRow       = "<%= CONTEXTNODE->VISIBLE_FIRST_ROW_INDEX %>" />
       </chtmlb:tableExtension>
    Hope this helps you.
    Regards,
    Lakshmi.Y

  • Module pool - table control - update ztable

    hello , i doing a module pool that will have few screens , now i have one screen with a table control that fetch the data from a ztable when screen is call the table control is showing the data and is in grey and no editable i add a pf-status for change that mode i can delete the row from the table control but i don't figure out how update to the ztable when i press save , i wan't too another button for add a new row ( and remain the already in grey ) for add new entrie in the table and update the ztable
    pd: sorry for my bad english
    this is my code:
    TOP:
    PROGRAM  z_pp_lote_etiquetas MESSAGE-ID zz.
    TABLES:zc2p_lote_etique,
           zc2p_lider_modul.
    DATA: ok_code LIKE sy-ucomm.
    DATA save_ok LIKE sy-ucomm.
    * internal table
    DATA: it_zc2p_lote_etique LIKE STANDARD TABLE OF zc2p_lote_etique.
    DATA: it_zc2p_lider_modul TYPE STANDARD TABLE OF zc2p_lider_modul WITH HEADER LINE.
    DATA: it_zc2p_lider_modul_del TYPE STANDARD TABLE OF zc2p_lider_modul WITH HEADER LINE.
    **************Workarea
    DATA: wa_c2p_lote_etique TYPE zc2p_lote_etique.
    DATA: wa_c2p_lider_modul TYPE zc2p_lider_modul.
    DATA: wa_c2p_lider_modul_del TYPE zc2p_lider_modul.
    DATA: sel.
    DATA: MARK.
    DATA: init.
    DATA:  col TYPE scxtab_column.
    DATA: lines TYPE i.
    * Variable Declaration
    DATA : flg, "Flag to set the change mode
    ln TYPE i. "No. of records
    * Table Control Declartion.
    CONTROLS: zc2p_lider_crtl TYPE TABLEVIEW USING SCREEN '101'.
    **PROCESS BEFORE OUTPUT INCLUDE **
    *&  Include           Z_PP_LOTE_ETIQUETAS_O01
    *& Module set_status OUTPUT
    * Setting the GUI status
    MODULE status_0100 OUTPUT.
      SET PF-STATUS 'Z_PP_LOT_ETIQ_MENU'.
      SET TITLEBAR 'Z_PP_LOT_ETIQ'.
    ENDMODULE. " set_status OUTPUT screen 100
    *  MODULE status_0101 OUTPUT
    * Setting the GUI status
    MODULE status_0101 OUTPUT.
      SET PF-STATUS 'Z_PP_LOT_ETIQ_ME_101'.
      SET TITLEBAR 'Z_PP_LOT_ETIQ'.
    * Data retreving
      if init is INITIAL.
      select * from zc2p_lider_modul into CORRESPONDING FIELDS OF TABLE it_zc2p_lider_modul.
        DESCRIBE TABLE it_zc2p_lider_modul LINES ln.
        zc2p_lider_crtl-lines = ln + 10.
        init = 'X'.
    endif.
    ENDMODULE.                    "status_0101 OUTPUT
    module change_sdyn_conn output.
    * you can change the content of current table control line via
    * sdyn_conn
      READ TABLE it_zc2p_lider_modul INTO zc2p_lider_modul INDEX zc2p_lider_crtl-current_line.
    endmodule.                             " FILL_TABLE_CONTROL  OUTPUT
    MODULE set_screen_fields OUTPUT.
    LOOP AT SCREEN.
    IF flg IS INITIAL.
    screen-input = 0.
    ELSE.
    screen-input = 1.
    ENDIF.
    *ENDIF.
    * Modifying the screen after making changes
    MODIFY SCREEN.
    ENDLOOP.
    ENDMODULE. " set_screen_fields OUTPUT
    PROCESS AFTER INPUT INCLUDE.
    *  MODULE USER_COMMAND_0100 INPUT
    MODULE user_command_0100 INPUT.
      CASE ok_code.
        WHEN 'LIDM'.
          CALL SCREEN 101.
        WHEN 'CANC'.
          LEAVE PROGRAM.
        WHEN 'BACK'.
          LEAVE PROGRAM.
        WHEN 'EXIT'.
          LEAVE PROGRAM.
      ENDCASE.
    ENDMODULE.                    "USER_COMMAND_0100 INPUT
    *  MODULE USER_COMMAND_0101 INPUT
    MODULE user_command_0101 INPUT.
      save_ok = ok_code.
      CLEAR ok_code.
      CASE save_ok.
        WHEN 'SORT'.
          DATA: fldname(100),help(100).
          READ TABLE zc2p_lider_crtl-cols INTO col WITH KEY selected = 'X'.
          SPLIT col-screen-name AT '-' INTO help fldname.
          SORT it_zc2p_lider_modul BY (fldname).
        WHEN 'CHANGE'.
    * Setting the flag to make the table control in editable mode[excluding
    * primary key].
          flg = 'Y'.
        WHEN 'BACK'.
          CALL SCREEN 100.
          LEAVE SCREEN.
        WHEN 'CANCEL'.
          LEAVE PROGRAM.
        WHEN 'EXIT'.
          LEAVE PROGRAM.
        WHEN 'SAVE'.
          MODIFY  zc2p_lider_modul FROM it_zc2p_lider_modul.
          COMMIT WORK.
      ENDCASE.
    ENDMODULE.                    "USER_COMMAND_0101 INPUT
    *  MODULE read_table_control INPUT
    MODULE read_table_control INPUT.
    * Check input values
      IF mark = 'X' AND save_ok = 'DELETE'.
        DELETE TABLE it_zc2p_lider_modul FROM zc2p_lider_modul.
        DESCRIBE TABLE it_zc2p_lider_modul LINES zc2p_lider_crtl-lines.
      ENDIF.
    ENDMODULE.                             " READ_TABLE_CONTROL  INPUT
    Screen Flow Logic 100
    PROCESS BEFORE OUTPUT.
    MODULE status_0100.
    PROCESS AFTER INPUT.
    MODULE user_command_0100.
    Screen Flow Logic 101.
    PROCESS BEFORE OUTPUT.
      MODULE status_0101.
      LOOP AT it_zc2p_lider_modul INTO zc2p_lider_modul WITH CONTROL
    zc2p_lider_crtl.
    * Dynamic screen modifications
        MODULE set_screen_fields.
        MODULE change_sdyn_conn.
      ENDLOOP.
    PROCESS AFTER INPUT.
      MODULE user_command_0101.
      LOOP AT it_zc2p_lider_modul.
        MODULE read_table_control.
      ENDLOOP.
    i hope somebody can help for what i missing here  thanks

    >
    Sanjeev Kumar wrote:
    > Hello Edgar,
    >
    > Problem seems to be there in the flow logic of 101
    >
    >
    > PROCESS BEFORE OUTPUT.
    >   MODULE status_0101.
    >   LOOP AT it_zc2p_lider_modul INTO zc2p_lider_modul WITH CONTROL
    > zc2p_lider_crtl. " no need to have 'INTO zc2p_lider_modul' above
    > * Dynamic screen modifications
    >     MODULE set_screen_fields.
    >     MODULE change_sdyn_conn.
    >   ENDLOOP.
    > *
    > PROCESS AFTER INPUT.
    >   MODULE user_command_0101. "this should be shifted after the following LOOP...ENDLOOP.

    >   LOOP AT it_zc2p_lider_modul. "need to have 'WITH CONTROL zc2p_lider_crtl' here
    >     MODULE read_table_control.
    >   ENDLOOP.
    >
    >
    >
    > With MODULE user_command_0101 call before the LOOP calls the MODIFY statement (under case save_ok 'SAVE') first and Z-table is updated with the old values as the changes are transferred from screen into the internal table it_zc2p_lider_modul in the LOOP...ENDLOOP later.
    >
    > Try these changes and I hope it will work.
    >
    > Thanks
    > Sanjeev
    i do the firts advice but the second one i get syntax error :
    my code :
    PROCESS AFTER INPUT.
      LOOP  at it_zc2p_lider_modul WITH CONTROL zc2p_lider_crtl.
        MODULE read_table_control.
      ENDLOOP.
       MODULE user_command_0101.
    error :
    In the event PROCESS AFTER INPUT, no additions are allowed with "LOOP     
    AT".

  • Table control- add a new row

    I have a table control on a custom screen with some data from data base table in non-editable mode. Now, when I click insert button, it should create a new row in table control in editable mode. I tried loop at screen and modify screen but no luck. Can somebody please help me?

    hi chandu,
    try this code.
    if sy-ucomm = 'INS'.
    data : wf_lines type i.
    *number of lines of table control
      DESCRIBE TABLE int_factor LINES wf_lines.
      tab_control-lines = wf_lines + 1.
    ENDIF.
    for any clarifiaction pls mail me.
    pls reward points, if this helped u.
    regards,
    anversha.
    [email protected]

  • Screen Resolution Table Control

    Dear All,
    I have some questions in Module pool and BDC.
    1. how to handle Table Control in module pool programming as it's displaying lines in a table control differs from one system to other.
    2. How to handle the same situation while uploading the data in table control in BDC.
    Kindly let me know.
    Many Thanks,
    Ranjan

    Hi,
    It's opening for me.It is available in SDN download Technical Samples ABAP library.
    Here is the code.
    In the flow logic of the screen 9000, write the following code.
    PROCESS BEFORE OUTPUT.
      MODULE set_status.
      MODULE get_t_ctrl_lines.
      LOOP AT i_makt WITH CONTROL t_ctrl CURSOR t_ctrl-current_line.
    * Dynamic screen modifications
        MODULE set_screen_fields.
      ENDLOOP.
    PROCESS AFTER INPUT.
      LOOP AT i_makt.
        FIELD i_makt-pick MODULE check.
        FIELD i_makt-zmatnr MODULE zmatnr .
      ENDLOOP.
      MODULE user_command_9000.
    In the program, write the following code.
    PROGRAM SAPMZTC MESSAGE-ID zz.
    * Tables Declaration
    TABLES: zzz_makt.
    * Internal table Declaration
    DATA : i_makt TYPE STANDARD TABLE OF zzz_makt WITH HEADER LINE.
    * Table control Declaration
    CONTROLS: t_ctrl TYPE TABLEVIEW USING SCREEN '9000'.
    * Variable Declaration
    DATA : flg,           "Flag to set the change mode
           ln TYPE i.     "No. of records
    *&      Module  get_T_CTRL_lines  OUTPUT
    *  Populating data
    MODULE get_t_ctrl_lines OUTPUT.
      SELECT zmatnr zmaktx
             INTO CORRESPONDING FIELDS OF TABLE i_makt
             FROM zzz_makt.
      DESCRIBE TABLE i_makt LINES ln.
    * To make the vertical scroll bar to come on runtime
      t_ctrl-lines = ln + 100.
    ENDMODULE.                 " get_T_CTRL_lines  OUTPUT
    *&      Module  USER_COMMAND_9000  INPUT
    * Triggering event according to the user command
    MODULE user_command_9000 INPUT.
      DATA :lv_fcode LIKE sy-ucomm,    "Function Code
            lv_answer(1) type c.       "Storing the answer
      lv_fcode = sy-ucomm.
      CASE lv_fcode.
        WHEN 'CHANGE'.
    * Setting the flag to make the table control in editable mode[excluding
    * primary key].
          flg = 'Y'.
        WHEN 'DELETE'.
    * Setting the flag to make the table control in editable mode after
    * deleting the selected line
          flg = 'Y'.
    * Confirmation of delete
          CALL FUNCTION 'POPUP_TO_CONFIRM'
            EXPORTING
             TITLEBAR       = 'Confirm'
             text_question  = 'Are you sure to delete from database?'
             TEXT_BUTTON_1  = 'Yes'(001)
             TEXT_BUTTON_2  = 'No'(002)
            IMPORTING
             ANSWER         =  lv_answer.
          if lv_answer eq '1'.
    * Updating the database table from the internal table
            UPDATE zzz_makt FROM TABLE i_makt.
    * Deleting the selected row from the internal table
            DELETE i_makt WHERE pick = 'X'.
    * Deleting the selected row from the database table
            DELETE FROM zzz_makt WHERE pick = 'X'.
            MESSAGE s005 WITH 'Deleted Successfully'.
          ENDIF.
        WHEN 'SAVE'.
    * Inserting new record or updating existing record in database table
    * from the internal table
          MODIFY zzz_makt FROM TABLE i_makt.
          MESSAGE s005 WITH 'Saved Successfully'.
        WHEN 'BACK'.
          SET SCREEN '0'.
        WHEN 'EXIT' OR 'CANCEL'.
    * Leaving the program
          LEAVE PROGRAM.
      ENDCASE.
    ENDMODULE.                 " USER_COMMAND_9000  INPUT
    *&      Module  set_screen_fields  OUTPUT
    * Setting the screen fields
    MODULE set_screen_fields OUTPUT.
      LOOP AT SCREEN.
        IF flg IS INITIAL.
          screen-input = 0.
        ELSEIF ( flg EQ 'Y' ).
          IF ( ( screen-name = 'I_MAKT-ZMAKTX'
                 OR screen-name = 'I_MAKT-CHECK1' )
                AND t_ctrl-current_line LE ln ) .
    * Making the screen fields as editable
            screen-input = 1.
          ELSEIF ( ( screen-name = 'I_MAKT-ZMATNR' )
                     AND t_ctrl-current_line LE ln ).
    * Making the screen field as uneditable
            screen-input = 0.
          ENDIF.
        ENDIF.
    * Modifying the screen after making changes
        MODIFY SCREEN.
      ENDLOOP.
    ENDMODULE.                 " set_screen_fields  OUTPUT
    *&      Module  zmatnr  INPUT
    * Appending records to the internal table
    MODULE zmatnr INPUT.
      MODIFY i_makt INDEX t_ctrl-current_line.
      IF t_ctrl-current_line GT ln.
        READ TABLE i_makt WITH KEY zmatnr = i_makt-zmatnr.
        IF sy-subrc NE 0.
    * Inserting record if it does not exist in database
          APPEND i_makt.
        ELSE.
         MESSAGE i005 WITH 'Material Number' i_makt-zmatnr 'already exists'.
        ENDIF.
      ENDIF.
    ENDMODULE.                 " zmatnr  INPUT
    *&      Module  set_status  OUTPUT
    * Setting the GUI status
    MODULE set_status OUTPUT.
      SET PF-STATUS 'ZSTATUS'.
      SET TITLEBAR  'ZTITLE'.
    ENDMODULE.                 " set_status  OUTPUT
    *&      Module  CHECK  INPUT
    * Modify the internal table using the current line in table control
    MODULE check INPUT.
      MODIFY i_makt INDEX t_ctrl-current_line.
    ENDMODULE.                 " CHECK  INPUT

  • Change from edit mode to display mode

    Hi ppl
    In transaction CO11N , I want to change the quantity (COWB-ERFME) column of a table control
    from edit mode to display mode. I created a badi implementation for WORKORDER_GOODSMVT.
    This gets triggered before the screen with quantity (COWB-ERFME) is displayed. How to code, to change the column from edit mode to display mode.
    I tried using transaction variant and it is working , but I want it to be plant specific. So I m trying badi.
    Need ur help to go abt the coding

    Hi
    U make sure a method of the BADI WORKORDER_GOODSMV is called in PBO while looping table control, if it's so u can use the statament LOOP AT SCREEN.ENDLOOP:
    LOOP AT SCREEN.
      IF SCREEN-NAME = ....
         SCREEN-INPUT = 0.
         MODIFY SCREEN.
      ENDIF.
    ENDLOOP.
    Max

Maybe you are looking for

  • Pending Rejection Report

    Hi., The scenario is 1) Material subjected to Quality is received from Vendor 2) Out of 10 quantity, 5 rejected in Quality Usage Decision. 3) In our company daily hundreds of UD's are done. 4)Is there any report in which we get the information about

  • I get an error message when trying to connect my iphone to a lenovo thinkpad

    I cannot get my Iphone to work on the Lenovo Thinkpad edge 520, when I connect the phone it brings up an error saying there was a problem loading the device. In the control panel I get a yellow exclamatin mark next to the mobile usb device. I tried t

  • "Phone not authenticated"

    I've had my phone for a while and it has been working great and used it a bunch today. Then earlier tonight I noticed my text messages weren't being sent.  Then I tried to make a phone call and instead of going through after a couple rings it sent me

  • Editing in Firefox 18 is not working

    Editing in Firefox 18 is not working - I cannot edit in my wordpress editor, or edit the google search text in the menu bar for example. I am on Mac OS X 10.7.5

  • BLOB Insert into SQL Server2000

    Dear All, I have problem with  insert the BLOB object into MSSQLServer 2000 in WebDynpro. Please help me how to solve it? Best Regards, Mukesh.