UPON |
Sur |
|---|---|
| Cobol | |
Syntaxe
|
DISPLAY identifier UPON environmentname [[WITH] NO ADVANCING] |
Paramètres
| Nom | Description |
|---|---|
| DISPLAY identifier | Ce paramètre permet d'afficher la valeur contenue dans identifier, généralement une variable alphanumérique. |
| environmentname | Ce paramètre permet d'indiquer l'environnement ou le périphérique de sortie sur lequel l'information doit être affichée. Par exemple, UPON CONSOLE affiche à l'écran, UPON PRINTER envoie vers une imprimante. |
| WITH NO ADVANCING | Ce paramètre précise que l'affichage ne doit pas provoquer de saut de ligne après l'écriture. Cela permet d'écrire plusieurs informations successivement sur la même ligne. |
| NO ADVANCING | Ce paramètre est équivalent à WITH NO ADVANCING et peut être utilisé seul ; il supprime l'avancement automatique du curseur après l'affichage. |
Description
Cette instruction permet d'indiquer sur quel environnement les informations doivent être sortie.
Remarques
- Le mot clef UPON permet de diriger dynamiquement la sortie de l'instruction DISPLAY vers un environnement spécifique, comme la console ou une imprimante. Cela rend le programme plus flexible, car on peut adapter la sortie selon le contexte d'exécution, sans devoir modifier toute la logique d'affichage.
- L'environnement nommé après UPON, tel que CONSOLE, SYSOUT, ou PRINTER, détermine le canal de communication utilisé pour afficher les données. Cette spécification explicite est utile dans les systèmes où plusieurs types de sorties sont disponibles et que l'on souhaite en cibler un précisément.
- L'usage de DISPLAY sans UPON redirige par défaut l'affichage vers la console standard. Cependant, en environnement mainframe ou dans des systèmes multi-périphériques, omettre UPON peut provoquer un comportement non déterministe ou dépendant des réglages système.
- Le paramètre WITH NO ADVANCING permet de contrôler finement la mise en page en empêchant le saut de ligne automatique. Cette option est précieuse lorsqu'on veut afficher plusieurs informations successives sur une même ligne, comme dans un tableau ou une interface interactive rudimentaire.
- L'option NO ADVANCING peut être utilisée seule ou précédée du mot-clé WITH, les deux formulations étant valides. Cette souplesse dans la syntaxe permet une certaine liberté d'écriture, bien que l'usage de WITH améliore souvent la lisibilité du code.
- L'instruction DISPLAY combinée à UPON peut également être utilisée pour des journaux ou des fichiers de journal de bord, selon les environnements disponibles. Par exemple, afficher un message d'erreur directement sur un fichier de journal de bord est possible en définissant un environnement de sortie adapté.
- Dans un contexte de débogage, l'ajout de UPON CONSOLE dans des instructions DISPLAY permet de s'assurer que les messages apparaissent immédiatement à l'écran, indépendamment d'autres redirections système. Cela facilite le suivi de l'exécution et le diagnostic d'erreurs dans les programmes COBOL.
- Même si l'instruction DISPLAY est relativement simple, son association avec UPON et NO ADVANCING montre que COBOL offre un certain degré de contrôle sur la sortie texte. Cela est particulièrement important dans les systèmes anciens, où la gestion fine de la sortie était cruciale pour la lisibilité des états imprimés ou des journaux.
Dernière mise à jour : Jeudi, le 28 juillet 2011