IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Easytrieve Error, NOT A VALID FILE


IBM Mainframe Forums -> CA Products
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
kumar1234

New User


Joined: 06 Nov 2007
Posts: 84
Location: bangalore

PostPosted: Fri Jan 16, 2015 11:54 am
Reply with quote

Hi,

I am trying to replace a value in the input flat file itself. But I am getting an error. Could please let me know what could be the reason. I checked the file DD name in Jcl is correct.

Error Im getting is '*******B054 NOT A VALID FILE - B3700251'

Here is the easytrieve code which I have used.

IN-CLAIM-NUMBER 005 012 A
IN-REINS-TYPE-MST 026 001 A
IN-RESV-AMT-CURRENT-MST 313 006 P 2
*
*
* OUTPUT FILE - FILE NAME CORRESPONDS TO DDNAME IN JCL
*
HISTORY-RECORD-CNT W 006 P 2 VALUE 38159.29
*
* WORKING STORAGE
*
* PROCEDURE DIVISION

IF IN-CLAIM-NUMBER EQ '564614597011' +
AND IN-REINS-TYPE-MST EQ '0' +
AND IN-RESV-AMT-CURRENT-MST EQ 161.29
MOVE HISTORY-RECORD-CNT TO IN-RESV-AMT-CURRENT-MST
WRITE B3700251 UPDATE
*******B054 NOT A VALID FILE - B3700251


Could anyone let me know on this.

Thanks
Back to top
View user's profile Send private message
Bill Woodger

Moderator Emeritus


Joined: 09 Mar 2011
Posts: 7311
Location: Inside the Matrix

PostPosted: Fri Jan 16, 2015 1:18 pm
Reply with quote

You'll go wrong, and send your colleagues and future viewers wrong, by using names list this:

Code:
HISTORY-RECORD-CNT W 006 P 2 VALUE 38159.29


That is not the problem. It is a problem.

You need to get hold of a manual. First, look up the error message. Second, look at where WRITE .... UPDATE can be used, and look where WRITE ... can be used.

You haven't shown your file definition, but we know it is wrong.
Back to top
View user's profile Send private message
kumar1234

New User


Joined: 06 Nov 2007
Posts: 84
Location: bangalore

PostPosted: Fri Jan 16, 2015 1:52 pm
Reply with quote

This is the file definition

FILE B3700251
*
*
IN-CLAIM-NUMBER 005 012 A
IN-REINS-TYPE-MST 026 001 A
IN-RESV-AMT-CURRENT-MST 313 006 P 2

not sure why im getting this error. I need to replace that amount in a flat file.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> CA Products

 


Similar Topics
Topic Forum Replies
No new posts Secondary index error while loading d... IMS DB/DC 2
No new posts Converting a file from PD to display ... SYNCSORT 4
No new posts Record count of RECFM=U tape file DFSORT/ICETOOL 17
No new posts Error 0C1 Reason Code 1 with branch i... PL/I & Assembler 3
This topic is locked: you cannot edit posts or make replies. Write Character to Hexadecimal file w... COBOL Programming 8
Search our Forums:

Back to Top