Code: Alles auswählen.
LOOP AT ITAB.
Refresh MYKNA1.
Clear MYKNA1.
Select * From KNA1
Into Table MYKNA1
Where KUNNR = ITAB1-MY_IN_NR1.
If SY-SUBRC = 0.
Loop At MYKNA1.
MYKNA1-ZCRMNR = ITAB1-MY_IN_ZCRMNR.
Update KNA1 From MYKNA1.
Endloop.
ENDIF.
ENDLOOP.
Code: Alles auswählen.
UPDATE kna1 SET zcrmnr = itab1-my_in_zcrmnr
WHERE kunnr = itab1-my_in_nr1.
Folgende Benutzer bedankten sich beim Autor black_adept für den Beitrag:
km216