Problème compilation cobol

titcobol -  
 adel de boumerdes algerie -
Bonjour,

J'ai installer fujisu cobol et lors de la compilation du prog que voici :

IDENTIFICATION DIVISION.
PROGRAM-ID. prog1.
DATE-WRITTEN. 21/05/05 19:04.
AUTHOR. zn.
ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
SOURCE-COMPUTER. RM-COBOL.
OBJECT-COMPUTER. RM-COBOL.

DATA DIVISION.
WORKING-STORAGE SECTION.
01 REQUEST-MESSAGE PIC X(42) VALUE "aa".

PROCEDURE DIVISION.
DATA-INPUT SECTION.

DISPLAY REQUEST-MESSAGE WITH NO ADVANCING.
EXIT PROGRAM.
END PROGRAM prog1.

voici les erreurs lors de la compilation dont 2 sévère :

** DIAGNOSTIC MESSAGE ** (NOPRGMID)
E:\cob\prog\prog1.cob 0: JMN1102I-S IDENTIFICATION DIVISION HEADER IS MISSING. HEADER ASSUMED TO BE CODED.
E:\cob\prog\prog1.cob 1: JMN1019I-W INDICATOR AREA MUST CONTAIN '-','*','/','D',OR BLANK. A BLANK IS ASSUMED TO BE SPECIFIED.
E:\cob\prog\prog1.cob 1: JMN1005I-W CHARACTER STRING 'ICATION' MUST START IN AREA B. ASSUMED TO START IN AREA B.
E:\cob\prog\prog1.cob 1: JMN1356I-W INVALID WORD 'ICATION' IS SPECIFIED IN IDENTIFICATION DIVISION. IGNORED UNTIL NEXT PARAGRAPH OR DIVISION.
E:\cob\prog\prog1.cob 2: JMN1104I-S PROGRAM-ID PARAGRAPH IS MISSING. PROGRAM-NAME GENERATED BY SYSTEM.
E:\cob\prog\prog1.cob 2: JMN1019I-W INDICATOR AREA MUST CONTAIN '-','*','/','D',OR BLANK. A BLANK IS ASSUMED TO BE SPECIFIED.
E:\cob\prog\prog1.cob 2: JMN1041I-W SEPARATOR MUST FOLLOW CHARACTER STRING. SEPARATOR ASSUMED.
E:\cob\prog\prog1.cob 2: JMN1100I-W WORD 'DIVISION' OR 'SECTION' IS MISSING. WORD ASSUMED TO BE CODED.
E:\cob\prog\prog1.cob 2: JMN1356I-W INVALID WORD 'PROG1' IS SPECIFIED IN IDENTIFICATION DIVISION. IGNORED UNTIL NEXT PARAGRAPH OR DIVISION.
E:\cob\prog\prog1.cob 3: JMN1019I-W INDICATOR AREA MUST CONTAIN '-','*','/','D',OR BLANK. A BLANK IS ASSUMED TO BE SPECIFIED.
E:\cob\prog\prog1.cob 3: JMN1005I-W CHARACTER STRING 'ITTEN' MUST START IN AREA B. ASSUMED TO START IN AREA B.
E:\cob\prog\prog1.cob 3: JMN1041I-W SEPARATOR MUST FOLLOW CHARACTER STRING. SEPARATOR ASSUMED.
E:\cob\prog\prog1.cob 3: JMN1041I-W SEPARATOR MUST FOLLOW CHARACTER STRING. SEPARATOR ASSUMED.
E:\cob\prog\prog1.cob 3: JMN1041I-W SEPARATOR MUST FOLLOW CHARACTER STRING. SEPARATOR ASSUMED.
E:\cob\prog\prog1.cob 3: JMN1041I-W SEPARATOR MUST FOLLOW CHARACTER STRING. SEPARATOR ASSUMED.
E:\cob\prog\prog1.cob 4: JMN1019I-W INDICATOR AREA MUST CONTAIN '-','*','/','D',OR BLANK. A BLANK IS ASSUMED TO BE SPECIFIED.
E:\cob\prog\prog1.cob 5: JMN1019I-W INDICATOR AREA MUST CONTAIN '-','*','/','D',OR BLANK. A BLANK IS ASSUMED TO BE SPECIFIED.
E:\cob\prog\prog1.cob 5: JMN1005I-W CHARACTER STRING 'MENT' MUST START IN AREA B. ASSUMED TO START IN AREA B.
E:\cob\prog\prog1.cob 6: JMN1019I-W INDICATOR AREA MUST CONTAIN '-','*','/','D',OR BLANK. A BLANK IS ASSUMED TO BE SPECIFIED.
E:\cob\prog\prog1.cob 6: JMN1005I-W CHARACTER STRING 'RATION' MUST START IN AREA B. ASSUMED TO START IN AREA B.
E:\cob\prog\prog1.cob 7: JMN1043I-S AREA A OF CONTINUATION LINE MUST BE BLANK. OR WHOLE CHARACTER-STRING CONTINUED BY CONTINUATION OF LINES IS INVALID AS COBOL WORD. HYPHEN IN INDICATOR AREA IS IGNORED.
E:\cob\prog\prog1.cob 7: JMN1005I-W CHARACTER STRING 'COMPUTER' MUST START IN AREA B. ASSUMED TO START IN AREA B.
E:\cob\prog\prog1.cob 8: JMN1043I-S AREA A OF CONTINUATION LINE MUST BE BLANK. OR WHOLE CHARACTER-STRING CONTINUED BY CONTINUATION OF LINES IS INVALID AS COBOL WORD. HYPHEN IN INDICATOR AREA IS IGNORED.
E:\cob\prog\prog1.cob 8: JMN1005I-W CHARACTER STRING 'COMPUTER' MUST START IN AREA B. ASSUMED TO START IN AREA B.
E:\cob\prog\prog1.cob 10: JMN1019I-W INDICATOR AREA MUST CONTAIN '-','*','/','D',OR BLANK. A BLANK IS ASSUMED TO BE SPECIFIED.
E:\cob\prog\prog1.cob 10: JMN1005I-W CHARACTER STRING 'VISION' MUST START IN AREA B. ASSUMED TO START IN AREA B.
E:\cob\prog\prog1.cob 11: JMN1019I-W INDICATOR AREA MUST CONTAIN '-','*','/','D',OR BLANK. A BLANK IS ASSUMED TO BE SPECIFIED.
E:\cob\prog\prog1.cob 11: JMN1041I-W SEPARATOR MUST FOLLOW CHARACTER STRING. SEPARATOR ASSUMED.
E:\cob\prog\prog1.cob 11: JMN1005I-W CHARACTER STRING 'STORAGE' MUST START IN AREA B. ASSUMED TO START IN AREA B.
E:\cob\prog\prog1.cob 12: JMN1019I-W INDICATOR AREA MUST CONTAIN '-','*','/','D',OR BLANK. A BLANK IS ASSUMED TO BE SPECIFIED.
E:\cob\prog\prog1.cob 12: JMN1005I-W CHARACTER STRING 'UEST-MESSAGE' MUST START IN AREA B. ASSUMED TO START IN AREA B.
E:\cob\prog\prog1.cob 14: JMN1019I-W INDICATOR AREA MUST CONTAIN '-','*','/','D',OR BLANK. A BLANK IS ASSUMED TO BE SPECIFIED.
E:\cob\prog\prog1.cob 14: JMN1005I-W CHARACTER STRING 'RE' MUST START IN AREA B. ASSUMED TO START IN AREA B.
E:\cob\prog\prog1.cob 15: JMN1019I-W INDICATOR AREA MUST CONTAIN '-','*','/','D',OR BLANK. A BLANK IS ASSUMED TO BE SPECIFIED.
E:\cob\prog\prog1.cob 15: JMN1005I-W CHARACTER STRING 'PUT' MUST START IN AREA B. ASSUMED TO START IN AREA B.
E:\cob\prog\prog1.cob 17: JMN1019I-W INDICATOR AREA MUST CONTAIN '-','*','/','D',OR BLANK. A BLANK IS ASSUMED TO BE SPECIFIED.
E:\cob\prog\prog1.cob 17: JMN1005I-W CHARACTER STRING 'AY' MUST START IN AREA B. ASSUMED TO START IN AREA B.
E:\cob\prog\prog1.cob 17: JMN1005I-W CHARACTER STRING 'REQUEST-MESSAGE' MUST START IN AREA B. ASSUMED TO START IN AREA B.
E:\cob\prog\prog1.cob 18: JMN1004I-W RESERVED WORD 'PROGRAM' MUST START IN AREA B. ASSUMED TO START IN AREA B.
E:\cob\prog\prog1.cob 19: JMN1044I-S PROGRAM CONTAINED WITHIN PROGRAM 'NOPRGMID' MUST END WITH END PROGRAM HEADER. END PROGRAM HEADER ASSUMED.
E:\cob\prog\prog1.cob 19: JMN1291I-S PROGRAM-NAME PARAGRAPH MUST BE SPECIFIED IN IDENTIFICATION DIVISION.
E:\cob\prog\prog1.cob 19: JMN1019I-W INDICATOR AREA MUST CONTAIN '-','*','/','D',OR BLANK. A BLANK IS ASSUMED TO BE SPECIFIED.
E:\cob\prog\prog1.cob 19: JMN1005I-W CHARACTER STRING 'GRAM' MUST START IN AREA B. ASSUMED TO START IN AREA B.
STATISTICS: HIGHEST SEVERITY CODE=S, PROGRAM UNIT=1

Je pense que l'erreur n'est pas si difficile que cela mais je ne connais pas ce compilateur et je ne sais pas si mon erreur vient de l'éditeur ou un dll à installer. En tout cas tout programme compiler sort des erreurs.

Merci d'avance pour votre aide.

8 réponses

Utilisateur anonyme
 
Bonsoir titcobol,
Cela fait 30 ans que je n'ai plus touché au Cobol, mais il me semble que le compilateur ne reconnait même pas ta première ligne: Identificaton Division. Aurais-tu une ligne blanche qui la précède ou une crasse qui traine devant tes lignes de programme ?
Vive le COBOL !!
1
titcobol
 
Salut devisch,

Merci de te pencher sur mon problème.

Il n'y a ps de ligne blanche ou autre, je regarde s'il faut toucher à la config du compilateur mais je ne voie rien.

Merci quand même.
0
Utilisateur anonyme
 
Bonjour titcobol,
Si ton problème n'est pas résolu, il se pourrait que ce soit l'emplacement du premier caractère de chaque ligne. A l'époque il fallait démarrer en colonne 8. Les 7 premières étant réservées au n° d'ordre de l'instruction. Les instructions étaient perforées dans des cartes et il y avait intérêt à savoir dans quel ordre les placer !! J'ignore si les compilateurs actuels ont tjs les mêmes exigeances !!
Bonne chance.
Guy
Vive le COBOL !!
0
Utilisateur anonyme
 
Bonjour titcobol,
Si ton problème n'est pas résolu, il se pourrait que ce soit l'emplacement du premier caractère de chaque ligne. A l'époque il fallait démarrer en colonne 8. Les 7 premières étant réservées au n° d'ordre de l'instruction. Les instructions étaient perforées dans des cartes et il y avait intérêt à savoir dans quel ordre les placer !! J'ignore si les compilateurs actuels ont tjs les mêmes exigeances !!
Bonne chance.
Guy
Vive le COBOL !!
0
delphi79 Messages postés 4 Date d'inscription   Statut Membre Dernière intervention  
 
salut,

Dommage d'avoir arrêté la programmation en cobol, si tu souhaites à nouveau t'y recoller, envoie-moi un mail, j'ai besoin d'info. Merci à bientôt
0
titcobol
 
Salut devisch,

Merci, j'ai anticipé la chose et le résultat à changer,
voici le programme :

000010 $ SET SOURCEFORMAT"FREE"
000020 IDENTIFICATION DIVISION.
000030 PROGRAM-ID. prog1.
000040 DATE-WRITTEN. 21/05/05 19:04.
000050 AUTHOR. zn.
000060 ENVIRONMENT DIVISION.
000070 CONFIGURATION SECTION.
000080 SOURCE-COMPUTER. RM-COBOL.
000090 OBJECT-COMPUTER. RM-COBOL.
000100
000110 DATA DIVISION.
000120 WORKING-STORAGE SECTION.
000130 01 REQUEST-MESSAGE PIC X(42) VALUE "aa".
000140
000150 PROCEDURE DIVISION.
000160 DATA-INPUT SECTION.
000170
000180 DISPLAY REQUEST-MESSAGE WITH NO ADVANCING.
000190
STOP RUN.
000200 END PROGRAM prog1.

et voici les erreur, il y en a moins, mais que les sévère :

** DIAGNOSTIC MESSAGE ** (NOPRGMID)
E:\cob\prog\prog1.cob 0: JMN1102I-S IDENTIFICATION DIVISION HEADER IS MISSING. HEADER ASSUMED TO BE CODED.
E:\cob\prog\prog1.cob 1: JMN1000I-S CHARACTER EXCLUDED FROM COBOL CHARACTER SET IS USED. THAT CHARACTER IS IGNORED.
E:\cob\prog\prog1.cob 1: JMN1041I-W SEPARATOR MUST FOLLOW CHARACTER STRING. SEPARATOR ASSUMED.
E:\cob\prog\prog1.cob 1: JMN1356I-W INVALID WORD 'SET' IS SPECIFIED IN IDENTIFICATION DIVISION. IGNORED UNTIL NEXT PARAGRAPH OR DIVISION.
E:\cob\prog\prog1.cob 2: JMN1104I-S PROGRAM-ID PARAGRAPH IS MISSING. PROGRAM-NAME GENERATED BY SYSTEM.
E:\cob\prog\prog1.cob 7: JMN1113I-S CONFIGURATION SECTION CANNOT BE SPECIFIED IN INTERNAL PROGRAM.
E:\cob\prog\prog1.cob 8: JMN1113I-S CONFIGURATION SECTION CANNOT BE SPECIFIED IN INTERNAL PROGRAM.
E:\cob\prog\prog1.cob 9: JMN1113I-S CONFIGURATION SECTION CANNOT BE SPECIFIED IN INTERNAL PROGRAM.
STATISTICS: HIGHEST SEVERITY CODE=S, PROGRAM UNIT=1
0
guy24 Messages postés 100 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour Titcobol,
J'ai changé d'identification, guy24 est plus sympa. Je regarde ton programme et je reviens.

Horum Gallum populi fortissimi sunt Belgea !!
0
guy24 Messages postés 100 Date d'inscription   Statut Membre Dernière intervention  
 
A mon avis c'est la première carte § set source... qui dérange le compilateur et la stop run n'est pas à sa place.
Horum Gallum populi fortissimi sunt Belgea !!
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
titcobol
 
Salut guy24,

Bravo et merci, j'ai vite percuté, et ça marche,
Maintenant je recherche des tuto sur fijisu cobol pour pourvoir executer des taches batch pour passer plusieur programme faire des jcl avec des job de tri et des enregistrament de fichier et des états.

Merci beaucoup,
et si tu connais des sites sur ce qu je recherche, merci encore.

Pour ma part je cherche.

Merci et a+ guy24
0
guy24 Messages postés 100 Date d'inscription   Statut Membre Dernière intervention  
 
Je suis, en effet, très content surtout qu'à part moi, il n'y avait pas grand monde pour te répondre !! Normal, il suffit de voir mes données perso pour comprendre. J'ai fait le calcul il y a 40 ans ( et non pas 30) que je n'ai plus programmé en Cobol !! En allant sur des sites de ce langage j'ai été surpris d'apprendre que 75% des programmes actuels tournent en Cobol. Dommage pour toi, j'ai balancé toute ma doc il y a très longtemps au cours de déménagements successifs. Mais si je vois qqchose je te le dis.
Good Luck et vive le COBOL !!
Horum Gallum populi fortissimi sunt Belgae !!
0
titcobol
 
Salut et merci guy24,

Tu me sort un javelot du pied.

Merci pour l'aide

A+
0
Webwarrior
 
Bonjour,
je dois apprendre depuis peu du cobol, je comprend rien,lol j'essaie d'afficher bonjour simplement je suis meme pas capable de faire cela
Merci pour tout l'aide que vous pouvez m'apporter.

J'ai installer fujisu cobol et à la compilation du prog que voici :

IDENTIFICATION DIVISION.
PROGRAM-ID. SALUT.
DATE-WRITTEN. 10/08/07 19:04.
AUTHOR.
ENVIRONMENT DIVISION.
CONFIGURATION SECTION.
SOURCE-COMPUTER. RM-COBOL.
OBJECT-COMPUTER. RM-COBOL.

DATA DIVISION.
FILE SECTION.

PROCEDURE DIVISION.

DEBUT.
DISPLAY " " LINE 1 POSITION 1 ERASE EOS.
DISPLAY "BONJOUR !" LINE 15 POSITION 10.
STOP RUN.

***************************************************************************************
** DIAGNOSTIC MESSAGE ** (SALUT)
C:\WINDOWS\Bureau\File1.cob 16: JMN2500I-S THERE IS WORD 'POSITION' WHERE STATEMENT MUST APPEAR.
C:\WINDOWS\Bureau\File1.cob 16: JMN2643I-S ERASE STATEMENT CANNOT BE USED WHEN SUBSCHEMA-NAME PARAGRAPH IS NOT SPECIFIED.
C:\WINDOWS\Bureau\File1.cob 16: JMN2774I-W 'ERASE' IS A PROPER FUNCTION TO THE MSP OR XSP SYSTEM.
C:\WINDOWS\Bureau\File1.cob 17: JMN2500I-S THERE IS WORD 'POSITION' WHERE STATEMENT MUST APPEAR.
STATISTICS: HIGHEST SEVERITY CODE=S, PROGRAM UNIT=1
0
adel de boumerdes algerie
 
Bonjour,
c'est adel de boumerdes algerie

cobol fonctionne bien sous windows 98 ou 2000 mais pas sur xp.

si vous desirez toujours programmer en cobol, changez de systeme d'exploitation.

sachez que j'ai toujours programmé en cobol pendant 30 ans, et je suis toujours avec cobol.

salut a tous les cobolistes. pour me contacter : email : t.adel@hotmail.com

bonne chance et bon courage.... vive cobol
0