Focal Point Banner
Community Center Education Summit Technical Support User Groups
Let's Get Social!

Facebook Twitter LinkedIn YouTube
Focal Point    Focal Point Forums  Hop To Forum Categories  WebFOCUS/FOCUS Forum on Focal Point     [CLOSED] Describing a VSAM RRDS File ( SIGA Environment by CGI)
Go
New
Search
Notify
Tools
Reply
  
[CLOSED] Describing a VSAM RRDS File ( SIGA Environment by CGI)
 Login/Join
 
Platinum Member
posted
Bonjour,
For the first time in my life, I cross the path of VSAM RRDS files (and not my old friends VSAM KSDS).
The FIX Master built for the OutPut of such a file delivered by IDCAMS REPRO is all right.
So, I make a small change to get a VSAM MFD :
FILE=SIG3MVK, SUFFIX=VSAM, $      
SEGNAME=ROOT, SEGTYPE=S0,$      
GROUP=MV_CLERDS,ALIAS=KEY,USAGE=A04,ACTUAL=A04,$
$ CLE DU VSAM RDS (A04)
FIELD=MV_NUMENR,ALIAS=   ,USAGE=I04,ACTUAL=I04,$
$ RANG DANS LE FICHIER 

And the answer I get is
[CODE]
(FOC1016) DESCRIPTION DE CLE INVALIDE DANS LE FICHIER MASTER - : SIG3MVK
(FOC1129) ERREUR VSAM : SIG3MVK/LOGICAL ERROR CODE 192
( WHEN 192 DISPLAY 'INVALID RELATIVE REC NUMBER' )
/CODE]

This message has been edited. Last edited by: Kerry,


Focus Mainframe 7.6.11
Dev Studio 7.6.11 and !!!
PC Focus, Focus for OS/2, FFW Six, MSO
 
Posts: 134 | Registered: November 06, 2007Reply With QuoteReport This Post
Platinum Member
posted Hide Post
Sorry, I forgot to precise that the Key started From 1 (in Actual I04)


Focus Mainframe 7.6.11
Dev Studio 7.6.11 and !!!
PC Focus, Focus for OS/2, FFW Six, MSO
 
Posts: 134 | Registered: November 06, 2007Reply With QuoteReport This Post
Platinum Member
posted Hide Post
Google helped me through IBI doc : and, worst luck :
Only ESDS and KSDS data sources are supported. If you want to retrieve data from RRDS VSAM data sources, you may code your own access routine using SUFFIX=PRIVATE.
See Appendix C, User Exits for a Non-FOCUS Data Source for details.
This brings me decade backwards. I used to know how to with PL/1, but we're back in Cobol World! Is there any Cobol skeleton for accessing a RRDS file through SUFFIX=PRIVATE
Cordially and Focusely


Focus Mainframe 7.6.11
Dev Studio 7.6.11 and !!!
PC Focus, Focus for OS/2, FFW Six, MSO
 
Posts: 134 | Registered: November 06, 2007Reply With QuoteReport This Post
  Powered by Social Strata  
 

Focal Point    Focal Point Forums  Hop To Forum Categories  WebFOCUS/FOCUS Forum on Focal Point     [CLOSED] Describing a VSAM RRDS File ( SIGA Environment by CGI)

Copyright © 1996-2018 Information Builders, leaders in enterprise business intelligence.