Portal | IBM Manuals | Downloads | Products | Refer | Info | Programs | JCLs | Forum Rules*| Site Map | Mainframe CD 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index
 
Register
 
IBMMAINFRAMES.com - IBM Mainframe Support Forums Index FAQ Search Memberlist Usergroups 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 -> Interview Questions
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
References
Moved: Fri May 23, 2008 4:07 pm by William Thompson From Mainframe COBOL to Interview Questions
mmwife

Super Moderator


Joined: 30 May 2003
Posts: 1504

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: 1199
Location: At my desk

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: 1504

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
Display posts from previous:   
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> Interview Questions All times are GMT + 6 Hours
Page 1 of 1