data:
lv_name(30).
field-symbols:
<lf_mseg> type mseg.
* Name des Programmes und des Feldes
MOVE '(MM07MFL0)MSEG' TO lv_name.
* Feldsymbol zuweisen
ASSIGN (lv_name) TO <lf_mseg>.
IF sy-subrc eq 0.
move lv_meins to <lf_mseg>-erfme.
ENDIF.
* Dann Daten über Feldsymbol lesen oder ändern...
lv_name(30).
field-symbols:
<lf_mseg> type mseg.
* Name des Programmes und des Feldes
MOVE '(MM07MFL0)MSEG' TO lv_name.
* Feldsymbol zuweisen
ASSIGN (lv_name) TO <lf_mseg>.
IF sy-subrc eq 0.
move lv_meins to <lf_mseg>-erfme.
ENDIF.
* Dann Daten über Feldsymbol lesen oder ändern...
Leider kann über diese Methode nur auf global definierte Felder eines Programms zugegriffen werden.