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
 
VSAM ESDS or RRDS

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
rakesh.psnvnk
Currently Banned

New User


Joined: 12 Jun 2010
Posts: 3
Location: HYDERABAD

PostPosted: Thu Sep 30, 2010 11:50 pm    Post subject: VSAM ESDS or RRDS
Reply with quote

can i overwrite (not append) records of same length in esds or in rrds vsam.
Back to top
View user's profile Send private message

superk

Moderator Team Head


Joined: 26 Apr 2004
Posts: 4650
Location: Raleigh, NC, USA

PostPosted: Fri Oct 01, 2010 12:01 am    Post subject: Reply to: VSAM ESDS or RRDS
Reply with quote

Yes, of course.
Back to top
View user's profile Send private message
Bill O'Boyle

CICS Moderator


Joined: 14 Jan 2008
Posts: 2504
Location: Atlanta, Georgia, USA

PostPosted: Fri Oct 01, 2010 12:58 am    Post subject: Reply to: VSAM ESDS or RRDS
Reply with quote

If this is BATCH and you're attempting a direct READ on an ESDS record, using a specific RBA/XRBA, with intent on updating (or not), this can ONLY be done in ASSEMBLER.

However, for CICS/ESDS access, this can be done (regardless of the language) using the CICS FILE API's.

I can't speak for RRDS processing, due to limited exposure....

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

Moderator Team Head


Joined: 26 Apr 2004
Posts: 4650
Location: Raleigh, NC, USA

PostPosted: Fri Oct 01, 2010 1:11 am    Post subject: Reply to: VSAM ESDS or RRDS
Reply with quote

Was I wrong? I thought COBOL supports a REWRITE for any of the VSAM formats, providing that they're opened in the correct (I-O) mode?
Back to top
View user's profile Send private message
Bill O'Boyle

CICS Moderator


Joined: 14 Jan 2008
Posts: 2504
Location: Atlanta, Georgia, USA

PostPosted: Fri Oct 01, 2010 1:58 am    Post subject: Reply to: VSAM ESDS or RRDS
Reply with quote

Kevin,

Even in Enterprise COBOL 4.2, the ability to issue a Batch ESDS direct READ (via an RBA/XRBA) is not supported. I would have thought by now, it would be part of the language?

I'm sure you can sequentially read records until you reach the one you need, but in a large file, this could take a while as you'd need to identify record-criteria after each READ as the associated RBA/XRBA is unknown to COBOL.

IIRC, there's a way around this by defining the ESDS Base Cluster with an alternate index, but CRS has set in and I my recall factor has very much diminished. icon_redface.gif

Maybe Batch RBA direct READ's can be done in Enterprise PL/I icon_question.gif

Somebody else probably knows the alternate index trick for COBOL.... icon_wink.gif

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

Global Moderator


Joined: 03 Oct 2009
Posts: 1786
Location: Bloomington, IL

PostPosted: Fri Oct 01, 2010 2:41 am    Post subject: Re: Reply to: VSAM ESDS or RRDS
Reply with quote

Bill O'Boyle wrote:
Maybe Batch RBA direct READ's can be done in Enterprise PL/I icon_question.gif

Don't think so, although if your records are of fixed length you could kludge up a record number as FLOOR(RBA/record_length)+1
Back to top
View user's profile Send private message
Bill O'Boyle

CICS Moderator


Joined: 14 Jan 2008
Posts: 2504
Location: Atlanta, Georgia, USA

PostPosted: Fri Oct 01, 2010 3:00 am    Post subject: Reply to: VSAM ESDS or RRDS
Reply with quote

Yes, you could take a SWAG at building an RBA/XRBA, but if the given HLL can't (under the covers), infiltrate the given ACB/RPL, you're back to square one.... icon_wink.gif

The Enterprise COBOL for z/OS V4.2 Programming Guide (SC23-8529-01), section "1.10.2.4 Specifying access modes for VSAM files", states -

Quote:

You can access records in VSAM sequential files only sequentially. You can access records in VSAM indexed and relative files in three ways: sequentially, randomly, or dynamically.

Unless I'm interpreting this incorrectly, ESDS Direct READ's by RBA/XRBA, of the Base Cluster, are not supported.

One would have to assume that after all these years, this ability would be supported <sigh>? icon_sad.gif

Bill
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 -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts IDCAMS RENAMING VSAM FILE ALONG WITH ... upendrasri JCL & VSAM 11 Tue Apr 17, 2018 10:42 pm
No new posts VSAM file NOT Found error while proce... SumaReva CICS 5 Wed Apr 11, 2018 9:54 pm
No new posts VSAM - Accessing beyond record size Benchwarmer JCL & VSAM 6 Wed Apr 11, 2018 9:20 pm
No new posts VSAM File free space sancraig16 JCL & VSAM 13 Fri Mar 30, 2018 1:02 am
No new posts VSAM BUFFER SPACE? John Poulakos CICS 17 Thu Mar 22, 2018 2:54 am

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