Voici un exemple de source cobol

000001*********************************
000004*   commentaires    *
000005*********************************
000006 IDENTIFICATION DIVISION.
000007 PROGRAM-ID.
000008                NOMPRG.
000011 DATE-COMPILED.
000012*
000023 ENVIRONMENT DIVISION.
000024 CONFIGURATION SECTION.
000025 SOURCE-COMPUTER. MFCOBOL.
000026 OBJECT-COMPUTER. MFCOBOL.
000027 SPECIAL-NAMES.
000028                   DECIMAL-POINT IS COMMA
000029                SYSOUT IS SYS.

Déclaration des pictures d'éditions

La chaîne de caractères d'une telle donée est limitée à certaines combinaisons des 14 symboles suivants:

* B / V Z 0 9 , . + - * CR DB $ Une picture d'édition permet d'éviter de trainer des zéro inutiles dans les calculs juste avant d'imprimer.

Le symbole 9 correspond aux caractères numériques. Le symbole Z retire les zéro inutiles. Le symbole $ retire les zéro non significatifs sauf le dernier zéro remplacer par $. Le symbole - retire les zéro non significatifs sauf le dernier zéro remplacer par -. Le symbole + retire les zéro non significatifs sauf le dernier zéro remplacer par +. Le symbole * remplace les zéro non significatifs par *. Le symbole B permet l'insertion d'un blanc ou espace. Le symbole 0 permet l'insertion d'un zéro. Le symbole / permet l'insertion d'un slash. Le symbole V correspond à la virgule dans la zone émettrice. Le symbole . correspond à la virgule dans la zone réceptrice. Le symbole , représente la position où une virgule sera insérée.

http://fr.wikibooks.org/wiki/Cobol_ANS_74