Débuter avec cobol

Bonjour le monde

HELLO * HISTORIC EXAMPLE OF HELLO WORLD IN COBOL
       IDENTIFICATION DIVISION.
       PROGRAM-ID. HELLO.
       PROCEDURE DIVISION.
           DISPLAY "HELLO, WORLD".
           STOP RUN.

L’époque de la disposition des cartes perforées et des entrées en majuscules uniquement est loin derrière. Pourtant, la plupart des implémentations COBOL gèrent toujours la même disposition de code. Même les implémentations actuelles suivent la même chose (souvent même en majuscules) compilées et en production.

Une implémentation moderne bien formatée pourrait ressembler à :

*> Hello, world
identification division.
program-id. hello.

procedure division.
display "Hello, world"
goback.
end program hello.

Avec certaines implémentations de COBOL, cela peut être raccourci à :

display "Hello, world".

Ce format nécessite généralement des commutateurs de temps de compilation pour mettre un compilateur COBOL dans un mode de syntaxe relâché, car certaines des instructions DIVISION normalement obligatoires sont manquantes.

COBOL suppose des sources au format FIXED par défaut, même dans la spécification actuelle.

COBOL antérieur à 2002

Colonne Zone
1-6 Zone de numéro de séquence
7 Zone d’indicateur
8-12 Zone A
12-72 Zone B
73-80 Zone du nom du programme

Les éditeurs de texte IBM mainframe sont toujours configurés pour ce formulaire dans certains cas.

Après 2002 et dans COBOL 2014, les zones A et B ont été fusionnées et étendues à la colonne 255, et la zone du nom du programme a été supprimée.

Colonne Zone
1-6 Zone de numéro de séquence
7 Zone d’indicateur
8- Zone de texte du programme

La colonne 8 via une colonne définie par l’implémentation * Margin R *, est généralement toujours limitée à la colonne 72, mais autorisée par la spécification à s’exécuter jusqu’à la colonne 255.

COBOL 2002 a introduit le texte source “FORMAT FREE”. Il n’y a pas de zone de numéro de séquence, pas de zone d’indicateur, et les lignes source peuvent avoir n’importe quelle longueur (jusqu’à une limite de marge R définie par l’implémentation, généralement inférieure à 2048 caractères par ligne, généralement 255).

Mais le compilateur démarre en mode FORMAT FIXED par défaut. Il y a généralement un commutateur de compilation ou une instruction Compiler Directive Facility avant que la source au format libre ne soit reconnue.

bbbbbb >>SOURCE FORMAT IS FREE

bbbbbb représente 6 espaces ou tout autre caractère. (Ceux-ci sont ignorés dans le cadre de la zone de numéro de séquence du mode de format fixe par défaut initial.)

Installer gnu-cobol sur Mac OS X

gnu-cobol est disponible via le système homebrew.

Ouvrez une fenêtre de terminal à partir de /Applications/Utilities/Terminal ou utilisez la touche Command + Space et tapez "Terminal".

Si vous n’avez pas installé le système homebrew, ajoutez-le en tapant, ou en copiant-collant dans votre terminal :

ruby -e "$(curl -fsSL https://raw.githubusercontent.com/Homebrew/install/master/install)"

Une fois la commande terminée, tapez :

brew install gnu-cobol

Voilà, vous pouvez maintenant compiler des programmes Cobol sur votre Mac.