QUITTER : Quitter Bloc

BUT

Ce mot clé correspond à l’instruction LEAVE de Progress : Quitter Bloc. Le bloc dans lequel se trouve le QUITTER BLOC est quitté sans exécution d’aucune des commandes se trouvant dans le bloc.

SYNTAXE

QUITTER

EXEMPLE

VLO.Iteration = NB-MOT( SEPARATEUR= CLO."#" , CHAINE=VLO.Chaine)

BOUCLE VLO.Bouclage DE CLO.1 A VLO.Iteration :

SI VLO.Bouclage >= 55

QUITTER

FIN_BLOC

CREATION Liste LST.LigneCommande :

PRENDRE LigneCommande NomFichier = WFFicContenu.NomFichier

FIN_BLOC

Si la variable Bouclage est inférieure à 55, la création de la liste LigneCommande sera effectuée. Sinon, le bloc sera quitté sans création de la liste.