ADELIA |
|
|
|
|
(I) |
|
|
|
|
Paragraphe d'utilisation
VERIFICATION
Syntaxe
AVERTISSEMENT
Description
Cet ordre est utilisé pour la préparation d'un message d'erreur. Il permet d'envoyer un message d'erreur non bloquant.
La zone précisée derrière la déclaration du message d'erreur est mise en inversion d'image ; cependant le traitement continue de s'effectuer normalement.
La valeur du mot réservé *AVERTISSEMENT est positionnée à 1 pour signaler qu'au moins un AVERTISSEMENT a été détecté dans le pavé de VERIFICATION.
L'inversion d'image et l'envoi du message sont effectifs si la transaction est réaffichée. Ce réaffichage est à la charge du programmeur, par exemple en testant le mot réservé *AVERTISSEMENT à la suite de l'ordre VERIFIER de la transaction.
Important : pour réafficher automatiquement la transaction avec les messages d'erreur, il est préférable d'utiliser ANOMALIE ou ERREUR.
Par exemple
**********************
TRANSACTION 02
**********************
SI *F12
TRAITER 01
FIN
VERIFIER 02 Appel du paragraphe VERIFICATION
SI *AVERTISSEMENT = '1'
TRAITER 02 Réaffiche la transaction 2 s'il y a au moins un avertissement
FIN
VALIDER 02
TRAITER 02
*
**********************
VERIFICATION 02
**********************
APPELER CONTROLE_DATE ZZ_DATE_CDE CODE_RETOUR
SI CODE_RETOUR <> *BLANK
PREPARER_MSG 0024 ZZ_DATE_CDE
AVERTISSEMENT
FIN
SI ZZ_CODE_CLIENT = *BLANK
PREPARER_MSG 0046 ZZ_CODE_CLIENT
AVERTISSEMENT
FIN
Voir aussi la liste des ordres L4G par thème