Update/modify an internal table

hello
i m writing a program in which i m adding a new field to a table type, after adding i want to select those SO no which has the date='06/08/2009', but in the o/p screen i m seeing that the beside the SO no those two date values in the date field is coming , but i can t modify my screen to only these two SO.
LOOP AT i_vbkds INTO w_vbkds.
      READ TABLE postab INTO wa_postab WITH KEY vbeln = w_vbkds-zvbeln.
     IF sy-subrc = 0.
        i_index = sy-tabix.
        postab-fkdate = w_vbkds-zdate.
        postab-vbeln = w_vbkds-zvbeln.
        MODIFY postab INDEX i_index TRANSPORTING fkdate.
       if sy-subrc = 0.
       endif.
      ENDIF.
      CLEAR : w_vbkds.
    ENDLOOP.
ENDIF.
in this internal table vbkds only 2 datsa is shown but i can modify the same in postab(table which is uysed in display)
please help
Edited by: Rob Burbank on Nov 13, 2009 9:19 AM

hi all
thnx 4 ur reply...
i have also written transporting with vbeln but i removed it coz i was facing the same error.
vbeln fkdate
234    09082009
252    06082009
211    06082009
421
now when i give the search critera for fkdate = '06/08/2009' then i wat to show
vbeln fkdate
252    06082009
211    06082009
but for me rest of the things are also following with the fkdate value as ' '(when i check those SO fkdate is nt blank)
still in the selection criteria all comes..
postab is the final table to ALV, there are other fields also in POSTAB.
please help now

Similar Messages

How to update Records from Internal table to u2018Zu2019 table?

Hi Friends,
How to update Records from Internal table to u2018Zu2019 table.
I have records in Internal table , that records want to update on u2018Zmarau2019 Table.
( my internal table & u2018 Zu2019 table structures are same.)
Thanking you.
Regards,
Subash

Hi,
loop at internal table.
modify <Z- table > from values < internal table Workarea>.
if sy-subrc = 0.
COMMIT work.
else.
ROLLBACK waork.
endif.
endloop.
or
UPDATE <Z- table > from table < internal table Workarea>.
if sy-subrc = 0.
COMMIT work.
else.
ROLLBACK waork.
endif.
Prabhudas

Update statement in Internal Table

Plz tell me the syntax and e.g. of update statement in Internal Table program
Moderator message: Welcome to SCN, please research yourself before asking basic questions.
Edited by: Thomas Zloch on Feb 25, 2010 12:47 PM

Hi,
Use UPDATE statement , check below description from SAP help.
UPDATE dbtab FROM TABLE itab. or UPDATE (dbtabname) FROM TABLE itab.
Effect
Mass update of several lines in a database table.Here, the primary key for identifying the lines tobe updated and the values to be changed are taken from the lines of theinternal table itab.
The system field SY-DBCNT contains the number of updated lines,i.e. the number of lines in the internal table itab which havekey values corresponding to lines in the database table.
Regards
L Appana

Update & Insert into Internal table

Dear Abapers,
Is it possible to update a entry in the internal table if exists, otherwise inserts a new one.
I think MODIFY <Internal Table> will not insert new one if the matching entry is not there.
MODIFY <database_table> have this facility.
Thanks in advance,
Satish

Hi,
i dont know what type of fields u r having but about collect statement i am correct
The following special statement allows you to summate entries in an internal table:
COLLECT wa INTO itab.
itab must have a flat line type, and all of the fields that are not part of the table key must have a numeric type (f, i, p). You specify the line wathat you want to add as a work area that is compatible with the line type of itab.
When the line is inserted, the system checks whether there is already a table entry that matches the key. If there is no corresponding entry already in the table, the COLLECT statement has the same effect as inserting the new line. If an entry with the same key already exists, the COLLECT statement does not append a new line, but adds the contents of the numeric fields in the work area to the contents of the numeric fields in the existing entry.
REPORT demo_int_tables_COLLECT .
DATA: BEGIN OF line,
col1(3) TYPE c,
col2(2) TYPE n,
col3 TYPE i,
END OF line.
DATA itab LIKE SORTED TABLE OF line
WITH NON-UNIQUE KEY col1 col2.
line-col1 = 'abc'. line-col2 = '12'. line-col3 = 3.
COLLECT line INTO itab.
WRITE / sy-tabix.
line-col1 = 'def'. line-col2 = '34'. line-col3 = 5.
COLLECT line INTO itab.
WRITE / sy-tabix.
line-col1 = 'abc'. line-col2 = '12'. line-col3 = 7.
COLLECT line INTO itab.
WRITE / sy-tabix.
LOOP AT itab INTO line.
WRITE: / line-col1, line-col2, line-col3.
ENDLOOP.
The list output is:
1
2
1
abc 12 10
def 34 5
The example fills a sorted table. The first two COLLECT statements work like normal insertion statements. In the third COLLECTstatement, the first line of itab is modified.
Regards

UPDATE field in internal table?

Hi,
I have an internal table with XXXXXXXX records. I have to UPDATE 1 field with the same value.
Is there a faster way?
    LOOP AT lt_order_adm_h INTO wa_order_adm_h.
      wa_order_adm_h-process_type = 'Z002'.
      MODIFY lt_order_adm_h FROM wa_order_adm_h TRANSPORTING process_type.
    ENDLOOP.
tnx, Adibo.

HI Adibo,
Try below
data: lv_tabix type i. "take this index aswell for better perfromance.
    LOOP AT lt_order_adm_h INTO wa_order_adm_h .
      lv_index = sy-tabix.
      wa_order_adm_h-process_type = 'Z002'.
      MODIFY lt_order_adm_h FROM wa_order_adm_h index lv_index TRANSPORTING process_type.
    ENDLOOP.
or you can do one more thing.
if you want to modify only process_type field ( which is initail ) for whole table.
just do below
wa_order_adm_h-process_type = 'Z002'.
modify lt_order_adm_h from wa_order_adm_h tranporting process_type where process_type is ' ' .
any ways modify is the faster way.
Regards
Edited by: Prasanth on Mar 4, 2009 5:35 PM

Update value from internal table into table control

hi friends,
i have two text field and a button in a screen.if give the value and click the button it should get updated in the table control which is in the next screen.plz
help me with some sample coding.

hi Karthik ,
Here you go with the sample coding of moving internal table values to table control on module pool programs :
in screen painter flow-logic ............
process before output.
module status_3000.
loop at g_tab_con_01_itab
     into g_tab_con_01_wa
     with control tab_con
     cursor tab_con-current_line.
module tab_con_move.
endloop.
process after input.
module exit at exit-command.
module user_command_3000.
module clear_ok_code.
loop at g_tab_con_01_itab.
module read_tab_con.
endloop.
in your program .............
include z_tab_ctrl_top                          .    " global Data
program z_tab_ctrl.
tables : sflight,sbook,zsflight.
types:begin of t_tab_con_01 ,
        carrid like sflight-carrid,
        connid like sflight-connid,
        sel type c,
       end of t_tab_con_01.
data: g_tab_con_01_itab type t_tab_con_01 occurs 0 with header line,
      g_tab_con_01_wa type t_tab_con_01,
      g_tab_con_01_copied ,
      g_tab_con_01_lines like sy-loopc,
      ok_code like sy-ucomm,
      lines type i,
      init ,
      fill type i.
controls: tab_con type tableview using screen 3000.
module status_3000 output.
set pf-status 'ST100'.
set titlebar 'T100'.
endmodule.
module update_table_control input.
describe table g_tab_con_01_itab lines tab_con-lines.
endmodule.
module exit input.
ok_code = sy-ucomm.
if ok_code eq 'BACK' or ok_code eq 'EXIT' or ok_code eq 'CANCEL'.
    leave program .
endif.
endmodule.
module clear_ok_code input.
clear ok_code.
endmodule.
module fill_tab_con output.
read table g_tab_con_01_itab into zsflight index tab_con-current_line.
endmodule.                 " fill_tab_con OUTPUT
module read_tab_con input.
*lines = sy-loopc.
read table g_tab_con_01_itab into g_tab_con_01_wa index tab_con-current_line.
if sy-subrc eq 0.
move-corresponding sflight to g_tab_con_01_wa.
modify g_tab_con_01_itab from g_tab_con_01_wa index tab_con-current_line.
else.
move-corresponding sflight to g_tab_con_01_wa.
append g_tab_con_01_wa to g_tab_con_01_itab.
endif.
module tab_con_move output.
move-corresponding g_tab_con_01_wa to sflight.
endmodule.                 " tab_con_move OUTPUT
module tab_con_get_lines output.
g_tab_con_01_lines = sy-loopc.
endmodule.                 " tab_con_get_lines OUTPUT
module tab_con_modify input.
move-corresponding sflight to g_tab_con_01_wa.
modify g_tab_con_01_itab
      from g_tab_con_01_wa
      index tab_con-current_line.
endmodule.                 " tab_con_modify INPUT
module populate_tab_ctrl input.
if sy-subrc eq 0.
endif.
endmodule.
Look at the following modules in the above program ....
fill_tab_con
tab_con_modify
tab_con_get_lines
update_table_control
This will definately solve your problem or give an idea for solution ....
reward if helpful,
Regards,
Ranjita

Modify dynamic internal table from dynamic work area using index...

ASSIGN w_text TO <fs>.
 ASSIGN w_temp TO <fs1>.
 lint_tab_iw49[] = <tab>.
 lint_tab_iw49_t[] = <tab>.
 DELETE ADJACENT DUPLICATES FROM lint_tab_iw49 COMPARING aufnr.
 LOOP AT lint_tab_iw49 INTO lws_tab_iw49.
 READ TABLE lint_object_tab1 INTO lws_object_tab1
 WITH KEY aufnr = lws_tab_iw49-aufnr.
 IF sy-subrc EQ 0.
Collect operations in rows of an internal table.
 w_idx = 1.
 WHILE w_idx < 51.
 w_nn = w_idx.
 CONCATENATE 'lws_object_tab1-ZZOPERN' w_nn INTO w_xx.
 ASSIGN (w_xx) TO <fs>.
 CONCATENATE w_text <fs> INTO w_text SEPARATED BY ','.
 w_idx = w_idx + 1.
 ENDWHILE.
Split operations into an internal table to get operations in rows.
 SPLIT w_text AT ',' INTO TABLE lint_vornr.
 DELETE lint_vornr WHERE vornr = ' '.
 DESCRIBE TABLE lint_vornr LINES w_lines.
Collect costs in rows of an internal table
 CLEAR: w_idx, w_nn, w_xx, w_text.
 w_idx = 1.
 WHILE w_idx < 51.
 w_nn = w_idx.
 CONCATENATE 'lws_object_tab1-ZZCOST' w_nn INTO w_xx.
 ASSIGN (w_xx) TO <fs>.
 <fs1> = <fs>.
 CONCATENATE w_text <fs1> INTO w_text SEPARATED BY ','.
 w_idx = w_idx + 1.
 ENDWHILE.
Split costs into an internal table to get costs in rows.
 SPLIT w_text AT ',' INTO TABLE lint_escost.
 DELETE lint_escost WHERE cost = ' '.
 DESCRIBE TABLE lint_escost LINES w_lines_cost.
 Append lines of lint_escost from 1 to w_lines to lint_escost1.
Collect currencies in rows of an internal table
 CLEAR: w_idx, w_nn, w_xx, w_text.
 w_idx = 1.
 WHILE w_idx < 51.
 w_nn = w_idx.
 CONCATENATE 'lws_object_tab1-ZZCURR' w_nn INTO w_xx.
 ASSIGN (w_xx) TO <fs>.
 <fs1> = <fs>.
 CONCATENATE w_text <fs1> INTO w_text SEPARATED BY ','.
 w_idx = w_idx + 1.
 ENDWHILE.
Split costs into an internal table to get costs in rows.
 SPLIT w_text AT ',' INTO TABLE lint_curr.
 DELETE lint_curr WHERE curr = ' '.
 DESCRIBE TABLE lint_curr LINES w_lines_curr.
 Append lines of lint_curr from 1 to w_lines to lint_curr1.
 ENDIF.
 PERFORM update_object_tab_for_iw49n.
 ENDLOOP.
ENDIF.
ENDFORM. " modify_object_tab
*& Form update_object_tab_for_IW49N
 text
--> p1 text
<-- p2 text
FORM update_object_tab_for_iw49n .
DATA: lws_temp TYPE string VALUE 'where aufnr = lws_tab_iw49-aufnr',
 lw_index TYPE sy-index.
READ TABLE <tab> TRANSPORTING NO FIELDS WITH KEY ('AUFNR') =
lws_tab_iw49-aufnr.
IF sy-subrc EQ 0.
 lw_index = sy-tabix.
 LOOP AT <tab> INTO <wa1> FROM lw_index.
 IF <wa1>-aufnr NE lws_tab_iw49-aufnr.
 EXIT.
 ELSE.
 CLEAR lw_index.
 lw_index = sy-tabix.
 lw_index = 1.
 WHILE lw_index LE w_lines.
 READ TABLE lint_escost INTO lws_escost INDEX lw_index.
 IF sy-subrc EQ 0.
 lw_index = lw_index + 1.
 <wa1>-zzcost1 = lws_escost-cost.
 ENDIF.
 READ TABLE lint_curr1 INTO lws_curr INDEX lw_index.
 IF sy-subrc EQ 0.
 <wa1>-zzcurr1 = lws_curr-curr.
 ENDIF.
 MODIFY <tab> FROM <wa1> "TRANSPORTING ('ZZCOST1') ('ZZCURR1')
 INDEX sy-tabix.
 IF sy-subrc EQ 0.
 ENDIF.
 lw_index = lw_index + 1.
 ENDWHILE.
 ENDIF.
 ENDLOOP.
ENDIF.
ENDFORM. " update_object
Hi,
With referene to the code snippet above I want to modify <tab> from <wa1> on specific indices or with specific where condition.
Is it achievable... How?
Many thanks in advance.
Thanks & Regards,
Shreya

You might have to split the code in to two parts to keep the formatting intact.

Regarding the modify of internal table

do 40 times varying lga from p0008-lga01 next p0008-lga02
varying bet from p0008-bet01 next p0008-bet02.
*data: bet01 type p decimals 2.
if lga is initial.
exit.
endif.
INDEX = SY-INDEX.
amt1 = bet .
*bet01 = 20 / 100.
bet = ( bet * 50 ) / 100 .
CONCATENATE ch INDEX INTO BETXX.
assign betxx to <F2>.
assign (betxx) to <F1>.
<F2> = bet.
modify p0008 index INDEX transporting F1
write:/ <F2>.
enddo.
*endif.
ENDCASE.
endform.
can sombody tell me how to modify the p0008 table at the place vr im having the bet01 bet02 and so on fields.
vn im using this modify statement im getting an error as
Unable to interpret "INDEX". Possible causes of error: Incorrect

Hi Madhvi,
When you are posting a thread, please make sure others do not find it difficult to understand. Please don't use abbreviations like "vr" and "vn".
If you need prompt responses, please ensure you describe your requirements in
a proper manner.
You are getting error because of using wrong syntax. the correct syntax is -
MODIFY <itab> FROM <wa> [INDEX <idx>] [TRANSPORTING <f1> <f 2> ... ].
The work area <wa> specified in the FROM addition replaces the existing line in <itab>. The work area must be convertible into the line type of the internal table.
If you use the INDEX option, the contents of the work area overwrites the contents of the line with index <idx>. If the operation is successful, SY-SUBRC is set to 0. If the internal table contains fewer lines than <idx>, no line is changed and SY-SUBRC is set to 4.
Without the INDEX addition, you can only use the above statement within a LOOP. In this case, you change the current loop line <idx> is implicitly set to SY-TABIX.
When you change lines in sorted tables, remember that you must not change the contents of key fields, and that a runtime error occurs if you try to replace the contents of a key field with another value. However, you can assign the same value.
The TRANSPORTING addition allows you to specify the fields that you want to change explicitly in a list.
Regards
Indrajit.

Regarding the modifying an internal table

hi,
   i am having an internal table,i have to modify one field and the remaining fields should remain same in the internal table while displaying the internal table.
   can any body send the solution for this issue.
thanks in advance

hi,
you can see the following logic regarding modify statement with in loop or without loop.
DATA : BEGIN OF itab OCCURS 0,
       no(10) TYPE n,
       name(10) TYPE c,
       city(20) TYPE c,
       END OF itab.
itab-no = 001.
itab-name = 'vijay'.
itab-city = 'dharmavaram'.
APPEND itab.
itab-no = 002.
itab-name = 'krishna'.
itab-city = 'dharmavaram'.
APPEND itab.
itab-no = 003.
itab-name = 'vijay'.
itab-city = 'dharmavaram'.
APPEND itab.
itab-name = 'ram1'.
MODIFY itab INDEX 3 TRANSPORTING name.
LOOP AT itab.
IF sy-tabix = 2.
    itab-no = '0012'.
    itab-name = 'krishna.v'.
    MODIFY itab INDEX 2 TRANSPORTING no name.
    CLEAR itab.
ENDIF.
ENDLOOP.
LOOP AT itab.
WRITE :/ itab-no,itab-name,itab-city.
ENDLOOP.
Hope this example will be usage for you.
Reward with points if it is useful.
Regards,
Vijay

Update value of internal table in table control

hi friends,
i have two text field and a button in a screen.if give the value and click the button it should get updated in the table control which is in the next screen.plz
help me with some sample coding.

Hi,
As I can understand, you want
1. To enter details in two fields. You want to enter data there and then press an enter Button.
2. This two fields are part of table control in the next screen and it has some data present there. You want to add data of this two fields in the Internal table.
THere are few options.
1. Define a Global internal Table.
2. Fetch Data in that internal Table in your 1st Screen Say 100 with the 2 text fields.
3. On click of the button. In PAI append data of the fields in the Global Internal Table.
4. Display internal table by looping on it in the next screen say 200.
Hope this is the answer you are looking for.
Try to solve, if you can't then send me message or email.
Cheers.
Darshan
** Please reward points if this helps u. It motivates us to write more answer and put more efforts.

How to update value in internal table from cdpos taking fname n value_new?

hello everyone,
 i want to insert value in internal table from cdpos table taking field name from fname and value from value_new.but the problem is i am not getting how to map the corresponding field of internal table with fname value which is the field name.
for example
i
fieldname
value
name1
raj
name2
sharma
i want to update field name1. this name1 is there in fname with updated value in value_new how to make name1 with fname value
thanks and regards
laxmikant soni

Hi Laxmikant,
If I have understood your requirement correctly, you need to update an internal table with latest 'value_new' from cdpos table where 'fname' = 'fieldname' .
Hope the below logic will help you:
FIELD-SYMBOLS: <wa_intab> LIKE LINE OF lt_intab. "the internal table you want to change
LOOP AT lt_intab ASSIGNING <wa_intab> .
 READ TABLE lt_cdpos INTO wa_cdpos "lt_cdpos contains latest data selected from CDPOS
 WITH KEY fname = <wa_intab>-fieldname.
 IF sy-subrc = 0.
 <wa_intab>-value = wa_cdpos-value_new.
 ELSE.
 "//logic if the name is not there in CDPOS
 ENDIF.
 CLEAR wa_cdpos.
ENDLOOP.
If you wish to improve performance, I suggest using
1. "transporting value_new" addition in READ TABLE,
2. select only the data which you require from CDPOS,
3. create the internal tables with only fields which you require,
4. when you are using SELECT,LOOP AT statements, limit records by using WHERE condition
Regards,
Kavya

Update ztable from internal table

I want to update the Ztable from internal table datas.
what is the syntax to update.
Its urgent send with coding example is better

Hi
PARAMETERS: p_carrid TYPE sflight-carrid,
 percent(1) TYPE p DECIMALS 0.
DATA sflight_tab TYPE TABLE OF sflight.
FIELD-SYMBOLS <sflight> TYPE sflight.
SELECT *
 FROM sflight
 INTO TABLE sflight_tab
 WHERE carrid = p_carrid AND
 fldate = sy-datum.
IF sy-subrc = 0.
LOOP AT sflight_tab ASSIGNING <sflight>.
 <sflight>-price =
 <sflight>-price * ( 1 - percent / 100 ).
ENDLOOP.
ENDIF.
UPDATE sflight FROM TABLE sflight_tab.
Thanks
Vijay
PLZ reward points if helpful

Update databse from internal table statement not using index

Hi Guys,
We are updating a databse table from a file. The file has a couple of fields which have data different from what the database has (non-primary fields :). We upload the file data into an internal table and then update the database table from internal table. At a time, internal table is supposed to have 10,000 records. I did SQL trace and found that the update statement is not making use of the databse index.
Should not the update statement here be using the table index (for primary key)?
Regards,
Munish

... as often there are recommendations in this forum which makes me wonder, how people overestimate their knowledge!!!
Updates and Deletes do of course use indexes, as can be seen in the SQL Trace (use explain).
Inserts don't use indexes, because in many databases inserts are just done somewhere, But also with the INSERT, the primary key is the constraint for the uniqueness condition, duplicate keys are not allowed.
Coming to the original question, what is you actually coding for the update?
What is the table, which fields are in the internal table and what are the indexes?
Siegfried

Modify in internal table

loop at mdcw.
 READ TABLE mdeqp WITH KEY zs_equnr = mdcw-zs_equnr.
 z_index = sy-tabix.
 mdeqp-zs_venddat = mdcw-zs_venddat.
 mdeqp-zs_vbegdat = mdcw-zs_vbegdat.
 mdeqp-zs_invoice = mdcw-zs_invoice .
 mdeqp-zs_vbeln = mdcw-zs_vbeln.
 IF sy-subrc = 0.
 MODIFY mdeqp INDEX z_index.
 ENDIF.
ENDLOOP.
LOOP AT mdeqp.
endloop.
when i'm before the loop i have in the header zs_vbeln='20900000'
when i enter into the loop
zs_vbeln=' '
do you have a suggestion?

hi,
Before using READ TABLE, clear the header and after reading, make a sy-subrc check.
loop at mdcw.
CLEAR : MDEQP.
READ TABLE mdeqp WITH KEY zs_equnr = mdcw-zs_equnr.
IF SY-SUBRC = 0.
z_index = sy-tabix.
mdeqp-zs_venddat = mdcw-zs_venddat.
mdeqp-zs_vbegdat = mdcw-zs_vbegdat.
mdeqp-zs_invoice = mdcw-zs_invoice .
mdeqp-zs_vbeln = mdcw-zs_vbeln.
MODIFY mdeqp INDEX z_index.
ENDIF.
ENDLOOP.
Earlier code makes modifications in records though sy-subrc <> 0 .
Dont forget to reward points if this helps you.
Regards,
Sailaja.

BRFplus: Problem updating values in an internal table in a loop expression

Hi
I'm looking into the loop expression type of BRFplus and I have come across a problem updating an internal table, I'm trying to create and populate the table using a loop, here is the functionality I'm trying to achieve:
In a rule set create an internal MONTH_TBL table containing 12 rows of two columns: MONTH_NUM containing values 1 through 12 and MONTH_VAL containing an amount (initially 0,00 EUR in all 12 rows).
After initializing the table traverse through SFLIGHT table and for each row add PRICE from the table to MONTH_VAL in the row of MONTH_TBL corresponding to the month of FLDATE field in SFLIGHT.
The initialization of MONTH_TBL works as intended, as does the traversal of and retrieval of values from SFLIGHT. The problem however is the update of the internal table MONTH_TBL (defined as result data object for the function). I don't get an error, but the tables does not get updated, and I cannot seem to find out what the problem is. I would have attached an XML extract of the function + ruleset for information, but it dosen't seem like that is possible, I could e-mail it on request (for SAP employees with access to system QU5 the function is LOOP_TEST in application Z_KLAUS_TEST).
I hope that this is sufficient information to understand the issue that I'm dealing with.
best regards
Klaus Stenbæk, KMD

Hi Klaus,
The Loop expression is part of NW 7.02 which is not yet released. When you experience the problem as part of a test you should have a contact at SAP for dealing with problems/errors. Usually SAP-internal messages are used for this purpose. Please clarify with your SAP contact how the model is.
BR,
Carsten

Update/modify an internal table

Similar Messages

Maybe you are looking for