IBM Mainframe Forum Index
 
Register
 
IBM Mainframe Forum Index Mainframe: Search Log in to check your private messages Log in
 

WRITE to VSAM giving duplicate RC


 
IBM Mainframe Forums -> CICS
Post new topic   Reply to topic
View previous topic :: :: View next topic  
Author Message
picus_mf
Warnings : 1

New User


Joined: 09 Jun 2006
Posts: 52

PostPosted: Fri Feb 23, 2018 2:52 pm
Reply with quote

Hi,
I have VSAM file with key 15 bytes (Date, Time). Date being the current date and time being the current time (ASKTIME, EIBTIME). When I perform WRITE operation on the VSAM (KSDS) file I am getting EIBRESP 22, EIBRESP2 14. I am not sure what is incorrect.

The record is written in the file but with not successful RC.

Code:

EXEC CICS  ASKTIME   
END-EXEC             

MOVE EIBTIME                 TO ABS-EIB-TIME   
MOVE ABS-EIB-TIME         TO ABS-FIL-TIME   
INITIALIZE                      ERR-KEY       
MOVE DATE-CURR-YYYYMMDD   TO FIL-ERR-DATE     
MOVE ABS-EIB-TIME         TO FIL-ERR-TIME     

   EXEC CICS WRITE                         
             DATASET ('FILE')           
             FROM    (FILERROR)           
             RIDFLD  (ERR-KEY)         
             LENGTH  (ERR-REC-LTH)   
             RESP    (IO-RESP)           
             RESP2   (IO-RESP2)         
             END-EXEC.


File output:
----+----1----+
****************
201802220171552
201802220222017
201802220222023
201802230010149
201802230010304
201802230010818
201805337282550
Back to top
View user's profile Send private message
enrico-sorichetti

Senior Member


Joined: 14 Mar 2007
Posts: 10695
Location: italy

PostPosted: Fri Feb 23, 2018 3:33 pm
Reply with quote

You are confusing EIBRESP and EIBRESP2
the duplicate record is EIBRESP 14

EIBRESP 22 is a different situation
guess what ...
You had another topic dealing exactly with the same problem
Use [URL] BBCode for Links

You do not look like somebody who learns from past experience icon_cool.gif
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic All times are GMT + 6 Hours
Forum Index -> CICS
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Forum Replies
No new posts Hexadecimal Group compare and write t... DFSORT/ICETOOL 5
No new posts Break a record into fields, each fiel... SYNCSORT 2
No new posts Need to read duplicate rows from tabl... DB2 3
No new posts VSAM Alter Command - Cylinder Extent ... JCL & VSAM 3
No new posts RPLDDDD field for extended VSAM - ESDS JCL & VSAM 0

Back to Top