WHEN-COMPILED

Syntaxe

Description

Cette fonction permet de demander la date et l'heure de la compilation du programme COBOL.

Remarques

• La fonction WHEN-COMPILED est très utile pour des raisons de traçabilité dans les environnements de production. Elle permet d'afficher ou de consigner la date et l'heure exactes de la compilation du programme, ce qui peut aider à identifier la version du code exécuté.
• Cette fonction est souvent utilisée dans les entêtes de rapports ou les journaux d'exécution pour indiquer quand le binaire a été généré. Cela facilite le diagnostic en cas de problème, en confirmant si le programme a bien été recompilé après une mise à jour du code source.
• WHEN-COMPILED est une fonction littérale, ce qui signifie qu'elle renvoie une chaîne de caractères fixe au moment de la compilation. Elle ne change pas dynamiquement à l'exécution, ce qui garantit que les informations qu'elle fournit sont fiables pour valider l'origine de l'exécutable.
• La date et l'heure retournées par WHEN-COMPILED suivent généralement un format standard propre au compilateur COBOL utilisé. Par exemple, certains affichent le format YYYYMMDDHHMMSS, mais cela peut varier légèrement selon l'environnement (Mainframe, Micro Focus,...).
• Dans un contexte de développement collaboratif ou d'intégration continue, cette fonction permet de vérifier si le code exécuté correspond bien à la dernière version publiée. Cela peut être crucial pour la gestion de versions dans les systèmes critiques.
• Elle peut être combinée avec l'instruction DISPLAY pour l'afficher à l'écran ou dans un fichier de journal de bord, ce qui est souvent fait dans les sections INIT ou START du programme. Cela ne nécessite aucune variable intermédiaire, rendant son usage simple et direct.
• Il ne faut pas confondre WHEN-COMPILED avec des fonctions temporelles dynamiques comme CURRENT-DATE. La première est figée à la compilation, alors que la seconde reflète la date et l'heure réelles au moment de l'exécution.
• L'usage de WHEN-COMPILED est parfois imposé dans les normes de codage internes pour garantir la conformité et la documentation des livrables. Elle devient ainsi un outil de contrôle de qualité intégré automatiquement dans les programmes COBOL.