Beispiel: Benutzerdefiniertes Programm für die Änderungsprüfung
Das folgende Beispiel zeigt, wir Ihr kundeneigenes Programm aussehen könnte, um über die Aktivierung der Änderungsprüfung zur Laufzeit des Exportprogramms zu entscheiden.
REPORT ZPCIFP01.
INCLUDE ZPCIFRX3. "ist INCLUDE 3 aus dem Exportprogramm
FORM DIFFERENCE_CHECK USING SWITCH.
SWITCH = `1`. "Änderungsprüfung aktiv
READ TABLE NEW_WPBP INDEX 1.
IF SY-SUBRC = 0.
READ TABLE OLD_WPBP INDEX 1.
IF SY-SUBRC = 0.
IF ( NEW_WPBP-MASSN <> OLD_WPBP-MASSN) AND
( NEW_WPBP-MASSN = `05`).
SWITCH = `0`. "Änderungsprüfung deaktiv
ENDIF.
ENDIF.
ENDIF
ENDFORM.
Erklärung
Die Form-Routine benutzt den Parameter SWITCH, der über die Aktivierung der Änderungsprüfung entscheidet.
In der Standardeinstellung ist die Änderungsprüfung aktiv (SWITCH = 1). Unterscheidet sich das Feld MASSN in der Tabelle Arbeitsplatz/Basisbezüge (WPBP) für die aktuellen Exportdaten von der Vergleichsperiode und ist die aktuelle Maßnahme `05`, wird die Änderungsprüfung deaktiviert.