ADELIA |
|
|
|
|
(B) |
|
|
|
|
Paragraphe d'utilisation
Fin de paragraphe TRAITEMENT
Syntaxe
FIN_TRAITEMENT
Description
Cet ordre marque la fin d'un paragraphe de traitement qui a débuté par l'un des trois ordres suivants :
Le contrôle est rendu au programme :
Derrière l'ordre qui a déclenché l'appel du paragraphe se terminant par FIN_TRAITEMENT, pour les deux ordres suivants :
TRT_CHANGEMENT, ce paragraphe est appelé par TRAITER_CHG,
TRT_TOTAL, ce paragraphe est appelé par TRAITER_TOTAL.
Pour le paragraphe CHANGEMENT_PAGE, à l'endroit où le programme se trouvait au moment de la détection du dépassement de capacité.
Par exemple
* Batch pour imprimer des commandes par client (rupture sur code client)
LIRE_AVANT COMMANDES
TANT_QUE COMMANDES EXISTE
TRAITER_CHG RPT_CLIENTS
MONTANT_CLIENT = MONTANT_CLIENT + MONTANT_LIGNE
IMPRIMER FMT_COMM
LIRE_AVANT COMMANDES
TRAITER_TOTAL RPT_CLIENTS
REFAIRE
* Procédure en-tête
*
TRT_CHANGEMENT RPT_CLIENTS
LIRE CLIENTS
IMPRIMER FMT_CLIENT
MONTANT_CLIENT = 0
FIN_TRAITEMENT
* Procédure total
*
TRT_TOTAL RPT_CLIENTS
EDITER FMT_TOTCLI
FIN_TRAITEMENT
* Changement de page (Overflow)
*
CHANGEMENT_PAGE
EDITER FMT_CLIENT
FIN_TRAITEMENT