STOP

Syntaxe

Paramètres

Description

Cette instruction permet de suspendre temporairement ou en permanence l'exécution d'un objet du programme.

Remarques

• L'instruction STOP RUN marque généralement la fin d'un programme principal COBOL. Elle interrompt l'exécution du programme de manière définitive et rend le contrôle au système d'exploitation ou à l'appelant externe. C'est donc une instruction essentielle pour signaler la terminaison normale du traitement.
• Le paramètre RUN dans STOP RUN indique que le programme s'arrête sans ambiguïté, quelle que soit sa structure. Cela diffère de EXIT PROGRAM qui, lui, permet de retourner à un programme appelant dans une structure modulaire. STOP RUN est donc à éviter dans les sous-programmes, car il met fin à l'ensemble de l'application.
• L'usage de STOP literal est moins fréquent, mais il permet une sortie informative. En affichant un message ou un code numérique avant l'arrêt, cette variante est utile dans des contextes de test, de diagnostic ou de gestion d'erreur où un retour explicite à l'utilisateur ou au développeur est nécessaire.
• Le paramètre literal peut être une chaîne alphanumérique ou un nombre, selon ce que l'on souhaite afficher au moment de l'arrêt. Par exemple, STOP "Erreur critique détectée" permet d'alerter l'utilisateur sans passer par un écran ou une instruction DISPLAY. Toutefois, son comportement dépend du compilateur COBOL utilisé.
• Selon les implémentations COBOL, STOP literal peut ne pas être interprété de la même manière. Certains compilateurs l'acceptent et l'affichent sur la sortie standard, d'autres génèrent une erreur si ce format n'est pas reconnu. Il est donc important de vérifier la compatibilité avant usage.
• STOP RUN ne retourne pas forcément un code d'état à l'environnement hôte, contrairement à certains langages modernes. Pour obtenir un retour exploitable dans un script ou un système externe, il faut utiliser d'autres mécanismes comme le paramétrage de codes retour spécifiques selon les plateformes.
• L'instruction STOP ne suspend pas réellement l'exécution "temporairement", comme le suggère parfois une mauvaise interprétation. Elle interrompt l'exécution de façon immédiate et irréversible dans le contexte d'un programme COBOL. Ce n'est pas une instruction de pause, mais bien d'arrêt.
• L'utilisation de STOP dans des sections de traitement intermédiaires peut créer des interruptions brutales du programme. Cela peut être utile en phase de développement ou de test pour bloquer l'exécution à un moment précis, mais doit être évité en production où des instructions de retour contrôlé comme EXIT sont préférables.