Exemple : programme client de contrôle des modifications 

L'exemple suivant présente une des structures possibles du programme défini par l'utilisateur qui sera utilisé pour décider du lancement ou non du contrôle des modifications lors de l'exécution du programme d'export.

 

   REPORT ZPCIFP01.

   INCLUDE ZPCIFRX3.       “INCLUDE 3 from export program

   FORM DIFFERENCE_CHECK USING SWITCH.

      SWITCH = `1`.         “change validation is active

      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`. “change validation is not active

            ENDIF.

         ENDIF.

      ENDIF

   ENDFORM.

 

Légende

La routine Form utilise le paramètre SWITCH, qui détermine si la fonction de contrôle des modifications est active.

Cette fonction est active par défaut (SWITCH = 1). Si la zone MASSN de la table Poste de travail/Rémunération de base (WPBP) pour les données d'exportation en cours est différente de celle de la période de comparaison et si la mesure administrative en cours (MASSN) est 05, le contrôle des modifications n'est pas actif.