How to access the value of a field of a field symbol.

Question

Hello All,
i need to access the value of a field in a field symbol. But when i am trying to get the value like <FS>-POSNR, it's showing that that the <FS> has no structure.
In my program, the field itself that i need to check should be dynamic. ie i'll get the field in a variable and i need to find the value of that field.
Am pasting my code below, please tell me what needs to be done.
here in my sample code i am moving the entry of the <FS> into a work area structure. But in my actual program, i gets the structure as a parameter. So is there any way i can declare a work area dynamically...
FUNCTION z_39181_dyn_fs_60758.
""Local interface:
*"  IMPORTING
*"     REFERENCE(PARAMETER) TYPE  VBELN
*"  TABLES
*"      DATA_TAB
  BREAK-POINT.
  FIELD-SYMBOLS <fs> TYPE ANY.
  FIELD-SYMBOLS <fs1> TYPE ANY.
  FIELD-SYMBOLS <fstab> TYPE ANY TABLE.
  DATA name(5) VALUE 'POSNR'.
  FIELD-SYMBOLS <f> TYPE ANY.
  DATA: dref TYPE REF TO data,
        dref1 TYPE REF TO data,
        dref2 TYPE REF TO data.
  DATA: lv_lips TYPE string.
  DATA: lv_lipsfld TYPE string,
            lv_fld TYPE string,
            lw_lips TYPE lips.
            lv_lips = 'LIPS'.
            lv_fld = 'LW_lips-POSNR'.
  CREATE DATA dref1 TYPE (lv_lips).
  CREATE DATA dref TYPE STANDARD TABLE OF (lv_lips).
  CREATE DATA dref2 LIKE LINE OF data_tab.
  ASSIGN dref->* TO <fstab>.
  ASSIGN dref1->* TO <fs>.
assign dref2->* to <fs
  <fstab> = data_tab[].
  LOOP AT <fstab> INTO <fs>.
    lw_lips = <fs>.
    WRITE lw_lips-vbeln.
    ASSIGN (lv_fld) TO <fs1>.
   write <fs>
  ENDLOOP.
Helpful answers will be rewarded...

Answer 1

Use syntax
ASSIGN COMPONENT name OF STRUCTURE struc TO <fs>.