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
 
Functions NOT supported in COBOL

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> Mainframe Interview Questions
View previous topic :: :: View next topic  
Author Message
Sukhmeet Singh

New User


Joined: 28 Dec 2007
Posts: 12
Location: kolkata

PostPosted: Fri May 23, 2008 4:04 pm    Post subject: Functions NOT supported in COBOL
Reply with quote

Which of the following is/are not supported by COBOL?

RBA addressing, Skip-sequential or replacing existing record.
Back to top
View user's profile Send private message

mmwife

Super Moderator


Joined: 30 May 2003
Posts: 1592

PostPosted: Fri May 23, 2008 8:16 pm    Post subject:
Reply with quote

RBA addressing and Skip sequential are only supported in CICS. I guess that's what he's getting at.
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: Fri May 23, 2008 8:36 pm    Post subject: Re: Functions NOT supported in COBOL
Reply with quote

The following are all out of the Enterprise COBOL for z/OS Programming Guide
hitler26 wrote:
RBA addressing

Use the RELATIVE KEY IS clause to associate each logical record with its relative record number.
Quote:
Skip-sequential

With dynamic access, you can switch between reading a specific record directly and reading records sequentially, by using READ NEXT for sequential retrieval and READ for random retrieval (by key).
Quote:
replacing existing record

Updating records in a VSAM file
Back to top
View user's profile Send private message
mmwife

Super Moderator


Joined: 30 May 2003
Posts: 1592

PostPosted: Sat May 24, 2008 12:16 am    Post subject:
Reply with quote

The 1st source you cited is for a relative RECORD read. CICS allows a relative BYTE address read. It gives the CICS coder the ability to access an ESDS rec randomly.

The 2nd is not the same as a "skip sequential" read. In CICS the RIDFLD of the read stmt allows the the key to be skipped for the next read without changing modes or the read stmt; just move the new key to the RIDFLD before the next exec of the read. They say that a performance improvement results provided the gaps in the skips are reasonably small.
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 -> Mainframe Interview Questions All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts IEW2456E error when link-editing a C ... Senthilraj JCL & VSAM 0 Fri Oct 13, 2017 3:12 pm
No new posts Assembler Macro Copybook converted to... Ziquilix PL/I & Assembler 4 Tue Sep 26, 2017 3:07 am
This topic is locked: you cannot edit posts or make replies. Extract all "IF" Statements... Adarsh Damodaran CLIST & REXX 1 Wed Sep 06, 2017 9:28 am
No new posts ALPHABETIC check in COBOL vidyaa COBOL Programming 8 Thu Aug 17, 2017 7:13 pm
No new posts XML Parse for COBOL 5.2 Bhanu Praveen COBOL Programming 1 Sat Jul 08, 2017 8:58 pm

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