Making a field editable

Hi Abapers,
How to make a screen field as editable? I have two date fields, after entering the value if i press enter some validations are done then these fields are becoming uneditable... how can i do this?
Regards,
prem

Hi,
This may be due to 2 things
enclude date1 field and date2 field n between chain endchain
or else
in the pbo write this code
loop at screen.
if dat1 is initial or date2 is initial.
screen-inpot = 0.
modify screen.
endlop.
thanks
venki

Similar Messages

Making selective fields editable in adobe form [using web dynpro]

Hi,
I have displayed an adobe form using web dynpro application. But I have to make certain fields (not all fields) on this adobe form editable. I dont want to make this adobe form interactive because I dont have to save any data in database. The data entered in the editable fields will be saved as a pdf.
What I did so far:
1) The fields which I want as editable, I have given there type as "User entered/ optional" & for rest of the fields I have given type as "Read only".
2) In web dynpro, I have enabled the adobe
3) This is not making the fields editable.
4) If I write the following code in my webdynpro method WDDOMODIFYVIEW, then my data coming from adobe is not getting displayed even though the fields get selectively editable.
*data: LR_INTERACTIVE_FORM type ref to CL_WD_INTERACTIVE_FORM,
*LR_METHOD_HANDLER type ref to IF_WD_IACTIVE_FORM_METHOD_HNDL.
*check first_time = abap_true.
*LR_INTERACTIVE_FORM ?= VIEW->GET_ELEMENT('adobe').
*LR_METHOD_HANDLER ?= LR_INTERACTIVE_FORM->_METHOD_HANDLER.
*LR_METHOD_HANDLER->SET_LEGACY_EDITING_ENABLED( abap_true ).
Any inputs regarding this??
Thanks & Regards.

Hi,
Like I had mentioned using the following code in my webdynpro method WDDOMODIFYVIEW, my data coming from adobe form was not getting displayed even though the fields get selectively editable.
*data: LR_INTERACTIVE_FORM type ref to CL_WD_INTERACTIVE_FORM,
*LR_METHOD_HANDLER type ref to IF_WD_IACTIVE_FORM_METHOD_HNDL.
*check first_time = abap_true.
*LR_INTERACTIVE_FORM ?= VIEW->GET_ELEMENT('adobe').
*LR_METHOD_HANDLER ?= LR_INTERACTIVE_FORM->_METHOD_HANDLER.
*LR_METHOD_HANDLER->SET_LEGACY_EDITING_ENABLED( abap_true ).
So I kept this code & I also kept the Interface type "ABAP Dictionary based".
Additionally in Webdynpro, I used adobe form generated FM to get the adobe content & passed it to the "content" parameter of my adobe component in webdynpro.
Thanks & Regards.

Making A Field Editable In MIRO Transaction

Hi All,
In MIRO transaction, when you enter details for Brazil, the NOTA FISCAL tab gets displayed on the Menu Bar.
On clicking the NOTA Fiscal Tab, the control goes to the screen where it says "Create NOTA Fiscal Incoming". In The Item Overview Screen, there are many fields that are present only for Read Only and hence are Disabled, since they are used to display information only.
One such field is "Plant" which I have to make editable, is there any way that can be done.
Kindly Suggest..
Pablo

Can you please suggest as to how to go about it?
I have never worked on it before..
Thanks and Regards
Pablo
Edited by: Pablo Ghosh Roy on Sep 12, 2008 2:14 PM

Making description field editable

hi,
I want to make the field "description" editable in the shopping cart.
For Limit shopping cart I have done through
SPRO setting SRM Server-->Cross application Basic Settings --> Extensions and Field control -->Configure field control --> Configure control for fields of substructures --> Metadata for Fields of Substructures and Table-Like Enhancements
Bus. Object Set Type      32      Limit
Structure Field Name       DESCRIPTION
Bus. Object Type            BUS2121
Set Level                       ITEM
Set Subtype
The same thing I need to do for internal goods and service also..But for this what Bus.Object set type can I use...?
Thanks
Vivek

Hi,
I added an key-edit trigger and the following code:
SET_BLOCK_PROPERTY('CD_EXAMS_ORGS_BLK',INSERT_ALLOWED,PROPERTY_TRUE);
SET_BLOCK_PROPERTY('CD_EXAMS_ORGS_BLK',UPDATE_ALLOWED,PROPERTY_TRUE);
SET_BLOCK_PROPERTY('CD_EXAMS_ORGS_BLK',DELETE_ALLOWED,PROPERTY_TRUE);
that didnt work.
Also I tried adding it in trigger when-new-form-instance, that didnt work either.
its like the field is not suppose to be updatable at all.
Also, I tried the following in both key-edit trigger and in when-new-form-instance triigger
SET_BLOCK_PROPERTY('CD_EXAMS_ORGS_BLK.MIN_CAND_OVRD',INSERT_ALLOWED,PROPERTY_TRUE);
SET_BLOCK_PROPERTY('CD_EXAMS_ORGS_BLK.MIN_CAND_OVRD',UPDATE_ALLOWED,PROPERTY_TRUE);
SET_BLOCK_PROPERTY('CD_EXAMS_ORGS_BLK.MIN_CAND_OVRD',DELETE_ALLOWED,PROPERTY_TRUE);
Nothing is working.
Any other ideas ?
Thanks for bearing with me.

Make "Company" Field editable

Hello Experts,
We are using E-Sourcing 5.1 with most of the out-of-the-box functionality. When creating an Auction, header section contains field "Company". This field appears as read only, and populates automatically based on the company defined in the user profile.
I tried making this field editable by means of page customizing (UI ID: doc.auction.multi.universal.auctionevent.ui.buyside.default), but even when I declare field COMPANY as Editable = YES, the change is not reflected in the UI.
Any ideas on how to make this field editable so end-users can select another company code besides the one specified in their profile? Your help is appreciated. Thanks!

Hi Gilberto
Unfortunately it is not possible to make the company field editable. Workaround could be to hide the standard COMPANY field in page customization and create a new extension definition lets say "Company" with data type: Object Refrence and choose 'Company' as the object reference type.
Hope this would meet your requirement.
Regards
Mudit Saini

Making Fields editable in ALV

I am displaying the custom table entries in an ALV. i am trying to make the fields in the ALV as editable. All the fields got enabled but only first field is in disabled mode. its type is NUMC. Can i know the reason behind this ?
Here is the code that i am using to make the fields editable.
IF v_flag = 'X'.
    lr_table_settings ?= l_value.
    lr_table_settings->set_read_only( abap_false ).
    lr_column_settings ?= l_value.
    lr_column = lr_column_settings->get_column( 'PROJ_ID' ).
    CREATE OBJECT lr_input_field
      EXPORTING
        value_fieldname = 'PROJ_ID'.
    lr_column->set_cell_editor( lr_input_field ).
    lr_column_settings ?= l_value.
    lr_column = lr_column_settings->get_column( 'ACCOUNT_NAME' ).
    CREATE OBJECT lr_input_field
      EXPORTING
        value_fieldname = 'ACCOUNT_NAME'.
    lr_column->set_cell_editor( lr_input_field ).
    lr_column_settings ?= l_value.
    lr_column = lr_column_settings->get_column( 'ZTASK' ).
    CREATE OBJECT lr_input_field
      EXPORTING
        value_fieldname = 'ZTASK'.
    lr_column->set_cell_editor( lr_input_field ).
ELSE.
    lr_table_settings ?= l_value.
    lr_table_settings->set_read_only( abap_true ).
    lr_column_settings ?= l_value.
    lr_column = lr_column_settings->get_column( 'PROJ_ID' ).
    CREATE OBJECT lr_input_field
      EXPORTING
        value_fieldname = 'PROJ_ID'.
    lr_column->set_cell_editor( lr_input_field ).
    lr_column_settings ?= l_value.
    lr_column = lr_column_settings->get_column( 'ACCOUNT_NAME' ).
    CREATE OBJECT lr_input_field
      EXPORTING
        value_fieldname = 'ACCOUNT_NAME'.
    lr_column->set_cell_editor( lr_input_field ).
    lr_table_settings ?= l_value.
    lr_table_settings->set_read_only( abap_true ).
    lr_column_settings ?= l_value.
    lr_column = lr_column_settings->get_column( 'ZTASK' ).
    CREATE OBJECT lr_input_field
      EXPORTING
        value_fieldname = 'ZTASK'.
    lr_column->set_cell_editor( lr_input_field ).
ENDIF.

Hi Manjunath,
I dont undersatnd what you are trying to write.Because you write same logic in the if and else part.What is purpose of it.
Try to take different variables for columns.
IF v_flag = 'X'.
lr_table_settings ?= l_value.
lr_table_settings->set_read_only( abap_false ).
lr_column_settings ?= l_value.
lr_column1= lr_column_settings->get_column( 'PROJ_ID' ).
CREATE OBJECT lr_input_field
EXPORTING
value_fieldname = 'PROJ_ID'.
lr_column1->set_cell_editor( lr_input_field ).
lr_column_settings ?= l_value.
lr_column2 = lr_column_settings->get_column( 'ACCOUNT_NAME' ).
CREATE OBJECT lr_input_field
EXPORTING
value_fieldname = 'ACCOUNT_NAME'.
lr_column2->set_cell_editor( lr_input_field ).
lr_column_settings ?= l_value.
lr_column3 = lr_column_settings->get_column( 'ZTASK' ).
CREATE OBJECT lr_input_field
EXPORTING
value_fieldname = 'ZTASK'.
lr_column3->set_cell_editor( lr_input_field ).
endif.

Making the Asset field editable in MIGO

Hi,
I need a help in MIGO transaction. If you do a GR against a PO with type ACCOUNT ASSIGNMENT = A (asset), that is , if in EKPO table the record of that PO contains a value EKPO-KNTTP = A, in the MIGO screen you find a field "Asset", in the Genral TAB of line Item Data. Can please tell me how to make that field editable?
Points Guranteed.

Hello Anid,
You need to make setting for the account assignment category "A" in the SPRO mode
SPRO -> Mat mangt -> Purchsing -> Account assignment - > Maintain account assignment categor
Select the line item with "A", click on Detail and flag mark "Acct assignment changable"
Hope this will resolve your problem
Regards
Arif Mansuri

Making fields editable

Can Adobe Reader Touch make some pdf fields editable?

Hi Manjunath,
I dont undersatnd what you are trying to write.Because you write same logic in the if and else part.What is purpose of it.
Try to take different variables for columns.
IF v_flag = 'X'.
lr_table_settings ?= l_value.
lr_table_settings->set_read_only( abap_false ).
lr_column_settings ?= l_value.
lr_column1= lr_column_settings->get_column( 'PROJ_ID' ).
CREATE OBJECT lr_input_field
EXPORTING
value_fieldname = 'PROJ_ID'.
lr_column1->set_cell_editor( lr_input_field ).
lr_column_settings ?= l_value.
lr_column2 = lr_column_settings->get_column( 'ACCOUNT_NAME' ).
CREATE OBJECT lr_input_field
EXPORTING
value_fieldname = 'ACCOUNT_NAME'.
lr_column2->set_cell_editor( lr_input_field ).
lr_column_settings ?= l_value.
lr_column3 = lr_column_settings->get_column( 'ZTASK' ).
CREATE OBJECT lr_input_field
EXPORTING
value_fieldname = 'ZTASK'.
lr_column3->set_cell_editor( lr_input_field ).
endif.

Making GL Account field editable during Approval Process

Hi Experts,
We are in SRM 7.0 and using process controlled workflow.
As a business requirent,we want the GL account field to be editable during the approval process i.e during approval process,approve wants to change the GL account in the shopping cart as the GL account may not be correctly entered.
Is it possible to make the GL account field editable during approval process?if Yes,please share how it can be done.
Any pointers will be highly appreciated.
Thanks & Regards,
Rupesh

Hi,
You can find info in help.sap.com.
http://help.sap.com/saphelp_srm70/helpdata/EN/5c/b5a6783fc34466834fbc48def23d2d/frameset.htm
http://help.sap.com/saphelp_srm70/helpdata/EN/01/ad7bc4d66f4bc1a52a0cd21cdfa2ff/frameset.htm
Level Type: There are 3 possible entries. Approval with completion, Approval and Automatic. Within
a completion step the document can be changed by the approver if the u2018Changeableu2019 flag is set.
Within the approval phase, the document can only be approved or rejected but not changed. It is not
possible to mix the two phases of completion and approval. The completion phase is always before
the approval phase. The automatic step is a final means of validating the approval process, and to
verify that at least one step was returned without any error (example: event 0EV999). Depending on
the task ID assigned to the automatic step, the document will then be either approved or rejected.
Regards,
Masa

How to make fields editable in an custom enhancement

Hi Experts,
My requirement is to perform some custom validations against a field FKONT(BSEG) at the line item level of FB60 and display appropriate message and make the incorrect field editable.
I have implemented an implicit enhancement point in include MF05AFGENJ.
The error messages are coming but I am unable to make the GL account, cost center and profit center fields editable.
Please let me know how to make the above fields editable after displaying the error message.
For reference, I have done the coding like this:
IF sy-tcode = 'FB60' .
CHECK GL_ITEMS IS NOT INITIAL.
DATA: L_COUNT TYPE I,
      L_STRING TYPE STRING,
      L_FKONT TYPE FIPLS,
      L_TABIX TYPE SY-TABIX,
      G_FLAG TYPE C.
DATA: WA_ZZFSTP LIKE ZZFSTP.          "Work area for ZZFSTP table
CONSTANTS:C_MK TYPE TXJCD VALUE 'MK0000000'.
*-- Validating the Financial budget item field
IF GL_ITEMS-FKONT IS NOT INITIAL.
SELECT SINGLE FKONT
                    INTO L_FKONT
                    FROM ZFSTP
                    WHERE FKONT = GL_ITEMS-FKONT. "cost center
IF SY-SUBRC NE 0.
   CLEAR: G_FLAG.
   G_FLAG = 'X'.
   MESSAGE W003(ZZFI) WITH 'Please enter 'Financial' 'Budget Item Field' DISPLAY LIKE 'E'.
   EXIT.
ENDIF.
*-- Copying the first line item financial budget item field to all the line items in the internal table
DESCRIBE TABLE GL_ITEMS LINES L_COUNT.
IF L_COUNT > 1.
READ TABLE GL_ITEMS INDEX 1.
IF SY-SUBRC = 0.
        CLEAR: L_FKONT.
        L_FKONT = GL_ITEMS-FKONT.
*-- Assign the tax jurisdiction codes in all the line items
         LOOP AT GL_ITEMS.
           CLEAR: L_TABIX.
           L_TABIX = SY-TABIX.
           GL_ITEMS-FKONT = L_FKONT.
           GL_ITEMS-TXJCD = C_MK.
*-- Copy the first financial budget item number and tax jurisdiction code MK0000000 in all line items
           MODIFY GL_ITEMS INDEX L_TABIX TRANSPORTING FKONT TXJCD.
*-- Populate tax jurisdiction and FKONT financial budget item number in XBSEG table
           L_TABIX = L_TABIX + 1. "top record in XBSEG is for header
           READ TABLE XBSEG INDEX L_TABIX.
           IF SY-SUBRC = 0.
             XBSEG-FKONT = L_FKONT.
             XBSEG-TXJCD = C_MK.
             MODIFY XBSEG INDEX L_TABIX.
           ENDIF.
         ENDLOOP.
ENDIF.
ENDIF. "describe statement
CLEAR: WA_ZZSTP.
*-- Validate the amount and GL account against the FKONT(financial budget item) number
SELECT SINGLE FKONT
              ZZWRBTR
              ZZHKONT
              ZZKOSTL
              ZZPRCTR
       INTO CORRESPONDING FIELDS OF WA_ZZFSTP
       FROM ZFSTP
       WHERE FKONT EQ GL_ITEMS-FKONT.
IF sy-subrc EQ 0.
IF BSEG-WRBTR > WA_ZZFSTP-ZWRBTR.
       CLEAR: G_FLAG.
       G_FLAG = 'X'.
       MESSAGE W003(ZZFI) WITH 'Amount entered' 'cannot be' 'greater than ' WA_ZFSTP-ZZWRBTR DISPLAY LIKE 'E'.
       EXIT.
ELSE.
         CLEAR: G_FLAG.
        G_FLAG = 'X'.
        SET CURSOR FIELD 'GL_ITEMS-HKONT'.
        MESSAGE W003(ZZFI) WITH 'Incorrect GL account' 'number entered for' 'given financial' 'budget item number'.
        EXIT.
       ELSE.
*-- Check for cost center and profit center at line item level
         LOOP AT GL_ITEMS.
*-- Both cost center and profit center is initial.
            IF GL_ITEMS-KOSTL IS INITIAL AND GL_ITEMS-PRCTR IS INITIAL.
                CLEAR: G_FLAG.
                G_FLAG = 'X'.
                SET CURSOR FIELD 'GL_ITEMS-PRCTR' LINE SY-STEPL.
                SET CURSOR FIELD 'GL_ITEMS-KOSTL' LINE SY-STEPL.
                MESSAGE W003(ZZFI) WITH 'Please enter' 'cost center' 'or' 'profit center'.
                EXIT.
*-- Either cost center or profit center is initial
            ELSEIF GL_ITEMS-KOSTL IS INITIAL AND GL_ITEMS-PRCTR IS NOT INITIAL.
                CHECK GL_ITEMS-PRCTR NE WA_ZZFSTP-ZPRCTR.
                  CLEAR: G_FLAG.
                  G_FLAG = 'X'.
                  SET CURSOR FIELD 'GL_ITEMS-PRCTR' LINE SY-STEPL.
                  MESSAGE W003(ZZFI) WITH 'Incorrect profit' 'center entered' 'for given' 'financial budget item' DISPLAY LIKE 'E'.
                  EXIT.
            ELSEIF GL_ITEMS-KOSTL IS NOT INITIAL AND GL_ITEMS-PRCTR IS INITIAL.
               CHECK GL_ITEMS-KOSTL NE WA_ZFSTP-ZKOSTL.
                  CLEAR: G_FLAG.
                  G_FLAG = 'X'.
                  SET CURSOR FIELD 'GL_ITEMS-KOSTL' LINE SY-STEPL.
                  MESSAGE W003(ZZFI) WITH 'Incorrect cost' 'center entered' 'for given' 'financial budget item' DISPLAY LIKE 'E'.
                  EXIT.
            ENDIF.
         ENDLOOP.
       ENDIF. "GL Account
ENDIF. "Amount check
ENDIF. "SY-SUBRC check
ENDIF.
EXPORT G_FLAG FROM G_FLAG TO MEMORY ID 'ZER'.
Please let me know how to make GLaccount,cost center and profit center fields editable.
Regards,
Sangeeta.

Hi.. chaek the below links. may be useful to u.
Making Table control records Editable / Non-editable
Table control with both Editable and non Editable fields
Regards,
KP.

How to make field editable in ALV tree in OOPs?

Hi Gems,
Again I need help from you all.
I am writing a program using OOPs and the uotput will be in ALV tree. I need to make a field editable in a perticular row.
I am doing it using layout but the program is giving error during
CALL METHOD CL_GUI_CFW=>FLUSH
 EXCEPTIONS
 CNTL_SYSTEM_ERROR = 1
 CNTL_ERROR = 2.
This method is returning sy-subrc = 2 and I am unable to get the output.
I am using below code to make the field editable:
DATA: LT_LAYOUT_ITEM TYPE LVC_T_LAYI,
 LS_LAYOUT_ITEM TYPE LVC_S_LAYI.
LS_LAYOUT_ITEM-FIELDNAME = 'ACPCKTWRT'. "ACPCKTWRT is the field name in the Internal table
LS_LAYOUT_ITEM-EDITABLE = 'X'.
APPEND LS_LAYOUT_ITEM TO LT_LAYOUT_ITEM.
CALL METHOD G_ALV_TREE->ADD_NODE
 EXPORTING
 I_RELAT_NODE_KEY = FP_RELAT_KEY
 I_RELATIONSHIP = CL_GUI_COLUMN_TREE=>RELAT_LAST_CHILD
 IS_OUTTAB_LINE = LS_TMP_FINFCNO "structure of the internal table
 IS_NODE_LAYOUT =
 IT_ITEM_LAYOUT = LT_LAYOUT_ITEM "Added layout to make the field editable
 I_NODE_TEXT = LV_NODE_TEXT "Node text
 IMPORTING
 E_NEW_NODE_KEY = FP_NODE_KEY
 EXCEPTIONS
 RELAT_NODE_NOT_FOUND = 1
 NODE_NOT_FOUND = 2
 OTHERS = 3
IF SY-SUBRC <> 0.
 MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
 WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
Please help me and let me know how to get the solution.

Hello
The ALV tree control is not intended for making values editable (e.g. see
[How to make ALV tree columns editable|http://sap.ittoolbox.com/groups/technical-functional/sap-abap/how-to-make-alv-tree-columns-editable-2052414])
However, if you need an editable tree control then you have to use a different class (e.g. CL_ITEM_TREE_MODEL or CL_COLUMN_TREE_MODEL) but you will not have the ALV functionality of the ALV tree control.
Regards
Uwe

In T.Code PA30 under infotype 2011 field editing is required

Hi All,
In t.code PA30 under infotype 2011 when in create mode i need to have the field (Customer-Specific Field) in edit mode.
Please advice me can i have the edit mode for the field P2011-PDC_USRUP.
Regards
Badari

Hi badari,
1. This is done thru customization SPRO
 by functional consultant.
2. There there is the option
 of making this field (for this infotype 2011,
 module pool name MP200000)
 visible/obligatory,optional etc.
regards,
amit m.

Field editable in alv

Hi,
I'm using REUSE_ALV function module for the ALV display. I want to make a particular field editable in my display. How do I do it, and if I do it will the edited value get updated in my internal table as well.
Thanks for the help in advance.
Regards,
Vijay

Hi,
there is sample code for it...
REPORT ZTESTDFALV1 .
*Data Declaration
DATA: BEGIN OF T_EKKO,
EBELN TYPE EKPO-EBELN,
EBELP TYPE EKPO-EBELP,
* FLAG TYPE C,
* HANDLE_STYLE TYPE LVC_T_STYL,
END OF T_EKKO.
DATA: GD_REPID LIKE SY-REPID, "Exists
REF_GRID TYPE REF TO CL_GUI_ALV_GRID. "new
DATA: BEGIN OF IT_EKKO OCCURS 0.
 INCLUDE STRUCTURE T_EKKO.
DATA: END OF IT_EKKO.
DATA: BEGIN OF IT_BACKUP OCCURS 0.
 INCLUDE STRUCTURE T_EKKO.
DATA: END OF IT_BACKUP.
*ALV data declarations
TYPE-POOLS: SLIS. "ALV Declarations
DATA: FIELDCATALOG TYPE SLIS_T_FIELDCAT_ALV WITH HEADER LINE,
 GD_LAYOUT TYPE SLIS_LAYOUT_ALV.
*Start-of-selection.
START-OF-SELECTION.
PERFORM DATA_RETRIEVAL.
PERFORM BUILD_FIELDCATALOG.
PERFORM BUILD_LAYOUT.
IT_BACKUP[] = IT_EKKO[].
PERFORM DISPLAY_ALV_REPORT.
*& Form build_fieldcatalog
* text
FORM BUILD_FIELDCATALOG.
REFRESH FIELDCATALOG.
CLEAR FIELDCATALOG.
FIELDCATALOG-FIELDNAME = 'EBELN'.
FIELDCATALOG-SELTEXT_M = 'Purchase Order'.
FIELDCATALOG-INPUT = 'X'.
FIELDCATALOG-EDIT = 'X'.
FIELDCATALOG-COL_POS = 2.
APPEND FIELDCATALOG.
CLEAR FIELDCATALOG.
FIELDCATALOG-FIELDNAME = 'EBELP'.
FIELDCATALOG-SELTEXT_M = 'PO Item'.
FIELDCATALOG-COL_POS = 3.
APPEND FIELDCATALOG.
CLEAR FIELDCATALOG.
ENDFORM. " BUILD_FIELDCATALOG
*& Form BUILD_LAYOUT
* Build layout for ALV grid report
FORM BUILD_LAYOUT.
"Permet d'ajuster les colonnes au text
* gd_layout-colwidth_optimize = 'X'.
* GD_LAYOUT-TOTALS_TEXT = 'Totals'(201).
* gd_layout-box_fieldname = 'SELECT'.
* gd_layout-box_tabname = 'IT_EKKO'.
ENDFORM. " BUILD_LAYOUT
*& Form DISPLAY_ALV_REPORT
* Display report using ALV grid
FORM DISPLAY_ALV_REPORT .
GD_REPID = SY-REPID.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
 EXPORTING
 I_CALLBACK_PROGRAM = GD_REPID
* i_callback_top_of_page = 'TOP-OF-PAGE'
 I_CALLBACK_PF_STATUS_SET = 'SET_PF_STATUS'
 I_CALLBACK_USER_COMMAND = 'USER_COMMAND'
* i_grid_title = 'My Title'
 IS_LAYOUT = GD_LAYOUT
 IT_FIELDCAT = FIELDCATALOG[]
 TABLES
 T_OUTTAB = IT_EKKO
 EXCEPTIONS
 PROGRAM_ERROR = 1
 OTHERS = 2.
IF SY-SUBRC <> 0.
 WRITE:/ SY-SUBRC.
ENDIF.
ENDFORM. " DISPLAY_ALV_REPORT
*& Form DATA_RETRIEVAL
* Retrieve data form EKPO table and populate itab it_ekko
FORM DATA_RETRIEVAL.
SELECT EBELN EBELP
 UP TO 10 ROWS
 FROM EKPO
 INTO CORRESPONDING FIELDS OF TABLE IT_EKKO.
ENDFORM. " DATA_RETRIEVAL
* FORM SET_PF_STATUS *
FORM SET_PF_STATUS USING RT_EXTAB TYPE SLIS_T_EXTAB.
SET PF-STATUS 'STANDARD_FULLSCREEN1' EXCLUDING RT_EXTAB.
ENDFORM. "set_pf_status
*& Form user_command
* text
* -->R_UCOMM text
* -->RS_SELFIELDtext
FORM USER_COMMAND USING R_UCOMM LIKE SY-UCOMM
 RS_SELFIELD TYPE SLIS_SELFIELD.
*then insert the following code in your USER_COMMAND routine...
IF REF_GRID IS INITIAL.
 CALL FUNCTION 'GET_GLOBALS_FROM_SLVC_FULLSCR'
 IMPORTING
 E_GRID = REF_GRID.
ENDIF.
IF NOT REF_GRID IS INITIAL.
 CALL METHOD REF_GRID->CHECK_CHANGED_DATA
ENDIF.
*modify
CASE R_UCOMM.
 WHEN '&IC1'.
 CHECK RS_SELFIELD-TABINDEX > 0.
 IF RS_SELFIELD-VALUE EQ '6000000001'.
 CALL TRANSACTION 'ZDF2'.
 ENDIF.
 WHEN 'REFRESH'.
 READ TABLE IT_EKKO INDEX RS_SELFIELD-TABINDEX.
 IF SY-SUBRC = 0.
 READ TABLE IT_BACKUP INDEX RS_SELFIELD-TABINDEX.
 IF SY-SUBRC = 0.
 IF IT_EKKO <> IT_BACKUP.
* then do your check
 ENDIF.
 ENDIF.
 ENDIF.
 PERFORM DATA_RETRIEVAL.
 RS_SELFIELD-REFRESH = 'X'.
ENDCASE.
ENDFORM. "user_command
and also check this thread in which i gave the solution....
REUSE_ALV_GRID EDITABLE
Regards
vijay

Short Dump while making a fields as required in BDT object screens

Hi,
I'm making a field as "required" by checking the required button on that field in the BDT screen.
But am getting a short dump when I'm trying to use that screen.
It seems like some data is getting converted to bad format due to this (am not fully sure about it.)
Any idea on this.
Thanks & Regards,
Vipul.

Hi Pinaki,
The entire functionality is working absolutely perfect if I dont check that field as "Required" .
I'm not sure if I'm missing some customising or is it a problem with BDT.
Thanks & Regards,
Vipul.

After Showing ERROR message make the field editable in subscreen.

Hello Experts,
I have a requirment where i have added a subscreen to the standard screen of ME31K for creating the contract. In my Subcreen i have my custom screen fields that i'm updating in EKKO table through include structure.
Now if user forget to fill the details in my custom fields in the subscreen then i'm giving the error message prompting the user to fill the value in fields.
But the problem is the screen is locked there itself i want to make the field editable so that user can enter some value in the fields. I can not use the stuatus or information message here because doing this i will get the item overview screen which should not come as i want to restrict the user to header details only and fill all the custom fields.
Please provide me with your helpful responses.
Thnaks,
Naveen

Hi Naveen,
Sorry for the delay.
The code which I gave for popup, i hope its being shown in an IF . . . ENDIF.
So in that condition u can add the following :
IF < ur condition >
 < Call message FMs >
 SET SCREEN SY-DYNNR. "this would set screen to current screen which is 0201
 EXIT.
ENDIF.
Other than this if you like you can set some parameters in the PAI of this screen which redirect to current screen based on some conditions.
So u can manually set OK-CODE and CALFCODE as SPACE, but i dont know how much this can impact the process.
So please follow the above code.
This is available in
Main Program SAPMM06E
Source code of MM06EF0F_FCODE_CALL
IF OK-CODE EQ SPACE AND
 CALFCODE EQ SPACE.
SET SCREEN SY-DYNNR.
EXIT.
ENDIF.
Hope this helps.
Regards,
Ateet

Making a field editable

Similar Messages

Maybe you are looking for