|
View previous topic :: View next topic
|
| Author |
Message |
mvmadhuvenkatesh
New User
Joined: 18 Jun 2018 Posts: 3 Location: India
|
|
|
|
Hi,
I have an easy treive program running successfully for many years now in prod.
i pulled the easytrieve program to a changeman package compiled it and tried executing with RUN JCL i have from prod. it started giving PREMATURE END OF FILE .
At first i got a S30E abend.. i tried solving it looking at CA help site.
title: ABEND S30E AFTER RELEASE UPGRADE
Advantage CA-Easytrieve Plus is not downwardly compatible. When you compile
and linkedit an Advantage CA-Easytrieve program, you can execute it with
the same release level or higher. If you are getting an S30E abend,
you most likely have compiled and link edited the Advantage CA-Easytrieve
program using Advantage CA-Easytrieve Plus 6.4, but are executing that
program with Advantage CA-Easytrieve Plus 6.3 or lower.
This has never been supported by Advantage CA-Easytrieve, but now that
Advantage CA-Easytrieve Plus 6.4 is 31-bit, the S30E abend always occurs.
After solving this i get
B059 PREMATURE END OF FILE
An end-of-file was detected (on the source program input file) before CA-Easytrieve Plus could identify a valid program. Verify that the JCL statements that associate a data set with SYSIN (SYSIPT) are valid. This message is generated when a null source program is encountered.
Do I have to include any more load libraries in the jcl?
JCL i have used is below
| Code: |
//S100 EXEC PGM=PXXXXX,
// REGION=4096K,
// COND=(0,LT)
//STEPLIB DD DSN=P123L.BATCH.LOAD,
// DISP=SHR
// DD DSN=SYS1.EASYPLUS.LOADLIB,DISP=SHR
//QT001INN DD DSN=P123P.QT02A060.DDD.XML.RAP2,
// DISP=(OLD,KEEP,KEEP)
//*
//QP001UT DD DSN=123P.QP02A100.DDD.DL286EF,
// DISP=(NEW,CATLG,DELETE),
// SPACE=(9072,(700,100),RLSE),
// DCB=(RECFM=FBA,LRECL=81,BLKSIZE=9072)
//SORTWK01 DD SPACE=(CYL,1)
//SORTWK02 DD SPACE=(CYL,1)
//SORTWK03 DD SPACE=(CYL,1)
//EZTVFM DD SPACE=(9074,(5000,200))
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSOUTS DD SYSOUT=*
//ABNLNODP DD DUMMY
//SYSUDUMP DD SYSOUT=E
//SYSIN DD DUMMY
//*
|
The above jcl has been working ok in prod . when i did a fresh recompile of the program from changeman package, the same jcl gives errors.
I have tried searching the post in CA products forum here, but they are not matching my requirements. |
|
| Back to top |
|
 |
expat
Global Moderator

Joined: 14 Mar 2007 Posts: 8797 Location: Welsh Wales
|
|
|
|
Please learn to use the code tags - shown below - very quickly
| Code: |
| [code] your code in here [/code] |
Is the load module in either the STEPLIB or the system defined libraries. |
|
| Back to top |
|
 |
mvmadhuvenkatesh
New User
Joined: 18 Jun 2018 Posts: 3 Location: India
|
|
|
|
The load module for my easytrieve program is in STEPLIB
P123L.BATCH.LOAD. SYS1.EASYPLUS.LOADLIB was there from production. |
|
| Back to top |
|
 |
Nic Clouston
Global Moderator
Joined: 10 May 2007 Posts: 2454 Location: Hampshire, UK
|
|
|
|
| Why do you have a blank line in your JCL? thsat would generate a //SYSIN DD * which would override the one later on. |
|
| Back to top |
|
 |
mvmadhuvenkatesh
New User
Joined: 18 Jun 2018 Posts: 3 Location: India
|
|
|
|
that is only a typo error in the code pasted.. it is not a blank.. but a comment
| Code: |
//S100 EXEC PGM=PXXXXX,
// REGION=4096K,
// COND=(0,LT)
//STEPLIB DD DSN=P123L.BATCH.LOAD,
// DISP=SHR
// DD DSN=SYS1.EASYPLUS.LOADLIB,DISP=SHR
//*
//QT001INN DD DSN=P123P.QT02A060.DDD.XML.RAP2,
// DISP=(OLD,KEEP,KEEP)
//*
//QP001UT DD DSN=123P.QP02A100.DDD.DL286EF,
// DISP=(NEW,CATLG,DELETE),
// SPACE=(9072,(700,100),RLSE),
// DCB=(RECFM=FBA,LRECL=81,BLKSIZE=9072)
//SORTWK01 DD SPACE=(CYL,1)
//SORTWK02 DD SPACE=(CYL,1)
//SORTWK03 DD SPACE=(CYL,1)
//EZTVFM DD SPACE=(9074,(5000,200))
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSOUTS DD SYSOUT=*
//ABNLNODP DD DUMMY
//SYSUDUMP DD SYSOUT=E
//SYSIN DD DUMMY
//*
|
[/code] |
|
| Back to top |
|
 |
PeterHolland
Global Moderator

Joined: 27 Oct 2009 Posts: 2481 Location: Netherlands, Amstelveen
|
|
|
|
| Show the output of your compile and link run. |
|
| Back to top |
|
 |
|
|
 |
All times are GMT + 6 Hours |
|