SAP Note 23420 - ABAP error in SAPLM61W usg. correction factor

Symptom:

ABAP error in line 592 of SAPMM61W

Cause and prerequisites

programming error

Solution
Following corrections in MM61WF00 have to be applied:

line 588 ff.:

LOOP AT VERGWERTE_FB.
READ TABLE PROG_VERB INDEX SY-TABIX.
* Andreas Steiner: Falls kein Korrekurwert => kein MODIFY "new line
IF SY-SUBRC = 0. "new line
MOVE PROG_VERB-KOPRW TO VERGWERTE_FB-WERT.
MOVE PROG_VERB-KORFK TO VERGWERTE_FB-KORFK.
MODIFY VERGWERTE_FB INDEX SY-TABIX.
ENDIF. "new line
ENDLOOP.
ENDIF.
* Steffen Theobald: Uebergabe wegen fixierter Werte sowie Saisonindices.
* Übergabe Expostprognosewerte daher nicht notwendig
* 14.12.93 unter Anleitung von Albrecht Diener umgestellt
CLEAR PD_ZAEHL1.
CLEAR PD_ZAEHL2.
LOOP AT PROGWERTE WHERE
EFLAG = 'X'.


line 777 ff.:

* Um die Korrekturfaktoren bereinigten Werte in die Tabelle PROGWERTE
* zurückschreiben
LOOP AT PROGWERTE.
READ TABLE PROG_VERB INDEX SY-TABIX.
* Andreas Steiner: keine Korrekturwerte => kein MODIFY "new line
IF SY-SUBRC = 0. "new line
MOVE PROG_VERB-KOPRW TO PROGWERTE-KOPRW.
MOVE PROG_VERB-KORFK TO PROGWERTE-KORFK.
* Korrekturfaktoren rücksetzen wenn Prognosewert 0 ?
MODIFY PROGWERTE INDEX SY-TABIX.
ENDIF. "new line
ENDLOOP.
ENDIF.
* Die fixierten Werte aus RETT_PROGWERTE in PROGWERTE übertragen
LOOP AT RETT_PROGWERTE.
IF RETT_PROGWERTE-FIXKZ NE SPACE.
LOOP AT PROGWERTE WHERE ERTAG = RETT_PROGWERTE-ERTAG. MOVE RETT_PROGWERTE-KOPRW TO PROGWERTE-KOPRW.
MOVE RETT_PROGWERTE-FIXKZ TO PROGWERTE-FIXKZ.
MODIFY PROGWERTE INDEX SY-TABIX.
ENDLOOP.