Creacion dinamica de variables....
PARAMETERS:
tab_name TYPE tname default 'YJTTEST', "Table name
tab_comp TYPE tfieldname default 'PSPNR', "Field name
line_num TYPE i DEFAULT 10. "Line number
FIELD-SYMBOLS:
TYPE ANY,
TYPE ANY.
DATA:
wa_ref TYPE REF TO DATA.
CREATE DATA wa_ref TYPE (tab_name). "Suitable work area
ASSIGN wa_ref->* TO.
SELECT * FROM (tab_name) INTO.
CHECK SY-DBCNT < line_num.
ASSIGN COMPONENT tab_comp OF STRUCTURE TO .
WRITE: / tab_comp , .
ENDSELECT.
tab_name TYPE tname default 'YJTTEST', "Table name
tab_comp TYPE tfieldname default 'PSPNR', "Field name
line_num TYPE i DEFAULT 10. "Line number
FIELD-SYMBOLS:
DATA:
wa_ref TYPE REF TO DATA.
CREATE DATA wa_ref TYPE (tab_name). "Suitable work area
ASSIGN wa_ref->* TO
SELECT * FROM (tab_name) INTO
CHECK SY-DBCNT < line_num.
ASSIGN COMPONENT tab_comp OF STRUCTURE
WRITE: / tab_comp ,
ENDSELECT.