topic Re: Internal table value access in Application Development and Automation Discussions

Internal table value access

Former Member — Mon, 24 May 2010 22:42:15 GMT

Dear all,

I have a requirement mentioned below.

I have a internal table with columns

ZPER1

ZOPR2

ZOPR3.......TO ZOPR50

I want to concatenate all fields 1 to 50 in string. I want to avoid writting this 50 fields.

Is there any way we can do this?

Regards,

Vinit

Re: Internal table value access

Former Member — Mon, 24 May 2010 23:06:21 GMT

Hi,

DATA: BEGIN OF DATA_TAB,
        ZPER1
...
        ZOPR50
      END OF DATA_TAB.

DATA: W_TEXT(1000) TYPE C.

...fill your fields and:

W_TEXT = DATA_TAB.

Best regards,

Leandro Mengue

Re: Internal table value access

Former Member — Mon, 24 May 2010 23:13:18 GMT

Hi,

Thanks for u r reply.

The problem is I have other fields in my internal table as well other that 1 to 50 which i do not wish to concatenate.

Re: Internal table value access

Former Member — Mon, 24 May 2010 23:15:11 GMT

Hi,

You can use field symbols, like:

DATA: W_TEXT(1000),
      W_IDX TYPE I,
      W_NN(2) TYPE C.

FIELD-SYMBOLS: <FS> TYPE ANY.

W_IDX = 1.
WHILE W_IDX<51.
   W_NN = W_IDX.
   W_XX = 'ZOPER'.
   ASSIGN (W_XX) TO <FS>.
   CONCATENATE W_TEXT <FS> INTO W_TEXT.
   W_IDX = W_IDX + 1.
ENDWHILE.

Best regards,

Leandro Mengue

Re: Internal table value access

Former Member — Mon, 24 May 2010 23:37:32 GMT

Hi,

What is use of W_NN in your code? How I will change ZOPER1 then 2....to 50?

Re: Internal table value access

Former Member — Mon, 24 May 2010 23:38:12 GMT

Hi,

You may use also:

DATA: BEGIN OF DATA_TAB,
        FIELD1
...
        ZOPR1
...
        ZOPR50
      END OF DATA_TAB.
 
DATA: W_TEXT(1000) TYPE C,
      W_POS TYPE I,
      W_TAM TYPE I.
 
...fill your fields and:

DESCRIBE DISTANCE BETWEEN DATA_TAB-FIELD1 AND DATA_TAB-ZOPER1 INTO W_POS IN BYTE MODE.

W_TAM = 50 * 4.   " => adjust 4 to the size of zopr1.
 
W_TEXT = DATA_TAB+W_POS(W_TAM).

Best regards,

Leandro Mengue

Re: Internal table value access

Former Member — Mon, 24 May 2010 23:40:34 GMT

Hi,

Sorry, change this:

W_XX = 'ZOPER'.

CONCATENATE 'ZOPER' W_NN INTO W_XX.

Best regards,

Leandro Mengue

Re: Internal table value access

Former Member — Mon, 24 May 2010 23:41:21 GMT

Really sorry,

Missed out on one point.

I want to concatenate separated by comma.

Re: Internal table value access

Former Member — Mon, 24 May 2010 23:42:33 GMT

Thanks looks like Field symbol shoud work.

Re: Internal table value access

Former Member — Mon, 24 May 2010 23:43:59 GMT

Hi,

No problem:

CONCATENATE W_TEXT <FS> ';' INTO W_TEXT.

Best regards,

Leandro Mengue