i got S000 U4038
this is my code.
ID DIVISION.
PROGRAM-ID. READFILE.
ENVIRONMENT DIVISION.
INPUT-OUTPUT SECTION.
FILE-CONTROL.
SELECT IN-PUT ASSIGN TO OUTDD
ORGANIZATION IS SEQUENTIAL
ACCESS MODE IS SEQUENTIAL.
DATA DIVISION.
FILE SECTION.
FD IN-PUT.
01 STU-REC.
05 SID PIC 9(2) VALUE 11.
05 NAME PIC X(10) VALUE 'RAGHU'.
05 FILLER PIC X(68).
WORKING-STORAGE SECTION.
01 WS-EOF PIC X(3) VALUE 'NO'.
PROCEDURE DIVISION.
PERFORM OPEN-PARA.
PERFORM PROCESS-PARA UNTIL WS-EOF ='
PERFORM CLOSE-PARA.
OPEN-PARA.
OPEN INPUT IN-PUT.
PROCESS-PARA.
READ IN-PUT
AT END
MOVE 'YES' TO WS-EOF
NOT AT END
DISPLAY STU-REC
END-READ.
CLOSE-PARA.
CLOSE IN-PUT.
STOP RUN.
Hi dear friends, i'm running a simple cobol program
Moderators: dbzTHEdinosauer, Moderator Group
-
- Active Member
- Posts: 732
- Joined: Thu May 24, 2012 4:07 am
-
- Moderator
- Posts: 1625
- Joined: Sat Aug 09, 2008 9:02 am
- Location: Mumbai, India
You should use the code tags when posting code, data etc. This will preserve spacing and make the code easier to read.
On coding style: why do you give an input file a DDname of OUTDD? This is confusing - especially to anyone reading the JCL.
If you DID retype the whole program note that it is easier and more accurate to cut and paste and provide the error messages. I am not going to look up the error code as I am on holiday and do not have manuals to hand and do not have time to look up on the internet.
On coding style: why do you give an input file a DDname of OUTDD? This is confusing - especially to anyone reading the JCL.
If you DID retype the whole program note that it is easier and more accurate to cut and paste and provide the error messages. I am not going to look up the error code as I am on holiday and do not have manuals to hand and do not have time to look up on the internet.
Regards
Nic
Nic
FREE TUTORIALS
Tutorials
Free tutorials from mainframegurukul
- JCL Tutorial
Covers all important JCL concepts. - Cobol Tutorial
This tutorials covers all Cobol Topics from STRING to COMP-3. - DB2 Tutorial
DB2 Tutorial focuses on DB2 COBOL Programming. - SORT Tutorial
This Tutorial covers all important aspects of DFSORT with examples - CICS Tutorial
This CICS tutorial covers CICS concepts and CICS Basics, CICS COBOL Programming.
Interview
Mainframe Interview questions
- Cobol Interview Questions
50+ Interview Questions - JCL Interview Questions
50+ Interview Questions - DB2 Interview Questions
100+ Interview Questions - CICS Interview Questions
70+ Interview Questions - VSAM Interview Questions
27 Interview Questions
Other References
Mainframe Tools and others
- XPEDITER Reference
Explains how we can debug a program - FILEAID Reference
Explains how to browse , edit and delete datasets - Change Man Reference
Quick Start tutorial on Changeman - Abend Reference
Important Abend codes explained - FaceBook Page
MainframeGurukul FaceBook Page - LinkedIn Page
MainframeGurkul Linkedin Page