Agrégation des ME (EXAEME)

Restriction : Cet exit n’est disponible qu’en mode fichier et en C.

Caractéristiques

Description

L'utilisation de cet exit permet d'enrichir et de contrôler les ME :

  • Avant leur agrégation
  • Après leur agrégation
  • Lors de leur passage dans la fonction d'agrégation, pour ceux qui ne doivent pas être agrégés.

Principe de fonctionnement

L'exit est appelé pour chaque ME détaillé ou agrégé, rencontré dans la vacation.

Cet exit est toujours appelé avant d’extraire la trace du ME, si une règle d’audit est associée au destinataire du ME.

Cet exit peut être appelé à 2 endroits dans la cinématique du traitement :

  • Pendant l’agrégation à l’étape T (agrégation des ME par lot)
  • Pendant l’agrégation à l’étape S (agrégation des ME tous lots confondus)

Particularités

Le contrôle d'un ME peut donner lieu :

  • Au rejet du (ou des) CRE à l'origine du ME, dans le cas d'une agrégation dans l'étape T
  • À l'arrêt de la vacation, dans le cas d'une agrégation dans l'étape S.

Les données échangées

Cinq points d'entrée sont disponibles dans cet exit :

  • Init : est appelé avant la lecture du premier ME
  • Détail : porte sur un ME avant qu'il ne soit agrégé
  • Aggregated : porte sur un ME résultant d'une agrégation
  • Non_Aggregated : porte sur un ME sur lequel aucune agrégation ne doit avoir lieu
  • Close : est appelé après le traitement du dernier ME.

Certains champs alphanumériques peuvent avoir différentes descriptions selon le langage de programmation et le format utilisé (Latin ou UTF-16). Pour plus d’information, reportez-vous à Gérer les Exits et les appels externes.

Données en ENTRÉE

Nom en C Caractéristiques/Longueur Utilisation

szSoureceCode

Alphanumérique / 25

Code émetteur associé à la vacation (seule donnée disponible à l'initialisation)

nEntryCode

Numérique / 1

Code du point d'entrée

szRulesAppliDate

Alphanumérique / 10

Date d'application des règles sous la forme JJ/MM/AAAA

szAggregRuleCode

Alphanumérique / 25

Nom de la règle d'agrégation à appliquer (vide pour code_entrée = Non_Aggregated)

IAgregStartRuleDate

Long / 10

Date de début de validité (dans le format JJ/MM/AAAA) de la règle d'agrégation à appliquer (vide pour code_entrée = Non_Agrégé)

IAgregEndRuleDate

Long / 10

Date de fin de validité (dans le format JJ/MM/AAAA) de la règle d'agrégation à appliquer (vide pour code_entrée = Non_Aggregated)

szOsegtFormatCode

Alphanumérique / 3

Nom du format du ME

szOsegtOutputCode

Alphanumérique / 25

Nom du destinataire associé au ME à traiter

sOsegtContaining

Alphanumérique / 4000 max

Contenu du ME à enrichir ou à contrôler

nOSegtLght

Numérique

Longueur du ME à enrichir ou à contrôler

Données en SORTIE

Nom en C Caractéristiques Utilisation

sOsegtContaining

Alphanumérique / 4000 max

Contenu du ME enrichi et contrôlé

nLgMe

Numérique / 4

Longueur du ME enrichi et contrôlé

 

 

 

szErrorLabel

Alphanumérique / 200

Libellé de l'erreur (si arrêt de la vacation ou rejet de CRE)

Valeur de retour

 

  • 0: zero (EXI_nNOERREUR)
  • 1 : (EXI_nREJET) demande de rejet du lot de CRE quand l’agrégation a lieu à l’étape T et arrêt de la vacation quand l’agrégation a lieu à l’étape S
  • 9 : (EXI_nERREURSYSTEME), si une erreur système est survenue, la vacation est fermée

Compatibilité avec la version RDJ 1.5.3.2 (ITR615)

Cinq points d'entrée sont disponibles dans ITR615 :

  • 1 : initialise le module et ouvre les fichiers
  • 2 : traite un ME qui ne doit pas être agrégé
  • 3 : traite un ME avant qu'il ne soit agrégé
  • 4 : traite un ME résultant d'une agrégation
  • 9 : À la fermeture des fichiers.

Certains champs alphanumériques peuvent avoir différentes descriptions selon le langage de programmation et le format utilisé (Latin ou UTF-16). Pour plus d’information, reportez-vous à Gérer les Exits et les appels externes.

Données en ENTRÉE

Nom en COBOL Caractéristiques/Longueur Utilisation

LLTYPTRT

9 (1)

Code indiquant le type de traitement effectué

LLEE

Alphanumérique (4000)

Contenu du ME à enrichir ou à contrôler

LLLGEE

9 (4)

Longueur du ME à enrichir ou à contrôler

LLCDEE

Alphanumérique (3)

Code format du ME à enrichir ou à contrôler

LLLIGNE

Alphanumérique (132)

Zone à reformater pour l’édition agrégation comptable, de la position 47 sur 62 caractères, typtrt = 5

LLNBDECIM

Alphanumérique (1)

Nombre de décimales entre 0 et 9 (défaut=0) pour l’affichage des montants de l’édition du détail de l’agrégation comptable

LLCDMODIF

Alphanumérique (1)

Code modification

Données en SORTIE

Nom en COBOL Caractéristiques/Longueur Utilisation

LLRETOUR

9 (1)

Code retour de la fonction :

  • 0 (zéro) fin normale de la fonction
  • 1 : vacation arrêtée

LLEE

Alphanumérique (4000)

Contenu du ME enrichi et contrôlé

LLLGEE

9 (4)

Longueur du ME enrichi et contrôlé

LLCDEE

Alphanumérique (3)

Code format du ME à enrichir ou à contrôler

LLLIGNE

Alphanumérique (132)

Zone à reformater pour l’édition agrégation comptable, de la position 47 sur 62 caractères, typtrt = 5

LLNBDECIM

Alphanumérique (1)

Nombre de décimales entre 0 et 9 (défaut=0) pour l’affichage des montants de l’édition du détail de l’agrégation comptable

LLCDMODIF

Alphanumérique (1)

Code modification

Note   avant d’associer cet exit à une nouvelle vacation de traduction, il est intéressant de revoir le contenu de la version précédente de ITR615. Ceci, afin de vérifier si certaines actions ne peuvent pas être remplacées par des fonctions intrinsèques du produit ou déplacées vers d'autres exits.

Deux des actions les plus courantes en version RDJ 1.5.3.2. sont :

  • Le report des valeurs des champs techniques d'agrégation de ME dans les zones fonctionnelles du ME peut être annulé
    Il est maintenant possible d'associer plusieurs règles d'agrégation aux ME ; ces règles sont multi-critères.
  • La troncature des entêtes techniques de ME peut être déplacée dans l'exit de restructuration des ME.

Mise en œuvre

Conventions d’écriture

  Description

1.

Les identifiants renseignés dans la zone de communication ne peuvent pas être modifiés.
Si les valeurs sont modifiées, elles ne sont pas prises en compte dans l'exécution de la vacation

2.

Par défaut, le code retour est à 0 (zéro)

3.

Par défaut, le contenu du ME est identique à celui du CRE

4.

Si vous demandez le rejet du CRE source (code retour = 1) ou si une erreur de programme survient, vous devez renseigner la zone qui contient le libellé d'erreur

Paramétrage

L'exit ne peut être activé que si l'agrégation des ME est active.

script.ges

Mot-clé Description/Valeur à définir
Section >Configuration<

 

Edition_Agreg_Comptable

  • Oui [exit615] : exécute l’exit ITR615 en langage COBOL, pour l’édition du détail de l’agrégation comptable

sys.dat

Mot-clé Description/Valeur à définir
Section >ScriptConfiguration<

 

P_Exit_Aggregation_OSegt_Group

L'exit est activé dans l'étape T

  • Yes_C : active l’exit EXAEME en langage C
  • Yes_Cobol : Aucun programme COBOL n’existe
  • Yes_rdj53 : exécute l’exit ITR615 en COBOL, compatible avec RDJ 1.5.3.2
  • No : ne pas exécuter l'exit

O_Exit_Aggregation_OSegt

(l'exit est activé dans l'étape S)

  • Oui_C active l’exit EXAEME en langage C
  • Yes_Cobol : Aucun programme COBOL n’existe
  • Yes _rdj53 : exécute l’exit ITR615 en COBOL, compatible avec RDJ 1.5.3.2
  • No : ne pas exécuter l'exit

Nom des modules

Mise en œuvre

Plateforme Nom du répertoire Programme C Programme COBOL compatible
avec 1.5.3.2

Windows

%RDJ_EXEC%\exit

EXAEMEC.c
exidllh.h fichier entête

ITR615.cbl

UNIX

$RDJ_EXEC/exit

EXAEMEC.c
exidllh.h fichier entête

ITR615.cbl

MVS

&RDJEXEC..SRCLIB

EXAEMEC
exidllh.h fichier entête

ITR615

 

Type de traitement Libellé Point d'entrée

Open

OUV-MODULE (typtrt = 1)

EXI_nINIT

Close (Fermeture)

FERM-MODULE (typtrt = 9)

EXI_nFERM

Traitement de ME sans agrégation.

TRT-ECR-SS-EDI (typtrt = 2)

EXI_nNON_AGREGE

Traitement de ME avant agrégation.

TRT-ECR-SS-EDI (typtrt = 3)

EXI_nDETAIL

Traitement d'un ME résultant d'une agrégation

TRT-ECR-SS-EDI (typtrt = 4)

EXI_nAGREGE

Related Links