topic Re: Help with a select block in Application Development and Automation Discussions

Help with a select block

Former Member — Tue, 28 Aug 2007 14:59:28 GMT

I have the following code and it seems to work great until the modify statement. After the program executes the statement nothing is modified in the internal table.

START-OF-SELECTION.

  SELECT a~vbeln a~vstel a~route a~vsbed b~brgew a~inco1 a~inco2 a~kunnr a~kunag
         b~matnr b~meins b~lgmng b~vgbel INTO CORRESPONDING FIELDS OF TABLE it_table
         FROM likp AS a
          INNER JOIN lips AS b ON b~vbeln = a~vbeln
          WHERE a~vstel IN so_vstel
          AND a~wadat_ist IN so_wadat
          AND b~mtart IN so_mtart.

  LOOP AT it_table INTO wa_table.
    SELECT SINGLE adrnr FROM vbpa INTO w_adrnr WHERE
      vbeln = wa_table-vgbel
      AND parvw = 'WE'.

    SELECT city1 region post_code1 INTO CORRESPONDING FIELDS OF wa_table
      FROM adrc WHERE
      addrnumber = w_adrnr.
    ENDSELECT.

    MODIFY TABLE it_table FROM wa_table.
  ENDLOOP.


END-OF-SELECTION.

Regards,

Davis

Re: Help with a select block

Former Member — Tue, 28 Aug 2007 15:03:32 GMT

Hi,

LOOP AT it_table INTO wa_table.

SELECT SINGLE adrnr FROM vbpa INTO w_adrnr WHERE

vbeln = wa_table-vgbel

AND parvw = 'WE'.

SELECT city1 region post_code1 INTO ( wa_table-city1,wa_table-region, wa_table-post_code1 )

FROM adrc WHERE

addrnumber = w_adrnr.

ENDSELECT.

MODIFY TABLE it_table FROM wa_table.

ENDLOOP.

Re: Help with a select block

Former Member — Tue, 28 Aug 2007 15:04:30 GMT

after the modification you need to commit to save the changes. look into that.

regards,

srinivas

*reward for useful answers*

Re: Help with a select block

Former Member — Tue, 28 Aug 2007 15:06:09 GMT

data : lv_tabix like sy-tabix.

LOOP AT it_table INTO wa_table.

lv_tabix = sy-tabix.

SELECT SINGLE adrnr FROM vbpa INTO w_adrnr WHERE

vbeln = wa_table-vgbel

AND parvw = 'WE'.

SELECT city1 region post_code1 INTO CORRESPONDING FIELDS OF wa_table

FROM adrc WHERE

addrnumber = w_adrnr.

ENDSELECT.

MODIFY TABLE it_table FROM wa_table index lv_tabix..

ENDLOOP.

Thanks

Mahesh

Re: Help with a select block

Former Member — Tue, 28 Aug 2007 15:08:22 GMT

declare one work area as like adrc.

data wa_adrc like adrc.

SELECT a_{vbeln a}vstel a_{route a}vsbed b_{brgew a}inco1 a_{inco2 a}kunnr a~kunag

b_{matnr b}meins b_{lgmng b}vgbel INTO CORRESPONDING FIELDS OF TABLE it_table

FROM likp AS a

INNER JOIN lips AS b ON b_{vbeln = a}vbeln

WHERE a~vstel IN so_vstel

AND a~wadat_ist IN so_wadat

AND b~mtart IN so_mtart.

LOOP AT it_table INTO wa_table.

clear : wa_adrc.

SELECT SINGLE adrnr FROM vbpa INTO w_adrnr WHERE

vbeln = wa_table-vgbel

AND parvw = 'WE'.

if sy-subrc eq 0.

SELECT single city1 region post_code1 INTO wa_adrc

FROM adrc WHERE

addrnumber = w_adrnr.

if sy-subrc eq 0.

move wa_adrc to wa_table one by one.

endif.

MODIFY TABLE it_table FROM wa_table.

ENDLOOP.

Thanks

Seshu

Re: Help with a select block

former_member194669 — Tue, 28 Aug 2007 15:09:06 GMT

Hi,

For modify the internal table

MODIFY TABLE statement is not needed


LOOP AT it_table INTO wa_table.
    v_tabix = sy-tabix. "<<<<<
    SELECT SINGLE adrnr FROM vbpa INTO w_adrnr WHERE
      vbeln = wa_table-vgbel
      AND parvw = 'WE'.
 
    SELECT city1 region post_code1 INTO CORRESPONDING FIELDS OF wa_table
      FROM adrc WHERE
      addrnumber = w_adrnr.
    ENDSELECT.
 
    MODIFY it_table FROM wa_table index v_tabix. "<< Here you are modify the int.table
  ENDLOOP.

aRs