Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

U4038 abend Neither FILE STATUS nor a declarative for File

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> ABENDS & Debugging
View previous topic :: :: View next topic  
Author Message
rajesh_kota

New User


Joined: 04 Mar 2008
Posts: 10
Location: chennai

PostPosted: Tue Mar 04, 2008 3:07 pm    Post subject: U4038 abend Neither FILE STATUS nor a declarative for File
Reply with quote

When running one cobol program , it is abending with u4038 error. the message shown below is coming

IGZ0020S A logic error occurred. Neither FILE STATUS nor a declarative
was specified for file O7BKTFLG in program DDDG63SV at relative location
X'01253C'. The status code was 44.
Back to top
View user's profile Send private message

enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10274
Location: italy

PostPosted: Tue Mar 04, 2008 3:59 pm    Post subject: Reply to: U4038 abend Neither FILE STATUS nor a declarative
Reply with quote

check the manual
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/CEEA9180/CCONTENTS


Quote:
IGZ0020S A logic error occurred. Neither FILE STATUS nor a declarative was
specified for file file-name in program program-name at relative
location relative-location. The status code was status-code.

Explanation: This error is an I/O error, usually caused by an operation request that is not valid for the file, for example, a WRITE into a file opened for INPUT, or a START to a VSAM ESDS.

No file status clause was specified, and no error declarative was in effect.

Programmer Response: Check operation request for the file.

System Action: The application was terminated.

Symbolic Feedback Code: IGZ00K


and fix Your program
Back to top
View user's profile Send private message
rajesh_kota

New User


Joined: 04 Mar 2008
Posts: 10
Location: chennai

PostPosted: Tue Mar 04, 2008 4:19 pm    Post subject:
Reply with quote

FD BKTFLAG-FILE
RECORDING MODE IS V
LABEL RECORDS ARE STANDARD
BLOCK CONTAINS 0 RECORDS.

Hi this was the file definition in the program. this is opened in output mode.

WRITE BKTFLAG-RECORD FROM WS-BKTFLAG-RECORD. the error occurs when this statement is executing.

Pls help and reply me if any more information u want..thanks da..
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6968
Location: porcelain throne

PostPosted: Tue Mar 04, 2008 5:26 pm    Post subject:
Reply with quote

since there is not file-status clause or declaratives, I would bet that the open was not successful, thus no i/o against the file would be successful.
But, you have no idea if the open was successful.

I would suggest modifying the program: add status clause, variable and check the status after any i/o
Back to top
View user's profile Send private message
rajesh_kota

New User


Joined: 04 Mar 2008
Posts: 10
Location: chennai

PostPosted: Tue Mar 04, 2008 5:39 pm    Post subject:
Reply with quote

Thanks everybody. I will try this by using your valuable suggestions and I'll let you know. Meanwhile if you get any more ideas please let me know.
Back to top
View user's profile Send private message
CICS Guy

Senior Member


Joined: 18 Jul 2007
Posts: 2150
Location: At my coffee table

PostPosted: Tue Mar 04, 2008 8:00 pm    Post subject:
Reply with quote

If the file status really is a 44:
Quote:
A boundary violation exists because an attempt was made to rewrite a record to a file and the record was not the same size as the record being replaced, or an attempt was made to write or rewrite a record that was larger than the largest or smaller than the smallest record allowed by the RECORD IS VARYING clause of the associated file-name.
Back to top
View user's profile Send private message
Anuj Dhawan

Senior Member


Joined: 22 Apr 2006
Posts: 6258
Location: Mumbai, India

PostPosted: Wed Mar 05, 2008 1:53 am    Post subject:
Reply with quote

Hi,

U4038 is a user (generic) abend. One probable resaon can be LRECL mismatch between the 'length' used in FD & DSN used in JCL.

Compare the LERECL for BKTFLAG-FILE in program DDDG63SV & of DSN used against DD name O7BKTFLG in Your JCL. They must be same.

Hope this helps.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> ABENDS & Debugging All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
This topic is locked: you cannot edit posts or make replies. Fetching data from BAI File arunsoods JCL & VSAM 1 Wed Jul 19, 2017 4:28 pm
No new posts Write out NODUPS but just from one file Jay Villaverde DFSORT/ICETOOL 8 Fri Jul 14, 2017 12:44 am
No new posts How to add header with Date(YYMMDD) i... Rajan Moorthy DFSORT/ICETOOL 2 Thu Jul 06, 2017 11:44 pm
No new posts How to generate a new unique Input fi... for1ranjith CLIST & REXX 11 Sat Jul 01, 2017 12:09 pm
No new posts Writing a file using online program grvtomar PL/I & Assembler 3 Fri Jun 30, 2017 1:06 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us