Tek-Tips is the largest IT community on the Internet today!
Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!
-
Congratulations SkipVought on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
COBOL II ESDS FILE
- Thread starter xena
- Start date
BettyScherber
Programmer
You can open an empty ESDS file in COBOL II, no problem. What can be a problem that is a difference between COBOL I and COBOL II are the file attributes of the file not agreeing with the attributes specified in the program. This is the first place I would look, since it is a difference between file handling on COBOL I vs COBOL II. If this is not the problem, answer back with a file status and I will help you figure it out.
Betty Scherber
Brainbench MVP for COBOL II
Betty Scherber
Brainbench MVP for COBOL II
- Thread starter
- #3
> <...+..~.1.~..+.~..2....+....3....+....4....+....5....+....6
problem
000704 OPEN OUTPUT EDI-FLATFL
000705 EXTEND AUDIT-FILE.
000706
000707
000708
<...+....1....+....2....+....3....+....4....+....5....+....6
Solution:
000729 007290 OPEN OUTPUT EDI-FLATFL.
000730 007300 OPEN EXTEND AUDIT-FILE.
000731 007310
000732 007320 IF AUDIT-STAT NOT = '00'
000733 007330 OPEN OUTPUT AUDIT-FILE.
- Status
