ich habe Probleme den Inhalt eines Feldsymbols auf
eine Variable zurückzukopieren:
FIELD-SYMBOLS: <HS> TYPE ANY.
FIELD-SYMBOLS: <GS> TYPE DDO3l-fieldname
DATA: WA_FIELDNAME LIKE DD03L-FIELDNAME.
DATA: IT_FIELDNAME LIKE DD03L-FIELDNAME OCCURS 0.
***Ermitteln der Felder von SPFLI********
SELECT FIELDNAME FROM DD03L INTO WA_FIELDNAME
WHERE TABNAME = spfli.
APPEND WA_FIELDNAME TO IT_FIELDNAME.
ENDSELECT.
*********Zuweisen der Komponente wa_fieldname
*********z.B. CONNID usw.
Do.
CLEAR WA_FIELDNAME.
READ TABLE IT_FIELDNAME INTO WA_FIELDNAME INDEX
SY-INDEX.
IF SY-SUBRC = 0.
ASSIGN WA_FIELDNAME TO <GS>.
*******Struktur <tab_WA> enthält eine gefüllte Zeile
der Tabelle spfli.
ASSIGN COMPONENT <GS> OF STRUCTURE <TAB_WA> TO <HS>.
******Im Anschluss soll das Feld z.B CONNID
und der dazugehörige Wert in die Feldleiste
WA_ZSE16N_CD_DATA eingetragen werden.Dann erfolgt ein
Insert auf die Datenbanktabelle.
Mein Problem: Bei MOVE <HS> TO
WA_ZSE16N_CD_DATA-NEW_VALUE*******
werden einige werte nicht kopiert, z.B der Wert
für das Feld DISTANCE der Tablle SPFLI oder FLTIME.
***************************************************
Move <GS> TO WA_ZSE16N_CD_DATA-FIELD. MOVE <HS> TO wA_ZSE16N_CD_DATA-NEW_VALUE.
APPEND WA_ZSE16N_CD_DATA.
ELSE.
EXIT.
ENDIF.
ENDDO.
INSERT ZSE16N_CD_DATA FROM TABLE WA_ZSE16N_CD_DATA.