Select from a dynamically chosen table

Question

Hi everyone,
I'm willing to retrieve information stored in a given column of a given table, both generated dynamically. Thus, I have a string S1 with the table name and a string S2 with a column name of this table.
My aim would be to do something like that :
+select single * into corresponding fields of X
from (S1)
where Y = 'SomeValue'.+
X being like a line of the table (S1)
Y being the column name stored in S2.
But for this, I need to fine a correct way to define X and Y from S1 and S2, which I failed to do until now. My first idea was to use field-symbols but it didn't help me. It might be quite easy or maybe impossible, I don't even know as my knowledge in ABAP is far from being excellent, but any reply would be welcome.
Best regards,
François

Answer 1

Hi,
if you only want to select only the given column(s)
(here 'BUTXT') use the 2nd alternative:
REPORT  YMI_SG_NACHWEIS_A NO STANDARD PAGE HEADING.
FIELD-SYMBOLS:
<t001>, <fs>.
DATA:
lr_t001 TYPE REF TO data.
CONSTANTS:
s1(30) VALUE 'T001',
s2(30) VALUE 'BUKRS',
s3(30) VALUE 'BUTXT'.
DATA:
lt_where(72) OCCURS 0 WITH HEADER LINE,
lt_field(72) OCCURS 0 WITH HEADER LINE.
append s3 to lt_field.
CREATE DATA lr_t001 TYPE (s1).
ASSIGN lr_t001->* TO <t001>.
ASSIGN (s1) TO <fs>.
CONCATENATE s2 '=' '3000' INTO lt_where SEPARATED BY space.
APPEND lt_where.
SELECT *
INTO <t001>
FROM (s1)
WHERE (lt_where).
  ASSIGN COMPONENT s3 OF STRUCTURE <t001> TO <fs>.
  WRITE: / s3, ': ', <fs>.
ENDSELECT.
*2nd alternative
skip 2.
write:/'2nd'.
uline.
select (lt_field) into corresponding fields of <t001>
FROM (s1)
WHERE (lt_where).
  ASSIGN COMPONENT s3 OF STRUCTURE <t001> TO <fs>.
  WRITE: / s3, ': ', <fs>.
ENDSELECT.
grx
Andreas