| IBM MAINFRAME HELP FORUMS for COBOL, JCL, CICS, DB2, IMS etc...
Help & Support Forums for IBM Mainframe computers Applications like COBOL, JCL, CICS, DB2, FileAid, DFSORT, Endevor, Xpediter, CoolGen, CA-7, CA-11, AbendAid, IMS, IDMS, PL/I, MqSeries, SyncSort, Assembler, VSAM, ISPF, ChangeMan, Easytrieve, InterTest, REXX, CLIST etc...
|
| View previous topic :: View next topic |
| Author |
Message |
ilakkia
Joined: 17 May 2008
Posts: 18
Location: chennai
|
| Posted: Thu Jun 05, 2008 8:57 pm Post subject: User Abend U4005 |
|
|
One of our Jobs abended with U4005.
We have identified from its corresponding COBOL code that this abend
arised while opening a VSAM dataset. The abend message was 'Error opening a vsam dataset of file status 37'.
The description of file-status 37 is
An OPEN statement was attempted on a file that would not support the open mode specified in the OPEN statement.
Possible violations are:
o The EXTEND or OUTPUT phrase was specified but the file would not
support write operations.
o The I-O phrase was specified but the file would not support the input
and output operations permitted.
o The INPUT phrase was specified but the file would not support read
operations.
Actually this abended job runs a cobol code with a input VSAM file. This file is opened in OUTPUT mode inside the cobol program.
Let us know how to fix this issue. |
|
| Back to top |
|
CICS Guy
Joined: 18 Jul 2007
Posts: 1142
Location: At my desk
|
| Posted: Thu Jun 05, 2008 9:25 pm Post subject: |
|
|
| Look into extending the FILE STATUS clause with the second six byte field for more information. |
|
| Back to top |
|
Craq Giegerich
Joined: 19 May 2007
Posts: 970
Location: Virginia, USA
|
| Posted: Thu Jun 05, 2008 11:06 pm Post subject: |
|
|
Quote: Actually this abended job runs a cobol code with a input VSAM file. This file is opened in OUTPUT mode inside the cobol program.
Why would you open an input VSAM in OUTPUT mode? |
|
| Back to top |
|
dick scherrer
Joined: 23 Nov 2006
Posts: 7505
Location: 221 B Baker St
|
| Posted: Fri Jun 06, 2008 2:21 am Post subject: |
|
|
Hello,
Is this new code or had it been working until some change was made? |
|
| Back to top |
|
| |
THIS IS AN ARCIVE FORUM IN READ ONLY MODE. IF YOU WANT TO ASK YOUR DOUBTS USE THE ACTUAL FORUM
|