JCL/COBOL - Exemple de Compilation COBOL sous z/OS (Enterprise COBOL)

Ceci est un exemple complet de compilation sur z/OS (MVS) d'un petit programme COBOL.
Le compilateur utilisé est Enterprise COBOL (IGYCRCTL).

L'exemple inclut :
- Un JCL de compilation (Compilation_COBOL.jcl)
- Un JCL d'exécution (Execution_COBOL.jcl)
- Un code source exemple (code.cob) !! RETIRER LA PREMIERE LIGNE QUI SERT DE REFERENCE SUR ISPF !!
- Un fichier lu et traité par COBOL (DEP$JAN.dat)

Voici les spécificités des PDS et datasets :

- METAL.MALIB.JCL => PDS, organization=PO
RECFM=FB,LRECL=80,BLKSIZE=800,1stExt=200,second=10,DIRBlock=10
Contient les JCL

- METAL.MALIB.COBOL => PDS, organization=PO
RECFM=FB,LRECL=80,BLKSIZE=80,1stExt=200,second=40,DIRBlock=10
Contient le code source

- METAL.MALIB.OBJ => PDS, organization=PO
RECFM=FB,LRECL=80,BLKSIZE=80,1stExt=200,second=40,DIRBlock=10
Contient les objets générés à la compilation

- METAL.MALIB.OUT => PDS, organization=PO
RECFM=U,LRECL=80,BLKSIZE=256,1stExt=200,second=40,DIRBlock=10
Contient le load module/binaire final

- METAL.MALIB.DATA.IN.DEP$JAN => organisation=PS
RECFM=FB,LRECL=35,BLKSIZE=350,1stExt=10,second=5
Contient les données en entrée [le LRECL dépend du format codé dans COBOL en FD]

- METAL.MALIB.DATA.OUT.TOTAL => organisation=PS
RECFM=FB,LRECL=37,BLKSIZE=370,1stExt=10,second=5
Contient les données en sortie [le LRECL dépend du format codé dans COBOL en FD]

IGYCRCTL est le compilateur compilateur, et IEWL en linker/binder.

Ne pas oublier d'adapter dans la partie de link les libs !
Rechercher un CEE.SCEELKED (ou un SCEELKED), un IGY410.SIGYCOMP (ou SIGYCOMP), et IGY410.SIGYPROC (ou SIGYPROC).

Ceci est issu de l'ensemble de mes recherches et question.
Trois topics sont associés :
Celui du JCL
Celui du portage du code PC -> z/OS
Celui du code initial

Je remercie grandement toute les équipes et membres des sections COBOL et z/OS de developper.com.