Application Development Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 

ALV reports

Former Member
0 Kudos

Hi Experts,

Can anyone tell how to change some field values in ALV.

I was displaying the values which i have retrieved from the DB table.But now i need to change some of the field values and wantto save the data..

can anyone help to resolve this issue

1 ACCEPTED SOLUTION

Former Member
0 Kudos

Hi,

Please refer to the link below :

http://www.sapdev.co.uk/reporting/alv/alvgrid_editable.htm

Create a pushbutton on the application toolbar. Once you have edited the values. Capture the values into the internal table and use modify statement to update into the table.

Thanks,

Sriram Ponna.

3 REPLIES 3

Former Member
0 Kudos

Hi,

Please refer to the link below :

http://www.sapdev.co.uk/reporting/alv/alvgrid_editable.htm

Create a pushbutton on the application toolbar. Once you have edited the values. Capture the values into the internal table and use modify statement to update into the table.

Thanks,

Sriram Ponna.

Former Member
0 Kudos

before passing internal table to ALV... change the data....!!!

or if u want to change the data after it is displayed on ALV....then refer this program....

check the demo programs BCALV_FULLSCREEN_GRID_EDIT

BCALV_GRID_EDIT

BCALV_TEST_GRID_EDIT_01

BCALV_TEST_GRID_EDITABLE

Former Member
0 Kudos

&----


*& Report ZNNT_ALV

*&

&----


*&

*&

&----


*

REPORT ZPP009_CHANGE_SALESDEMAND.

*

----


  • MODULE *

*----


    • *

    • Objective : Asset Movement with Factory *

    • Program : Updates Tables ( ) *

    • : Outputs List ( X ) *

    • : Downloads data ( ) *

    • *

    • Technical Spec No : Central & Production Planning *

    • Date Created : 2007-12-13 *

    • Author : Nelson Rodrigo *

    • Location : Regents Court - Sri Lanka *

    • LDB : N/A *

    • *

*----


    • External Dependencies *

*----


    • *

*----


    • Amendment History *

*----


    • Who Change ID Reason *

*----


************************************************************************

*----


  • Tables : *

*----


*

TABLES : ZPP009_004.

TABLES : SSCRFIELDS.

*

*----


  • Types Begin with TY_ *

*----


*

TYPE-POOLS : SLIS.

*

*----


  • Constants Begin with C_ *

*----


  • *

CONSTANTS : C_HPD_MLD TYPE ZPP009_011-HPD_MLD VALUE '24'. "Hours per Day

  • *

*----


  • Internal tables Begin with IT_ *

*----


*

DATA : IT_ZPP009_006 TYPE STANDARD TABLE OF ZPP009_006,

WA_ZPP009_006 TYPE ZPP009_006.

  • *

*----


  • Data Begin with W_ *

*----


*

*------ ALV DATA DECLARATIONSs

DATA : FIELDCATALOG TYPE SLIS_T_FIELDCAT_ALV WITH HEADER LINE.

DATA : IT_FIELDCAT TYPE LVC_T_FCAT,

WA_FIELDCAT TYPE LVC_S_FCAT,

*

GD_TAB_GROUP TYPE SLIS_T_SP_GROUP_ALV,

GD_LAYOUT TYPE LVC_S_LAYO,

GD_REPID LIKE SY-REPID.

*

DATA : V_FMPERD TYPE ZPP009_005-VALID_FROM.

DATA : V_TOPERD TYPE ZPP009_005-VALID_TO.

DATA : ZSTAT(3) TYPE C.

DATA : C_DPM_MLD TYPE ZPP009_011-DPM_MLD.

DATA : V_PRDGRP TYPE STRING. "Product Group

DATA : V_HPD TYPE ZPP009_011-HPD_MLD.

  • *

*----


  • Field Symbols Begin with FS_ *

*----


*

FIELD-SYMBOLS <FS_ZPP009_006> TYPE ZPP009_006.

  • *

*----


  • Select Options Begin with SO_ *

*----


*

*

*----


  • Parameter Begin with PR_ *

*----


  • *

*----


  • I N I T I A L I Z A T I O N *

*----


*

*----


  • A T S E L E C T I O N S C R E E N *

*----


*

*

************************************************************************

  • s t a r t o f s e l e c t i o n

************************************************************************

  • *

START-OF-SELECTION.

*

IMPORT V_FMPERD V_TOPERD C_DPM_MLD V_PRDGRP FROM MEMORY ID 'ZPEROD'.

*

PERFORM ZPP009_COLLECTPARAM.

PERFORM ZPP009_DATA_COLLECTION.

PERFORM ZPP009_BUILD_FELDCAT.

PERFORM ZPP009_BUILD_LAYOUT.

PERFORM ZPP009_DISPLAY_FIELDCAT.

*

END-OF-SELECTION.

  • *

***********************************************************************

  • E N D O F S E L E C T I O N

************************************************************************

----


*

  • end of page

*----


**********************----


***************************

  • E N D O F A B A P

**********************----


***************************

*

*

&----


*& Form ZPP009_DATA_COLLECTION

&----


  • text

----


  • --> p1 text

  • <-- p2 text

----


FORM ZPP009_DATA_COLLECTION .

*

SELECT *

FROM ZPP009_006

INTO CORRESPONDING FIELDS OF TABLE IT_ZPP009_006

WHERE VALID_FROM EQ V_FMPERD

AND VALID_TO EQ V_TOPERD

AND PRD_GRP EQ V_PRDGRP.

*

ENDFORM. " ZPP009_DATA_COLLECTION

*

*

&----


*& Form ZPP009_BUILD_FELDCAT

&----


  • text

----


  • --> p1 text

  • <-- p2 text

----


FORM ZPP009_BUILD_FELDCAT .

*

WA_FIELDCAT-FIELDNAME = 'VALID_FROM'.

WA_FIELDCAT-SCRTEXT_M = 'Valid From'.

WA_FIELDCAT-COL_POS = 0.

WA_FIELDCAT-OUTPUTLEN = 10.

APPEND WA_FIELDCAT TO IT_FIELDCAT.

CLEAR WA_FIELDCAT.

*

WA_FIELDCAT-FIELDNAME = 'VALID_TO'.

WA_FIELDCAT-SCRTEXT_M = 'Valid To'.

WA_FIELDCAT-COL_POS = 0.

WA_FIELDCAT-OUTPUTLEN = 10.

APPEND WA_FIELDCAT TO IT_FIELDCAT.

CLEAR WA_FIELDCAT.

*

WA_FIELDCAT-FIELDNAME = 'MLD_ID'.

WA_FIELDCAT-SCRTEXT_M = 'Mould ID'.

WA_FIELDCAT-COL_POS = 0.

WA_FIELDCAT-OUTPUTLEN = 10.

APPEND WA_FIELDCAT TO IT_FIELDCAT.

CLEAR WA_FIELDCAT.

*

WA_FIELDCAT-FIELDNAME = 'MLD_GRP'.

WA_FIELDCAT-SCRTEXT_M = 'Mould Group'.

WA_FIELDCAT-COL_POS = 0.

WA_FIELDCAT-OUTPUTLEN = 10.

APPEND WA_FIELDCAT TO IT_FIELDCAT.

CLEAR WA_FIELDCAT.

*

WA_FIELDCAT-FIELDNAME = 'MLD_CAPACITY'.

WA_FIELDCAT-SCRTEXT_M = 'Per Mould Capacity'.

WA_FIELDCAT-COL_POS = 0.

WA_FIELDCAT-OUTPUTLEN = 10.

APPEND WA_FIELDCAT TO IT_FIELDCAT.

CLEAR WA_FIELDCAT.

*

WA_FIELDCAT-FIELDNAME = 'CAP_ACHIEVE'.

WA_FIELDCAT-SCRTEXT_M = 'Achived Capacity'.

WA_FIELDCAT-COL_POS = 0.

WA_FIELDCAT-OUTPUTLEN = 10.

APPEND WA_FIELDCAT TO IT_FIELDCAT.

CLEAR WA_FIELDCAT.

*

WA_FIELDCAT-FIELDNAME = 'PRODN_RATE'.

WA_FIELDCAT-SCRTEXT_M = 'Production Rate'.

WA_FIELDCAT-COL_POS = 0.

WA_FIELDCAT-OUTPUTLEN = 10.

APPEND WA_FIELDCAT TO IT_FIELDCAT.

CLEAR WA_FIELDCAT.

*

WA_FIELDCAT-FIELDNAME = 'CAP_REQ'.

WA_FIELDCAT-SCRTEXT_M = 'Capacity Demand'.

WA_FIELDCAT-EDIT = 'X'.

WA_FIELDCAT-COL_POS = 0.

WA_FIELDCAT-OUTPUTLEN = 10.

APPEND WA_FIELDCAT TO IT_FIELDCAT.

CLEAR WA_FIELDCAT.

*

WA_FIELDCAT-FIELDNAME = 'CAP_REQ_ORIG'.

WA_FIELDCAT-SCRTEXT_M = 'Capacity Demand Original'.

WA_FIELDCAT-COL_POS = 0.

WA_FIELDCAT-OUTPUTLEN = 10.

APPEND WA_FIELDCAT TO IT_FIELDCAT.

CLEAR WA_FIELDCAT.

*

WA_FIELDCAT-FIELDNAME = 'MLD_REQ'.

WA_FIELDCAT-SCRTEXT_M = 'Required Moulds'.

WA_FIELDCAT-COL_POS = 0.

WA_FIELDCAT-OUTPUTLEN = 10.

APPEND WA_FIELDCAT TO IT_FIELDCAT.

CLEAR WA_FIELDCAT.

*

*

ENDFORM. " ZPP009_BUILD_FELDCAT

*

*

&----


*& Form ZPP009_BUILD_LAYOUT

&----


  • text

----


  • --> p1 text

  • <-- p2 text

----


FORM ZPP009_BUILD_LAYOUT .

*

GD_LAYOUT-STYLEFNAME = 'FIELD_STYLE'.

GD_LAYOUT-ZEBRA = 'X'.

*

ENDFORM. " ZPP009_BUILD_LAYOUT

*

*

*

&----


*& Form ZPP009_DISPLAY_FIELDCAT

&----


  • text

----


  • --> p1 text

  • <-- p2 text

----


FORM ZPP009_DISPLAY_FIELDCAT .

*

GD_REPID = SY-REPID.

*

CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY_LVC'

EXPORTING

I_CALLBACK_USER_COMMAND = 'USER_COMMAND'

I_CALLBACK_PROGRAM = GD_REPID

IS_LAYOUT_LVC = GD_LAYOUT

IT_FIELDCAT_LVC = IT_FIELDCAT

I_SAVE = 'X'

TABLES

T_OUTTAB = IT_ZPP009_006

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.

*

ENDFORM. " ZPP009_DISPLAY_FIELDCAT

*

*

*

FORM USER_COMMAND USING R_UCOMM LIKE SY-UCOMM RS_SELFIELD TYPE SLIS_SELFIELD.

*

CASE R_UCOMM.

WHEN '&DATA_SAVE'. " Exploring orders with selected materials

*

LOOP AT IT_ZPP009_006 ASSIGNING <FS_ZPP009_006>.

*

<FS_ZPP009_006>-MLD_REQ = ( V_HPD / <FS_ZPP009_006>-MLD_CAPACITY ) * <FS_ZPP009_006>-CAP_REQ.

ENDLOOP.

*

MODIFY ZPP009_006 FROM TABLE IT_ZPP009_006.

ZSTAT = 'YES'.

*

EXPORT

V_TOPERD ZSTAT C_DPM_MLD TO MEMORY ID 'ZSDSAV'.

SUBMIT ZPP009_GEN_CAP_REQUIREMENT VIA SELECTION-SCREEN AND RETURN.

*

ENDCASE.

*

ENDFORM. "USER_COMMAND

*

*

&----


*& Form ZPP009_COLLECTPARAM

&----


  • text

----


  • --> p1 text

  • <-- p2 text

----


*

FORM ZPP009_COLLECTPARAM .

*

*-- Collect recently updated parameters

SELECT SINGLE HPD_MLD

FROM ZPP009_011

INTO V_HPD

WHERE UPD_TIME IN ( SELECT MAX( UPD_TIME ) FROM ZPP009_011 WHERE UPD_DATE IN ( SELECT MAX( UPD_DATE ) FROM ZPP009_011 ) ).

*

*

ENDFORM. " ZPP009_COLLECTPARAM

dear this is working code

in the field catalog

WA_FIELDCAT-FIELDNAME = 'CAP_REQ'.

WA_FIELDCAT-SCRTEXT_M = 'Capacity Demand'.

                            • WA_FIELDCAT-EDIT = 'X'.

WA_FIELDCAT-COL_POS = 0.

WA_FIELDCAT-OUTPUTLEN = 10.

APPEND WA_FIELDCAT TO IT_FIELDCAT.

CLEAR WA_FIELDCAT.

in this column editable

in the dispaly field catalog part

u can use save button to update table

if u unable to get reply me.

Rewards if useful.