topic Re: Modifying dynamic internal table in Application Development and Automation Discussions

Modifying dynamic internal table

former_member210857 — Tue, 01 Apr 2014 10:43:29 GMT

Hi Experts ,

I have a requirement to modify dynamic internal table..

Eg:

In the below screen grab there is two consulting Exp .I want to make it a single row and modify values accordingly.I have checked in forums and everywhere it is showing how to append a dynamic internal table. I want to modify internal table

Thanks and Regards,

Subeesh Kannottil

Re: Modifying dynamic internal table

custodio_deoliveira — Tue, 01 Apr 2014 11:21:44 GMT

If you want to summarize values, why dont you use COLLECT statement?

Re: Modifying dynamic internal table

Former Member — Tue, 01 Apr 2014 11:30:22 GMT

please search for the use of COLLECT before the real use (as it is not always clear, how and which columns will be summarized). For me a simple copy of the internal table with reading / appending lines is a better approach as for the clearness of the code.

Re: Modifying dynamic internal table

former_member210857 — Tue, 01 Apr 2014 11:38:20 GMT

Thanks for the reply,

I dont want to add the values in the fields,

As you can see in the picture Consulting expenses comes twice ,

First one got value in the first column and second one in the 5 th column .

I want consulting expenses as one row filled with '555 ' in the first column and '13000' in the fifth row

thanks and regards ,

Subeesh Kannottil

Re: Modifying dynamic internal table

Former Member — Tue, 01 Apr 2014 11:44:59 GMT

then probably you do not want to add the row but search for an existing one? Our response is probably still the same

Re: Modifying dynamic internal table

Former Member — Tue, 01 Apr 2014 13:40:42 GMT

If I'm not wrong, I think that he needs to merge the records DINAMICALLY field by field.

I'm trying to find a solution!!!

Re: Modifying dynamic internal table

Former Member — Tue, 01 Apr 2014 14:47:58 GMT

I've tried to find a solution but unfortunately there is no ABAP STATEMENT (like COLLECT) / FUNCTION MODULE that could allow you to make this operation.

I think that you have to make a routine form to manage this type of situation properly.

Hope that someone could light up this post.

Finger crossed.

Re: Modifying dynamic internal table

Former Member — Tue, 01 Apr 2014 17:17:49 GMT

Debug below snippet and observe how internal table changes.

TYPES: 
BEGIN OF ty, 
  name TYPE char10, 
  val1 TYPE i, 
  val2 TYPE i, 
END OF ty. 
DATA: lt TYPE TABLE OF ty, 
      ls TYPE ty. 
ls-name = 'consulting'. 
ls-val1 = 1. 
APPEND ls TO lt. 
CLEAR ls-val1. 
ls-val2 = 5. 
APPEND ls TO lt. 
 
DATA lv_value TYPE i. 
PERFORM get_value USING lt 2 3 lv_value. 
PERFORM modify_record USING lt 1 3 lv_value. 
PERFORM delete_record USING lt 2. 
*----------------------------------------------------------------------* 
FORM get_value  USING    pt TYPE STANDARD TABLE 
                         pv_index 
                         pv_column 
                         pv_value. 
  FIELD-SYMBOLS: <fs_record> TYPE ANY, 
                 <fs_value> TYPE ANY. 
  READ TABLE pt ASSIGNING <fs_record> INDEX pv_index. 
  CHECK sy-subrc EQ 0. 
  ASSIGN COMPONENT pv_column OF STRUCTURE <fs_record> TO <fs_value>. 
  CHECK sy-subrc EQ 0. 
  pv_value = <fs_value>. 
ENDFORM.                    " GET_VALUE 
*----------------------------------------------------------------------* 
FORM modify_record  USING    pt TYPE STANDARD TABLE 
                             pv_index 
                             pv_column 
                             pv_value. 
  FIELD-SYMBOLS: <fs_record> TYPE ANY, 
                 <fs_value> TYPE ANY. 
  READ TABLE pt ASSIGNING <fs_record> INDEX pv_index. 
  CHECK sy-subrc EQ 0. 
  ASSIGN COMPONENT pv_column OF STRUCTURE <fs_record> TO <fs_value>. 
  CHECK sy-subrc EQ 0. 
  <fs_value> = pv_value. 
ENDFORM.                    " MODIFY_RECORD 
*----------------------------------------------------------------------* 
FORM delete_record  USING    pt TYPE STANDARD TABLE 
                             pv_index. 
  DELETE pt INDEX pv_index. 
ENDFORM.                    " DELETE_RECORD 
 