Bonjour,
petite question de novice. Je dispose d'un vieux code source en Fortran encadré par du JCL (si j'ai bien compris). Mon objectif est de faire de ce code source un exécutable fonctionnel.
La structure du code est la suivante
L'objectif du programme est de lire des données en entrée (par bloc), calculer différentes valeurs à partir des données en entrée et en sortir des données (par blocs) calculées.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10 //P10YYPAT JOB (5000,1530),PATRICK,TIME=(,15),CLASS=F, // MSGCLASS=R,NOTIFY=S075209 /*JOBPARM S=3VIL // EXEC FORTCLG,SOUT=R,ADLOAD1='I028.A.THER.LKED' //FORT.SYSPRINT DD DUMMY //FORT.SYSIN DD * blabla en fortran (plusieurs centaines de lignes) //GO.SYSIN DD *
Je dispose d'un exemple de bloc en entrée et la sortie correspondante pour m'aider.
Quand j'ai essayé de compiler le code pour la première fois (avec visual compaq) j'ai eu un certain nombre d'erreurs liés au "//".
J'ai donc viré tout le code en JCL (parce qu'à ce moment je ne savais pas ce que c'était ni à quoi ça servait) et la compilation s'est bien effectué avec à la clé un exécutable.
Le problème c'est que je ne sais pas comment l'utiliser. En effet, dans le code source en fortran il y a bien des instructions "read" et "write" mais pas d'instructions "open" et "close". Donc je ne vois pas comment lui faire manger les données en entrée.
Une idée ? Merci d'avance pour votre aide.
Pour info, je suis sous windows 2000.
PS : je pense que le code est hérité d'une époque où le bouzin tournait sur des machines IBM. Lais je ne comprend pas le langage donc je ne sais pas à quoi cela sert!
Partager