Quantcast
Channel: IBM Mainframe Computers Forums
Viewing all articles
Browse latest Browse all 9405

JCL & VSAM :: RE: Several errors during building alternate index for KSDS file

$
0
0
Author: Andi1982
Posted: Tue Oct 18, 2016 6:08 pm (GMT 5.5)

Hey,

meanwhile we found the solution for our problem The buildindex failed because we did not allocate some File:

Code:

// DLBL IJSYSUC,'USER.CATALOG.SG$01C',,VSAM             


This IJSYSUC statement was missing. our build index step looks now like that and works fine:

Code:
* - - - - - - - - - - - - - - - - - - - - - - - - - - -           
* BUILD THE ALTERNATE INDEX, USING BLDINDEX                       
* - - - - - - - - - - - - - - - - - - - - - - - - - - -           
// DLBL IJSYSUC,'USER.CATALOG.SG$01C',,VSAM                       
/* DLBL TEMP,'DB.ONLINE.WAREN.RUECKST.REORG',,VSAM,CAT=UCT$01C   
/* DLBL TAIX,'DB.ONLINE.WAREN.RUECKST.REORG.AIX',,VSAM,CAT=UCT$01C
// EXEC IDCAMS,SIZE=AUTO                                         
       BLDINDEX -                                                 
              INDATASET(DB.ONLINE.WAREN.RUECKST.REORG ) -         
              OUTDATASET(DB.ONLINE.WAREN.RUECKST.REORG.AIX ) -   
              CATALOG (USER.CATALOG.SG$01C)                       
/*                                                               



other problem was the record length of the aix file. we just gave RECSZ (200 200). It was to less. the alternate key was 9 byte and the primary key has already 42 byte. With 1500 possible duplicates it was way to small. So we raised RECSZ to (4086 65615) and all alternate-keys could be build.

And the last problem was our JCL in cobol program. The File was defined like that:


Code:
// DLBL WERUECK,'DB.ONLINE.WAREN.RUECKST.REORG',,VSAM,CAT=UCT$01C     


we had to do like that to make it working:

Code:
// DLBL WERUEK,'DB.ONLINE.WAREN.RUECKST.REORG',,VSAM,CAT=UCT$01C     
// DLBL WERUEK1,'DB.ONLINE.WAREN.RUECKST.REORG.PATH',,VSAM,CAT=UCT$01C


Problem was that dd names can be max 7 chars. And we needed to DLBL the PATH file to the AIX with some '1' at the end.

Hope this will anytime help to somebody.
_________________
Working on a IBM Z9BC
z/VSE 4.1.0
CICS/VSE 2.3.0
z/VM 5.3


Viewing all articles
Browse latest Browse all 9405

Trending Articles