Is your base cluster loaded?  From IDC3351I:

 

160 

The operands specified in the ACB or GENCB macro are inconsistent with each
other or with the information in the catalog record. 

This error can also occur when the VSAM cluster being opened is empty.

 

 

 

 

Larry Crilley

Dino Software, Corp.

http://www.dino-software.com/

412.734.2853

 

 

-----Original Message-----
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf
Of Carol Srna
Sent: Monday, January 08, 2007 9:07 AM
To: [email protected]
Subject: IDC3351I ** VSAM OPEN RETURN CODE IS 160

 

Hello ALL.

I need help figuring out what is wrong with the BLDINDEX portion of my job. 

The error message(s) is in the Subject line.  These are the control 

statements:

 DEFINE AIX                                           - 

        (NAME(PFLCV.PROD0.C19GROUP)                   - 

         RELATE(PFLCV.PROD0.C19BRNCH)                 - 

         VOLUME(PRD012)                               - 

         NONUNIQUEKEY                                 - 

         UPGRADE                                      - 

         SHAREOPTIONS(2 3))                           - 

 DATA                                                 - 

        (NAME(PFLCV.PROD0.C19GROUP.DATA)              - 

         TRK(75,25)                                   - 

         CISZ(8192)                                   - 

         FREESPACE(10 10)                             - 

         KEYS(6 8)                                    - 

         RECORDSIZE(19 8187)                          - 

         SPEED)                                       - 

INDEX                                                - 

       (NAME(PFLCV.PROD0.C19GROUP.INDEX)             - 

        TRK(15,15)                                   - 

        CISZ(4096))                                    

                                                       

BLDINDEX  INDATASET(PFLCV.PROD0.C19BRNCH)            - 

         OUTDATASET(PFLCV.PROD0.C19GROUP)              

                                                       

DEFINE PATH                                          - 

       (NAME(PFLCV.PROD0.C19GXREF)                   - 

        PATHENTRY(PFLCV.PROD0.C19GROUP)              - 

        UPDATE)                                        

                                                       

 DEFINE AIX                                           - 

        (NAME(PFLCV.PROD0.C19BNAME)                   - 

         RELATE(PFLCV.PROD0.C19BRNCH)                 - 

         VOLUME(PRD012)                               - 

         NONUNIQUEKEY                                 - 

         UPGRADE                                      - 

         SHAREOPTIONS(2 3))                           - 

 DATA                                                 - 

        (NAME(PFLCV.PROD0.C19BNAME.DATA)              - 

         TRK(75,25)                                   - 

         CISZ(8192)                                   - 

         FREESPACE(10 10)                             - 

         KEYS(30 14)                                  - 

         RECORDSIZE(43 8187)                          - 

         SPEED)                                       - 

 INDEX                                                - 

        (NAME(PFLCV.PROD0.C19BNAME.INDEX)             - 

         TRK(15,15)                                   - 

         CISZ(4096))                                  - 

                                                        

 BLDINDEX  INDATASET(PFLCV.PROD0.C19BRNCH)            - 

          OUTDATASET(PFLCV.PROD0.C19BNAME)              

                                                        

 DEFINE PATH                                          - 

        (NAME(PFLCV.PROD0.C19BXREF)                   - 

         PATHENTRY(PFLCV.PROD0.C19BNAME)              - 

         UPDATE)                                        

 

Thanks In Advance

 

----------------------------------------------------------------------

For IBM-MAIN subscribe / signoff / archive access instructions,

send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO

Search the archives at http://bama.ua.edu/archives/ibm-main.html


----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html

Reply via email to