L'agrégation des CRE (EXAEEN)

Cet exit est disponible en COBOL (ITR025) et C.

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

Caractéristiques

Description

L'utilisation de cet exit permet d'enrichir ou de contrôler le contenu des enregistrements de CRE :

  • 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 enregistrement détaillé ou agrégé rencontré dans la vacation.

L'appel à cet exit a toujours lieu avant l'extraction de la trace de l’enregistrement, si une règle d'audit est associée dans les pré-traitements du CRE.

Particularités

Lorsque ces enregistrements sont contrôlés, le CRE courant peut être rejeté
ou la vacation peut être fermée. Les fonctions qui suivent dans la cinématique sont ensuite appliquées aux contenus enrichis des enregistrements de CRE à l'issue de cet exit.

Les données échangées

Cinq points d'entrée sont disponibles :

  • Init : appelé avant la lecture du premier enregistrement de CRE
  • Détail : appelé pour un enregistrement de CRE avant qu'il ne soit agrégé
  • Aggregated : appelé pour un enregistrement de CRE résultant d'une agrégation
  • Non_aggregated : appelé pour un enregistrement de CRE sur lequel aucune agrégation n'a lieu
  • Close : appelé après le traitement du dernier enregistrement de CRE.

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 Utilisation

szSourceCode

Alphanumérique / 25

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

nEntryCode

Numérique / 1

Code du point d'entrée

szIEventCode

Alphanumérique / 25

Nom du type de CRE traité.

szIEventVersion

Alphanumérique / 25

Valeur de référence pour définir la version du CRE traité :

  • date sous forme AAAAMMJJ
  • Nombre à 3 chiffres

cIEventClassVersion

Alphanumérique / 1

Type d'identification de la version du CRE traité :

  • 1 : version définie par numéro
  • 2 : version identifiée par la valeur de la date (ci-dessus)

szInstanceCode

Alphanumérique / 34

Code Instance du CRE traité

nSegmentNumber

Numérique / 4

Numéro de l'enregistrement dans le CRE traité (nième enregistrement)

szSegmentCode

Alphanumérique / 2

Code enregistrement du CRE traité

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)

lAggregEndRuleDate

Alphanumérique / 10

Date de fin de validité de la règle à appliquer (format JJ/MM/AAAA)
(vide si code_entrée = Non_Aggregated)

Segment

Alphanumérique / 4000 max

Contenu de l'enregistrement à enrichir ou à contrôler

nSegmentLenght

Numérique / 4

Longueur de l'enregistrement à enrichir ou à contrôler

 

Données en SORTIE

Nom en C Caractéristiques Utilisation

Segment

Alphanumérique / 4000 max

Contenu de l'enregistrement enrichi et contrôlé.

nSegmentLenght

Numérique / 4

Longueur de l'enregistrement enrichi et contrôlé.

szErrorLabel

Alphanumérique / 200

Libellé de l'erreur (si une erreur système est détectée ou en cas de rejet de CRE)

Valeur de retour

 

  • 0 (EXI_nNOERREUR)
  • 1 (EXI_nREJET) demande de rejet du CRE
  • 9 (EXI_nERREURSYSTEME), si une erreur système est détectée ; dans ce cas, la vacation est arrêtée

Compatibilité avec la version RDJ 1.5.3.2 (ITR025)

Cinq points d'entrée sont disponibles :

  1. À l'initialisation du module et l'ouverture des fichiers
  2. Appelé pour chaque segment avant agrégation, il est utilisé pour enrichir le segment avec le nom de la règle d'agrégation à appliquer, par exemple. Restriction: ce point d’entrée est valide uniquement dans la version 1.5.3 (non utilisé dans la version Rule Engine)
  3. Appelé pour un enregistrement de CRE résultant du traitement d’agrégation
  4. Appelé pour un enregistrement de CRE à agréger avant le traitement d’agrégation des CRE
  5. À 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

L10CRE-1

Alphanumérique / 4000

Contenu de l'enregistrement à enrichir ou à contrôler

L10TYPTRT

9 (1)

Type de traitement à effectuer

L10LGCRE

9 (4)

Longueur de l'enregistrement à enrichir ou à contrôler

 

Données en SORTIE

Nom en COBOL Caractéristiques/Longueur Utilisation

L10CRE-1

Alphanumérique / 4000

Contenu de l'enregistrement enrichi et contrôlé.

L10LGCRE

9 (4)

Longueur de l'enregistrement enrichi et contrôlé.

L10CDRET

9 (2)

Code retour de la fonction :

  • 0 (zéro) fin normale de la fonction
  • 1 : demande de rejet du CRE traité
  • 9 : erreur système (provoque l'arrêt de la vacation)

L10MSG1

Alphanumérique /72

Message d'erreur (si le code retour est différent de zéro)

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 de l'enregistrement de sortie est identique à l'enregistrement d'entrée

4.

Si vous demandez le rejet du CRE (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 CRE est active.

fichier sys.dat

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

 

I_Exit_Aggregation_Ievent

  • Yes_C : Exécuter l’exit EXAEEN
  • Yes_Cobol : Aucun programme COBOL n’existe
  • Yes_rdj53 : Exécute l’exit ITR025.cbl
  • No : Ne pas exécuter l'exit

Nom des modules

Mise en œuvre

Plateforme Répertoire/Nom de bibliothèque Programme C Programme COBOL compatible avec 1.5.3.2

Windows

%RDJ_EXEC%\exit

EXAEENC.c
exidllh.h fichier entête

ITR025.cbl

UNIX

$RDJ_EXEC/exit

EXAEENC.c
exidllh.h fichier entête

ITR025.cbl

MVS

&RDJEXEC..SRCLIB

EXAEENC
exidllh.h fichier entête

ITR025

 

Type de traitement Libellé Point d'entrée

Open

TRT-INIT (typtrt = 1)

EXI_nINIT

Close (Fermeture)

TRT-FIN (typtrt = 9)

EXI_nFERM

Affectation du code règle d'agrégation

TRT-CDREGL (typtrt = 2)

Version 1.5.3 uniquement

 

Traitement d'un enregistrement avant son agrégation

TRT-CTRLDET (typtrt = 4)

EXI_nDETAIL

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

TRT-CTRLCRE (typtrt = 3)

EXI_nAGREGE

Related Links