ADELIA |
|
|
|
|
(I/B) |
|
|
|
|
Attention : cet ordre n'est compatible qu'avec la version d'Adélia générant du RPG ou du C.
Paragraphe d'utilisation
TRANSACTION, INIT_PGM
Syntaxe
TERMINER
Description
Contexte interactif
Cet ordre entraîne l'arrêt de la transaction en cours.
Si la transaction a été appelée par l'ordre TRAITER utilisé dans un paragraphe TRANSACTION, cet ordre entraîne l'arrêt du programme en cours avec libération de ses ressources et retour au programme appelant.
Si la transaction a été appelée par l'ordre TRAITER en dehors d'un paragraphe TRANSACTION (en début de programme), cet ordre rend la main au programme juste après l'ordre TRAITER.
Si la transaction a été appelée par l'ordre EXECUTER, cet ordre rend la main à la transaction appelante juste après l'ordre EXECUTER.
Si l'ordre est placé dans la section INIT du programme, il entraîne l'arrêt du programme en cours avec libération des ressources et le retour au programme appelant.
Contexte batch
Cet ordre entraîne l'arrêt du programme en cours avec libération de ses ressources et retour au programme appelant ; voir la notion d'indicateur de fin de programme LR du RPG.
Important : en génération RPG et dans le cas où l'option de fin de programme RT a été prise au niveau de la génération, l'ordre TERMINER a le même effet que l'ordre RETOURNER.
Par exemple
TRAITER 01
**********************
TRANSACTION 01
**********************
SI *F03
TERMINER |
Fin de programme |
FIN
VERIFIER 01 Exécute VERIFICATION 01
INITIALISER 01
TRAITER 01
**********************
TRANSACTION 02 Début de transaction 2
**********************
SI *F12
TERMINER |
Retourne après ligne EXECUTER 02 |
FIN
TRAITER 02
**********************
VERIFICATION 01
**********************
GESTION_SFL 1
SI ZW_OPTION = '1'
INITIALISER 02 |
Exécute INITIALISATION 02 |
EXECUTER 02 |
Traite la TRANSACTION 02 |
FIN
OPTION = *BLANK
FIN_GESTION_SFL
Voir aussi la liste des ordres L4G par thème