Solved

error message

Posted on 2007-11-29
8
985 Views
Last Modified: 2013-11-25
Hi i have an error message " F5BA2019 The error is found in the procedure " anytime i tried to compile my cobol program. Below is the diagnostic message.
** DIAGNOSTIC MESSAGE ** (SHEET1)

C:\USERS\MJARJU\DOCUMENTS\MYP.WIN SHEET1-PROCEDURE 1 : JMN2500I-S THERE IS WORD 'DIVISION' WHERE STATEMENT MUST APPEAR.
C:\USERS\MJARJU\DOCUMENTS\MYP.WIN SHEET1-PROCEDURE 2 : JMN2503I-S USER WORD 'ACCEPT-DATE' IS UNDEFINED.
C:\USERS\MJARJU\DOCUMENTS\MYP.WIN SHEET1-PROCEDURE 2 : JMN2557I-S FORMAT OF PERFORM STATEMENT IS INCOMPLETE.
C:\USERS\MJARJU\DOCUMENTS\MYP.WIN SHEET1-PROCEDURE 3 : JMN2557I-S FORMAT OF PERFORM STATEMENT IS INCOMPLETE.
C:\USERS\MJARJU\DOCUMENTS\MYP.WIN SHEET1-PROCEDURE 4 : JMN2557I-S FORMAT OF PERFORM STATEMENT IS INCOMPLETE.
C:\USERS\MJARJU\DOCUMENTS\MYP.WIN SHEET1-PROCEDURE 3 : JMN2503I-S USER WORD 'CALCULATE-DAYS' IS UNDEFINED.
C:\USERS\MJARJU\DOCUMENTS\MYP.WIN SHEET1-PROCEDURE 4 : JMN2503I-S USER WORD 'TYPE-RESULT' IS UNDEFINED.
C:\USERS\MJARJU\DOCUMENTS\MYP.WIN SHEET1-PROCEDURE 8 : JMN2500I-S THERE IS WORD '"ENTER 2-DIGIT LUNAR MONTH"' WHERE STATEMENT MUST APPEAR.
C:\USERS\MJARJU\DOCUMENTS\MYP.WIN SHEET1-PROCEDURE 9 : JMN2503I-S USER WORD 'MONTH' IS UNDEFINED.
C:\USERS\MJARJU\DOCUMENTS\MYP.WIN SHEET1-PROCEDURE 13 : JMN2503I-S USER WORD 'MONTH' IS UNDEFINED.
C:\USERS\MJARJU\DOCUMENTS\MYP.WIN SHEET1-PROCEDURE 14 : JMN2503I-S USER WORD 'MONTH' IS UNDEFINED.
C:\USERS\MJARJU\DOCUMENTS\MYP.WIN SHEET1-PROCEDURE 10 : JMN2500I-S THERE IS WORD '"THANK YOU, ENTER 2-DIGIT DAY"' WHERE STATEMENT MUST APPEAR.
C:\USERS\MJARJU\DOCUMENTS\MYP.WIN SHEET1-PROCEDURE 11 : JMN2501I-S 'DAY' IN ACCEPT STATEMENT MUST BE IDENTIFIER.
C:\USERS\MJARJU\DOCUMENTS\MYP.WIN SHEET1-PROCEDURE 13 : JMN2557I-S FORMAT OF SUBTRACT STATEMENT IS INCOMPLETE.
C:\USERS\MJARJU\DOCUMENTS\MYP.WIN SHEET1-PROCEDURE 14 : JMN2557I-S FORMAT OF MULTIPLY STATEMENT IS INCOMPLETE.
C:\USERS\MJARJU\DOCUMENTS\MYP.WIN SHEET1-PROCEDURE 15 : JMN2502I-S 'DAY' IN ADD STATEMENT MUST BE IDENTIFIER OR NUMERIC LITERAL. 'DAY' IGNORED.
C:\USERS\MJARJU\DOCUMENTS\MYP.WIN SHEET1-PROCEDURE 15 : JMN2557I-S FORMAT OF ADD STATEMENT IS INCOMPLETE.
C:\USERS\MJARJU\DOCUMENTS\MYP.WIN SHEET1-PROCEDURE 1 : JMN1019I-W INDICATOR AREA MUST CONTAIN '-','*','/','D',OR BLANK. A BLANK IS ASSUMED TO BE SPECIFIED.
C:\USERS\MJARJU\DOCUMENTS\MYP.WIN SHEET1-PROCEDURE 2 : JMN1019I-W INDICATOR AREA MUST CONTAIN '-','*','/','D',OR BLANK. A BLANK IS ASSUMED TO BE SPECIFIED.
C:\USERS\MJARJU\DOCUMENTS\MYP.WIN SHEET1-PROCEDURE 7 : JMN1019I-W INDICATOR AREA MUST CONTAIN '-','*','/','D',OR BLANK. A BLANK IS ASSUMED TO BE SPECIFIED.
C:\USERS\MJARJU\DOCUMENTS\MYP.WIN SHEET1-PROCEDURE 12 : JMN1019I-W INDICATOR AREA MUST CONTAIN '-','*','/','D',OR BLANK. A BLANK IS ASSUMED TO BE SPECIFIED.
C:\USERS\MJARJU\DOCUMENTS\MYP.WIN SHEET1-PROCEDURE 16 : JMN1019I-W INDICATOR AREA MUST CONTAIN '-','*','/','D',OR BLANK. A BLANK IS ASSUMED TO BE SPECIFIED.
C:\USERS\MJARJU\DOCUMENTS\MYP.WIN SHEET1-PROCEDURE 1 : JMN1103I-W PERIOD IS MISSING. ASSUMED TO BE CODED.
C:\USERS\MJARJU\DOCUMENTS\MYP.WIN SHEET1-PROCEDURE 8 : JMN1103I-W PERIOD IS MISSING. ASSUMED TO BE CODED.
C:\USERS\MJARJU\DOCUMENTS\MYP.WIN SHEET1-PROCEDURE 10 : JMN1103I-W PERIOD IS MISSING. ASSUMED TO BE CODED.
C:\USERS\MJARJU\DOCUMENTS\MYP.WIN SHEET1-PROCEDURE 2 : JMN1004I-W RESERVED WORD 'PERFORM' MUST START IN AREA B. ASSUMED TO START IN AREA B.
C:\USERS\MJARJU\DOCUMENTS\MYP.WIN SHEET1-PROCEDURE 3 : JMN1004I-W RESERVED WORD 'PERFORM' MUST START IN AREA B. ASSUMED TO START IN AREA B.
C:\USERS\MJARJU\DOCUMENTS\MYP.WIN SHEET1-PROCEDURE 4 : JMN1004I-W RESERVED WORD 'PERFORM' MUST START IN AREA B. ASSUMED TO START IN AREA B.
C:\USERS\MJARJU\DOCUMENTS\MYP.WIN SHEET1-PROCEDURE 5 : JMN1004I-W RESERVED WORD 'STOP' MUST START IN AREA B. ASSUMED TO START IN AREA B.
C:\USERS\MJARJU\DOCUMENTS\MYP.WIN SHEET1-PROCEDURE 9 : JMN1004I-W RESERVED WORD 'ACCEPT' MUST START IN AREA B. ASSUMED TO START IN AREA B.
C:\USERS\MJARJU\DOCUMENTS\MYP.WIN SHEET1-PROCEDURE 11 : JMN1004I-W RESERVED WORD 'ACCEPT' MUST START IN AREA B. ASSUMED TO START IN AREA B.
C:\USERS\MJARJU\DOCUMENTS\MYP.WIN SHEET1-PROCEDURE 13 : JMN1004I-W RESERVED WORD 'SUBTRACT' MUST START IN AREA B. ASSUMED TO START IN AREA B.
C:\USERS\MJARJU\DOCUMENTS\MYP.WIN SHEET1-PROCEDURE 14 : JMN1004I-W RESERVED WORD 'MULTIPLY' MUST START IN AREA B. ASSUMED TO START IN AREA B.
C:\USERS\MJARJU\DOCUMENTS\MYP.WIN SHEET1-PROCEDURE 15 : JMN1004I-W RESERVED WORD 'ADD' MUST START IN AREA B. ASSUMED TO START IN AREA B.
STATISTICS: HIGHEST SEVERITY CODE=S, PROGRAM UNIT=1

Can someone help me on this please.
0
Comment
Question by:Atouray
  • 4
  • 4
8 Comments
 
LVL 45

Expert Comment

by:Kent Olsen
ID: 20375852
Hi Atouray,

Post the first few lines of what you're trying to compile.


Kent
0
 

Author Comment

by:Atouray
ID: 20376350
PROCEDURE DIVISION.
P1. PERFORM ACCEPT-DATE.
     PERFORM  CALCULATE-DAYS.
    PERFORM TYPE-RESULT.
    STOP RUN.

ACCEPT-DATE.
    DISPLAY "ENTER 2 DIGIT MONTH".
   ACCEPT MONTH.
   DISPLAY "THANK YOU, ENTER  2 DIGIT DAY".
   ACCEPT DAY.
CALCULATE-DATE.
   PERFORM FIND-DAYS-IMPLIED-BY-MONTH.
   ADD DAY TO MONTH.
TYPE-RESULT.
   DISPLAY "THANK YOU, THE DAY NUMBER IS " TOT-DAYS.
FIND-DAYS-IMPLIED-BY-MONTH.
IF MONTH=1
   COMPUTE TOT-DAYS=0.
IF MONTH=2
COMPUTE TOT-DAYS =31.

same thing till december.
thanks
0
 
LVL 45

Expert Comment

by:Kent Olsen
ID: 20379103

A couple of things jump out at me.

Where are the IDENTIFICATION, ENVIRONMENT, and DATA divisions?

Is the compiler expecting fixed-column input?  Is free-form input optional?



0
Free Tool: IP Lookup

Get more info about an IP address or domain name, such as organization, abuse contacts and geolocation.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

 

Author Comment

by:Atouray
ID: 20380704
Got none of the above.
0
 
LVL 45

Accepted Solution

by:
Kent Olsen earned 500 total points
ID: 20381454

I don't know of a compiler that can build a working object file without them.  In fact, I know of know compiler where the 4 DIVISION statements aren't mandatory.

The IDENTIFICATION DIVISION puts a name on the program.  This isn't mandatory in today's world, but useful.
The ENVIRONMENT DIVISION defines the host computer, all I/O objects, etc.
The DATA DIVISION declares all of the varibles.  You're using MONTH, DAY, and TOT-DAYS.  How/where are the defined?

Kent
0
 

Author Comment

by:Atouray
ID: 20430180
Ok i have seen your point. I defined all the variables on the data section included all the division and is working thanks alot. you really helped!!!!
0
 

Author Closing Comment

by:Atouray
ID: 31411707
Thanks for the help? How good are you at COBOL, cause i have some codes to modify to suit my needs that's why i am reading cobol maybe you can help. Let me know what you that. Write to me at mljarju84@gmail.com.
Thankd
0
 
LVL 45

Expert Comment

by:Kent Olsen
ID: 20430283
Hi Atouray,

I'm a "gray-beard" in the industry.  I've written many thousands of lines of COBOL programs and will be glad to offer assistance to you.

My email address is in my profile.  Write me if you're serious about getting some help.


Kent
0

Featured Post

Free Tool: ZipGrep

ZipGrep is a utility that can list and search zip (.war, .ear, .jar, etc) archives for text patterns, without the need to extract the archive's contents.

One of a set of tools we're offering as a way to say thank you for being a part of the community.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

In our object-oriented world the class is a minimal unit, a brick for constructing our applications. It is an abstraction and we know well how to use it. In well-designed software we are not usually interested in knowing how objects look in memory. …
Programmer's Notepad is, one of the best free text editing tools available, simply because the developers appear to have second-guessed every weird problem or issue a programmer is likely to run into. One of these problems is selecting and deleti…
The viewer will learn how to synchronize PHP projects with a remote server in NetBeans IDE 8.0 for Windows.
The viewer will learn how to use and create new code templates in NetBeans IDE 8.0 for Windows.

830 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question