‎2008 Nov 05 8:38 AM
Hi Experts,
can u please Explain me the procedure to edit the ourtput of a classical reporta nd after editing if i press save that changes should be updated.
Thanks
sai
Moderator message: in future, please use a meaningful subject, and search before you post
Edited by: Matt on Nov 5, 2008 10:29 AM
‎2008 Nov 05 9:11 AM
REPORT ZSRK_024 .
DATA : BEGIN OF IT_TEMP OCCURS 0,
F1(10) TYPE C,
F2 TYPE I,
F3(6) TYPE C,
END OF IT_TEMP.
DATA : IND TYPE I VALUE 2.
AT USER-COMMAND.
CASE SY-UCOMM.
WHEN 'SAVE'.
LOOP AT IT_TEMP.
IND = IND + 1.
READ LINE IND FIELD VALUE IT_TEMP-F1 INTO IT_TEMP-F1
IT_TEMP-F2 INTO IT_TEMP-F2
IT_TEMP-F3 INTO IT_TEMP-F3.
MODIFY IT_TEMP INDEX SY-TABIX.
WRITE : / IT_TEMP-F1 INPUT OFF,
IT_TEMP-F2 INPUT OFF,
IT_TEMP-F3 INPUT OFF.
ENDLOOP.
ENDCASE.
START-OF-SELECTION.
SET PF-STATUS 'ABCD'.
IT_TEMP-F1 = 'AAAAAAAAAA'.
IT_TEMP-F2 = 1.
IT_TEMP-F3 = 'TEST1'.
APPEND IT_TEMP.
CLEAR IT_TEMP.
IT_TEMP-F1 = 'BBBB'.
IT_TEMP-F2 = 2.
IT_TEMP-F3 = 'TEST2'.
APPEND IT_TEMP.
CLEAR IT_TEMP.
LOOP AT IT_TEMP.
WRITE : / IT_TEMP-F1 INPUT ON,
IT_TEMP-F2 INPUT ON,
IT_TEMP-F3 INPUT ON.
ENDLOOP.
‎2008 Nov 05 8:41 AM
Hi
to edit the alv, u need to add a field in fieldcatalog.
wa_fieldcat-edit = 'X'.
once u edit the data , press enter it will be available in ur internal table that u used for displaying output.
modify it with the edited value.
regards,
Ramya
‎2008 Nov 05 8:43 AM
Hi ramya,
Thank u for ur quick response.i know the procedure for editing an ALV report.how to edit Classical report
Thanks
sai
‎2008 Nov 05 8:46 AM
Hi,
Use Write with INPUT ON.
WRITE a INPUT ON.
SET PF-STATUS 'PF'.
AT USER-COMMAND.
-------
‎2008 Nov 05 8:48 AM
Hi saha
thank u for ur solution .can u please give me some sample code
Thanks
sai
‎2008 Nov 05 9:13 AM
Hi,
U can check this code...
DATA: a TYPE char10 VALUE 'ABCD',
wa TYPE char10,
i TYPE i VALUE 3. "2 + line number
WRITE a INPUT ON.
SET PF-STATUS 'PF'. "to get the SAVE button
AT USER-COMMAND. "To catch the save action
READ LINE i FIELD VALUE a INTO a. "Read the Modified Values....
BREAK-POINT.
Edited by: Sukriti Saha on Nov 5, 2008 2:43 PM
‎2008 Nov 05 8:49 AM
‎2008 Nov 05 8:52 AM
Hi sai....
Check this standard program.... DEMO_LIST_SET_CURSOR_2
Hope this will help you
Regards
Raja
‎2008 Nov 05 9:11 AM
REPORT ZSRK_024 .
DATA : BEGIN OF IT_TEMP OCCURS 0,
F1(10) TYPE C,
F2 TYPE I,
F3(6) TYPE C,
END OF IT_TEMP.
DATA : IND TYPE I VALUE 2.
AT USER-COMMAND.
CASE SY-UCOMM.
WHEN 'SAVE'.
LOOP AT IT_TEMP.
IND = IND + 1.
READ LINE IND FIELD VALUE IT_TEMP-F1 INTO IT_TEMP-F1
IT_TEMP-F2 INTO IT_TEMP-F2
IT_TEMP-F3 INTO IT_TEMP-F3.
MODIFY IT_TEMP INDEX SY-TABIX.
WRITE : / IT_TEMP-F1 INPUT OFF,
IT_TEMP-F2 INPUT OFF,
IT_TEMP-F3 INPUT OFF.
ENDLOOP.
ENDCASE.
START-OF-SELECTION.
SET PF-STATUS 'ABCD'.
IT_TEMP-F1 = 'AAAAAAAAAA'.
IT_TEMP-F2 = 1.
IT_TEMP-F3 = 'TEST1'.
APPEND IT_TEMP.
CLEAR IT_TEMP.
IT_TEMP-F1 = 'BBBB'.
IT_TEMP-F2 = 2.
IT_TEMP-F3 = 'TEST2'.
APPEND IT_TEMP.
CLEAR IT_TEMP.
LOOP AT IT_TEMP.
WRITE : / IT_TEMP-F1 INPUT ON,
IT_TEMP-F2 INPUT ON,
IT_TEMP-F3 INPUT ON.
ENDLOOP.
‎2008 Nov 05 9:25 AM