Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

IGZ0035S Error

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming
View previous topic :: :: View next topic  
Author Message
Crunch

New User


Joined: 27 Jan 2010
Posts: 17
Location: Louisville, Ky

PostPosted: Tue Feb 16, 2010 1:31 am    Post subject: IGZ0035S Error
Reply with quote

Ok.. I've searched all morning for an answer to my problem with no luck. I'm getting this error:

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/ceea9150/7.30?SHELF=&DT=20040714145631&

Job output:

An error occurred when opening or closing a file.

An attempt to OPEN the non-optional file VSAMEXT failed because the
file was not present. Probable causes include:

My real question is, where is this VSAMEXT file getting pulled from? My job is pretty simple and uses NO VSAM whatsoever. Nor do I have any files named VSAMEXT.

Thanks for any suggestions....
Back to top
View user's profile Send private message

Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 7909
Location: Bellevue, IA

PostPosted: Tue Feb 16, 2010 2:01 am    Post subject:
Reply with quote

Line 371 of your code?

What do you expect when you don't show us JCL, don't show us FILE SECTION, don't show us anything to actually diagnose the problem? Is this a pure vanilla COBOL compile, or are you using a precompiler?
Back to top
View user's profile Send private message
Crunch

New User


Joined: 27 Jan 2010
Posts: 17
Location: Louisville, Ky

PostPosted: Tue Feb 16, 2010 2:12 am    Post subject:
Reply with quote

JCL:
Code:
//*                                               
//RAYA01 SET DB2R=DDB3                           
//RAYA02 SET ENV=TEST.N082                       
//RAYA03 SET SSID=DDB3                           
//RAYA04 SET CREG=TESTA5                         
//*                                               
//RRDDRCHG EXEC DB2COBOL,                         
//             SSID=&DB2R,                       
//             NODE='TESTDRM',                   
//             PRJ='N082',                       
//             PROG='N0829RDC',                   
//             PLAN='N0829RDC',                   
//             PRM='CONVERT',                     
//*            PRM1='ROLLBACK',                   
//             REGION=6M                         
//RUNDB2.STEPLIB  DD                             
//         DD                                     
//         DD  DSN=TEST.N082.LOADLIB,DISP=SHR     
//SYSPRINT DD  SYSOUT=*                           
//SYSOUT   DD  SYSOUT=*                           
//N082RCHG DD  DISP=SHR,DSN=&ENV..REG.DIS.CHANGES
//N082CTL  DD  DISP=SHR,DSN=&ENV..REG.DIS.CTLCARD
//*     

File Secton:

Code:
FILE SECTION.                   
                                 
FD  NS-REALIGN                   
    RECORD CONTAINS 50 CHARACTERS
    RECORDING MODE F             
    LABEL RECORDS ARE STANDARD. 
                                 
01  NATIONAL-SLIC-REALIGNMENT.   
    05  NS-SLC-NR      PIC X(5).
    05  FILLER         PIC X(2).
    05  NS-SLC-NA      PIC X(5).
    05  FILLER         PIC X(2).
    05  NS-CNY-CD      PIC X(2).
    05  FILLER         PIC X(2).
    05  NS-REG-OLD     PIC X(2).
    05  FILLER         PIC X.   
    05  NS-DIS-OLD     PIC X(2).
    05  FILLER         PIC X(4).
    05  NS-REG-NEW     PIC X(2).
    05  FILLER         PIC X.   
    05  NS-DIS-NEW     PIC X(2).
    05  FILLER         PIC X(18).
                                 
                                 
FD  RD-CONTROL-CARDS             
    RECORD CONTAINS 80 CHARACTERS
    RECORDING MODE F             
    LABEL RECORDS ARE STANDARD. 
                                 
01  RD-CONTROL-CARD.             
    05  CTL-CARD       PIC X(7).
    05  FILLER         PIC X(73).

Dataset Info:
Code:

Data Set Name . . . . : TEST.N082.REG.DIS.CHANGES                       
                                                                         
General Data                           Current Allocation               
 Management class . . : STNDML1         Allocated tracks  . : 12         
 Storage class  . . . : SCBASE          Allocated extents . : 1         
  Volume serial . . . : DVL294                                           
  Device type . . . . : 3390                                             
 Data class . . . . . : **None**       Current Utilization               
  Organization  . . . : PS              Used tracks . . . . : 1         
  Record format . . . : FB              Used extents  . . . : 1         
  Record length . . . : 50                                               
  Block size  . . . . : 27950                                           
  1st extent tracks . : 12                                               
  Secondary tracks  . : 5                                               
  Data set name type  :                 SMS Compressible  :   NO         
                                                                         
  Creation date . . . : 2010/02/15      Referenced date . . : 2010/02/15
  Expiration date . . : ***None***                                       
     
         
Data Set Name . . . . : TEST.N082.REG.DIS.CTLCARD                       
                                                                         
General Data                           Current Allocation               
 Management class . . : STNDML1         Allocated blocks  . : 2         
 Storage class  . . . : SCBASE          Allocated extents . : 1         
  Volume serial . . . : LRG160                                           
  Device type . . . . : 3390                                             
 Data class . . . . . : **None**       Current Utilization               
  Organization  . . . : PS              Used blocks . . . . : 1         
  Record format . . . : FB              Used extents  . . . : 1         
  Record length . . . : 80                                               
  Block size  . . . . : 27920                                           
  1st extent blocks . : 2                                               
  Secondary blocks  . : 2                                               
  Data set name type  :                 SMS Compressible  :   NO         
                                                                         
  Creation date . . . : 2010/02/15      Referenced date . . : 2010/02/15
  Expiration date . . : ***None***

I'm using the ISPF compile panels...
Back to top
View user's profile Send private message
Crunch

New User


Joined: 27 Jan 2010
Posts: 17
Location: Louisville, Ky

PostPosted: Tue Feb 16, 2010 2:26 am    Post subject:
Reply with quote

Compile options:

Code:
NOADV   APOST   DATA 31 NODECK  NODUMP  DYNAM   FASTSRT         
LIB     LIST    MAP     NONUM   OBJECT  NOOFFST NOOPT   DFLT DD
NMPRMIG RENT            NOSEQ   SIZE(N) SOURCE  NOSSRNG NOTERM 
NOTEST  TRNCBIN NOWORD  NOVBREF XREF    ZWB     NONAME         
NMCLPRI NODBCS  AWO                                             
NOCURRENCY      INTDATE ANSI            NODLL   NOEXP           
ARITH(COMPAT)   NOTHREAD
Back to top
View user's profile Send private message
Crunch

New User


Joined: 27 Jan 2010
Posts: 17
Location: Louisville, Ky

PostPosted: Tue Feb 16, 2010 3:17 am    Post subject: Reply to: IGZ0035S Error
Reply with quote

One other thing. When I step through the program with Xpediter, it executes both OPEN and CLOSE statements with no problem. When I try to execute the program by itself, it gets the IGZ0035S error. I just found this to be odd.. maybe someone else has had a similar issue.. Thanks!!

Just to clarify... when I execute the program with Xpediter, it runs successfuly to the end of the program.
Back to top
View user's profile Send private message
Crunch

New User


Joined: 27 Jan 2010
Posts: 17
Location: Louisville, Ky

PostPosted: Tue Feb 16, 2010 3:40 am    Post subject: Reply to: IGZ0035S Error
Reply with quote

Code:

FILE-CONTROL.                                                   
                                                                 
*************************************************************
*                  I N P U T    F I L E                          *
*************************************************************
                                                                 
     SELECT NS-REALIGN                ASSIGN  TO N082RCHG         
       ACCESS MODE IS SEQUENTIAL                                 
       FILE STATUS IS REALIGN-STATUS.                             
                                                                 
     SELECT RD-CONTROL-CARDS          ASSIGN  TO N082CTL         
       ACCESS MODE IS SEQUENTIAL                                 
       FILE STATUS IS CTLCARD-STATUS.
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Tue Feb 16, 2010 3:45 am    Post subject:
Reply with quote

Hello and welcome to the forum,

It will help us help you if you become familiar/comfortable with the "Code" tag. This preserves alignment and improves readability.

Is there any chance that there is a library concatenation out-of-sync? Could the code being Xpedited not be the same that is executed when the failure occurs? Is VSAMEXT a file used by some commonly called routine?
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 7909
Location: Bellevue, IA

PostPosted: Tue Feb 16, 2010 3:58 am    Post subject:
Reply with quote

What does the Xpediter procedure expansion look like at your site -- any chance there's a VSAMEXT DD name included in it?

This sounds like there's something site-specific (maybe for extended VSAM files?) that may require you talking to your site support group to get answers on.
Back to top
View user's profile Send private message
Crunch

New User


Joined: 27 Jan 2010
Posts: 17
Location: Louisville, Ky

PostPosted: Tue Feb 16, 2010 4:43 am    Post subject: Reply to: IGZ0035S Error
Reply with quote

I checked the Xpediter log to verify the loadlib being used.. It's the same as what I have specified in the JCL. As far as any other called modules inside of my program, there are none. I'll have to check the library concatenation and the Xpediter procedure.

I appreciate the help.. sorry for being a noob....
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Tue Feb 16, 2010 5:45 am    Post subject:
Reply with quote

Hello,

Quote:
I appreciate the help.. sorry for being a noob....
You're welcome - and not to worry, we all were once icon_smile.gif

As an experiment you might put a guaranteed unique DISPLAY in the program (as the first executable instruction) and make sure that this display is shown both in Xpediter and without. . .

Even if the loadlib looks correct, there may be another module with the same name earlier in the concatenation.
Back to top
View user's profile Send private message
Anuj Dhawan

Senior Member


Joined: 22 Apr 2006
Posts: 6258
Location: Mumbai, India

PostPosted: Tue Feb 16, 2010 4:11 pm    Post subject:
Reply with quote

Crunch,

Your JCL is using a lot of "SET" variables* - have you had a look at the expanded JCL in JESJCL DD of your job - I'm pretty sure the error has something to do with the parameters you include in your JCL execution. As a programmer, your program has no flaws so far...icon_smile.gif

* - those SET variables, probably have something to do with parameterizing the jobs for different environments. I've nearly similar set-up at my current shop and ran into such errors couple of times...on a personal note I don't like such experiments with system.
Back to top
View user's profile Send private message
Crunch

New User


Joined: 27 Jan 2010
Posts: 17
Location: Louisville, Ky

PostPosted: Tue Feb 16, 2010 6:38 pm    Post subject:
Reply with quote

Anuj,

I removed all of the SET variables and re-ran the job. It abended with the same error. You are correct about the set up for different environments. I looked at the JESJCL in my output and did not see anything out of the ordinary. I did submit a request to the folks that support our installation so they can rule out any "site specific" problems.

Thanks again for all the help..
Back to top
View user's profile Send private message
Anuj Dhawan

Senior Member


Joined: 22 Apr 2006
Posts: 6258
Location: Mumbai, India

PostPosted: Tue Feb 16, 2010 6:50 pm    Post subject:
Reply with quote

Good Luck, keep us posted when you progress...icon_smile.gif
Back to top
View user's profile Send private message
Crunch

New User


Joined: 27 Jan 2010
Posts: 17
Location: Louisville, Ky

PostPosted: Tue Feb 16, 2010 7:53 pm    Post subject:
Reply with quote

Ok,

I figured it out with a second pair of eyes at my shop. In the previous JCL, I had PROG and PLAN names coded for the JOB name, not the program name... icon_redface.gif



Code:
***************************** Top of Data ******************************
//N0829RDC  JOB (T082,F322),'RR/DD',MSGLEVEL=(1,1),CLASS=U,             
//      MSGCLASS=X,REGION=4096K,NOTIFY=&SYSUID                         
//*                                                                     
//*AYA01 SET DB2R=DDB3                                                 
//*AYA02 SET ENV=TEST.N082                                             
//*AYA03 SET SSID=DDB3                                                 
//*AYA04 SET CREG=TESTU5                                               
//*                                                                     
//RRDDRCHG EXEC DB2COBOL,                                               
//             SSID=DDB3,                                               
//             NODE='TESTDRM',                                         
//             PRJ='N082',                                             
//             PROG='N082RCHG',                                         
//             PLAN='N082RCHG',                                         
//             PRM='CONVERT',                                           
//*            PRM1='ROLLBACK',                                         
//             REGION=6M                                               
//RUNDB2.STEPLIB  DD                                                   
//         DD                                                           
//         DD  DSN=TEST.N082.LOADLIB,DISP=SHR                           
//SYSPRINT DD  SYSOUT=*                                                 
//SYSOUT   DD  SYSOUT=*                                                 
//N082RCHG DD  DISP=SHR,DSN=TEST.N082.REG.DIS.CHANGES                   
//*082RCHG DD  DISP=SHR,DSN=&ENV..REG.DIS.CHANGES                       
//N082CTL  DD  DISP=SHR,DSN=TEST.N082.REG.DIS.CTLCARD                   
//*082CTL  DD  DISP=SHR,DSN=&ENV..REG.DIS.CTLCARD                       
//*                                                                     
**************************** Bottom of Data ****************************


It ran like a champ!!!! Thanks for the input everyone!!
Back to top
View user's profile Send private message
Anuj Dhawan

Senior Member


Joined: 22 Apr 2006
Posts: 6258
Location: Mumbai, India

PostPosted: Tue Feb 16, 2010 8:04 pm    Post subject:
Reply with quote

Code:
//             PROG='N082RCHG',                                         
//             PLAN='N082RCHG',                   
Glad to hear you got it working..icon_smile.gif
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 -> COBOL Programming All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts S922 Error yuvan ABENDS & Debugging 3 Fri Dec 02, 2016 6:58 pm
No new posts Invoke Webservice Fails with DFHPI100... divated CICS 2 Thu Nov 24, 2016 5:57 pm
No new posts Error during restore rename archanamuthukrishnan All Other Mainframe Topics 2 Fri Oct 14, 2016 3:30 pm
No new posts Error IEC161I 052(009,XXXRS00)-084 wh... amitc23 JCL & VSAM 10 Wed Oct 12, 2016 5:00 pm
No new posts IDMS/DC-COBOL program - SNAP error wh... rakeshsekar1987 IDMS/ADSO 5 Tue Sep 13, 2016 8:28 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us