error message

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.
AtourayAsked:
Who is Participating?
 
Kent OlsenConnect With a Mentor Data Warehouse Architect / DBACommented:

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
 
Kent OlsenData Warehouse Architect / DBACommented:
Hi Atouray,

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


Kent
0
 
AtourayAuthor Commented:
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
Free Tool: SSL Checker

Scans your site and returns information about your SSL implementation and certificate. Helpful for debugging and validating your SSL configuration.

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.

 
Kent OlsenData Warehouse Architect / DBACommented:

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
 
AtourayAuthor Commented:
Got none of the above.
0
 
AtourayAuthor Commented:
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
 
AtourayAuthor Commented:
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
 
Kent OlsenData Warehouse Architect / DBACommented:
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
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.