Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
CICS read error with EIBRESP 10 and EIBRESP2 37

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CICS
View previous topic :: :: View next topic  
Author Message
ramvivek

New User


Joined: 23 Oct 2006
Posts: 13

PostPosted: Tue Aug 14, 2007 12:49 pm    Post subject: CICS read error with EIBRESP 10 and EIBRESP2 37
Reply with quote

My CICS code has the following piece of code :

EXEC CICS HANDLE CONDITION
DSIDERR(FILE-OPEN-ERROR)
NOTFND(RECORD-NOT-FOUND)
NOTOPEN(FILE-NOT-OPEN)
DISABLED(FILE-NOT-OPEN)
LOCKED(DEADLOCK-ERR)
RECORDBUSY(DEADLOCK-ERR)
END-EXEC.

EXEC CICS READ
DATASET(CAGE-MASTER-FILE)
INTO(CAGE-CONTROL-RECORD)
LENGTH(CAG-REC-LEN)
RIDFLD(CAGE-KEY)
UPDATE
NOSUSPEND
END-EXEC.

The CICS READ is issuing a invalid req with EIBRESP 10 and EIBRESP2 37. If I remove NOSUSPEND, then its working fine. What could be the reason and how can we resolve this ?

Thanks,
Ram.
Back to top
View user's profile Send private message

William Thompson

Global Moderator


Joined: 18 Nov 2006
Posts: 3158
Location: Tucson AZ

PostPosted: Tue Aug 14, 2007 2:30 pm    Post subject:
Reply with quote

Interesting.....
Are the resp and resp2 decimal or hex values?
Is the file RLS?
Back to top
View user's profile Send private message
ramvivek

New User


Joined: 23 Oct 2006
Posts: 13

PostPosted: Tue Aug 14, 2007 2:40 pm    Post subject: Re: CICS read error with EIBRESP 10 and EIBRESP2 37
Reply with quote

values are in decimal;

the file is VSAM file. What is RLS file ?
Back to top
View user's profile Send private message
William Thompson

Global Moderator


Joined: 18 Nov 2006
Posts: 3158
Location: Tucson AZ

PostPosted: Tue Aug 14, 2007 3:04 pm    Post subject:
Reply with quote

Since NOSUSPEND is for Record Level Sharing only:
NOSUSPEND (RLS only)
The request does not wait if the record is locked by VSAM with an active lock, including records locked as the result of a DEADLOCK.

why are you specifying it?
Back to top
View user's profile Send private message
ramvivek

New User


Joined: 23 Oct 2006
Posts: 13

PostPosted: Tue Aug 14, 2007 3:15 pm    Post subject: Re: CICS read error with EIBRESP 10 and EIBRESP2 37
Reply with quote

sorry, the response values are in HEX.

I am using the NOSUSPEND option to resolve a deadlock between the records being updated by 2 diff transactions.

-- Ram.
Back to top
View user's profile Send private message
William Thompson

Global Moderator


Joined: 18 Nov 2006
Posts: 3158
Location: Tucson AZ

PostPosted: Tue Aug 14, 2007 3:50 pm    Post subject: Re: CICS read error with EIBRESP 10 and EIBRESP2 37
Reply with quote

ramvivek wrote:
sorry, the response values are in HEX.
That makes even less sense, INVREQ is a X'10'....
Quote:
I am using the NOSUSPEND option to resolve a deadlock between the records being updated by 2 diff transactions.
Is the file RLS?
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 -> CICS All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Assembler Macro Copybook converted to... Ziquilix PL/I & Assembler 4 Tue Sep 26, 2017 3:07 am
No new posts FUSE - IBM MQ - CICS integration error Kevin Vaz CICS 1 Mon Sep 18, 2017 4:31 pm
No new posts how to see when the last read access ... Mike 1304 DB2 1 Tue Sep 12, 2017 7:52 pm
No new posts Reply MQ open error Vignesh Sid COBOL Programming 6 Thu Sep 07, 2017 6:02 pm
No new posts Error in SQL-PLIST3 'Above value tru... rikdeb DB2 4 Wed Sep 06, 2017 1:34 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us