View previous topic :: View next topic
Author
Message
ramfrom84 New User Joined: 23 Aug 2006Posts: 93 Location: chennai
Hi All,
While running Easy trieve program , we are getting S30E abenD , WE COMPILE the easytrieve program and running , Can anybody come across this issue..
Error Message:
No active module found , But we have module in th eload library...
Back to top
dick scherrer Moderator Emeritus Joined: 23 Nov 2006Posts: 19244 Location: Inside the Matrix
Hello,
Please post your jcl and the complete diagnostic info - use copy/paste rather than selectively entering parts of it. When posting the jcl, please use the "Code" tag near the top of the Reply panel. This will preserve alignment as well as make the post much more readable.
When you are preparing your eply, you can use "Preview" to see your post as it will appear to the forum, rather than the way it looks in the editor. When you are satisfied with the way your post appears, click "Submit".
Back to top
rrlogu Warnings : 1 New User Joined: 13 Sep 2006Posts: 13
Hi,
I am also getting the same error
JCL
//XXXXXXX EXEC PGM=PGM0001
//STEPLIB DD DSN=XXX.YYY.ZZZ,DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSLST DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSDUMP DD SYSOUT=*
//SYSPUNCH DD DUMMY
//SYSABOUT DD SYSOUT=*
//SYSDBOUT DD SYSOUT=*
//ABENDAID DD SYSOUT=*
//INFILE1 DD PSFILE1,DISP=SHR
//OUTFILE1 DD PSFILE2,DISP=SHR
while executing i am getting S30E - "NO ACTIVE MODULE FOUND". But the PGM0001 is present in XXX.YYY.ZZZ.
I didn't get any error / warning at the time of compilation.
If i execute the same source via PGM=EZTPA00 then the JCL is working fine.
Let me know if you want anyother information.
Thanks,
Logu.
Back to top
dick scherrer Moderator Emeritus Joined: 23 Nov 2006Posts: 19244 Location: Inside the Matrix
Hello,
As i posted to the previous requestor. . . . Post the complete disgnostic info.
Please post the compile/linkedit jcl. It will probably help if you post the end of the compile and the linkedt output also.
Back to top
Terry Heinze JCL Moderator Joined: 14 Jul 2008Posts: 1249 Location: Richfield, MN, USA
An S30E does not say "No active module found" in the MVS System Codes manual I'm looking at. Have you looked up that code?
Back to top
dick scherrer Moderator Emeritus Joined: 23 Nov 2006Posts: 19244 Location: Inside the Matrix
Hi Terry,
When/if Logu posts the requested info, we may be able to help. . .
As so often happens, problem statements are incomplete or incorrect. . .
Back to top
chandrarkar New User Joined: 27 May 2008Posts: 24 Location: india
you can use the code as below
Code:
//ABC123 EXEC PGM=CHECKCC,PARM='PGMN=PGM1ABC,ABEND=0001'
PGM1ABC is the Easytrieve prog which u want to have included. Its being passes as a parm to CHECKCC which is an utility.
regards
teja
Back to top
dick scherrer Moderator Emeritus Joined: 23 Nov 2006Posts: 19244 Location: Inside the Matrix
Hello teja,
What will your suggestion provide?
What is CHECKCC - some local utility? It is not standard.
When posting a suggestion, it is a good idea to explain what following the suggestion might accomplish.
Back to top
rrlogu Warnings : 1 New User Joined: 13 Sep 2006Posts: 13
Hi,
Following is the compile JCL.
JCL
Code:
-------------------
//EZTCOMP EXEC EZTCOMP2,
// MACROS='A.B.C',
// EZTLINK='X.Y.LINKLIB'
//SYSIN DD *
PARM LINK(PGM0001 R) SQLSYNTAX NONE
/*
// DD DSN=X.Y.Z(PGM0001),DISP=SHR
PROC
Code:
-------------------
//EZTCOMP PROC MACROS='A.B.C',
// EZTLINK='X.Y.LINKLIB'
//EZTPLUS EXEC PGM=EZTPA00
//MACRO DD DISP=SHR,DSN=&MACROS
// DD DISP=SHR,DSN=X.UNT.MLBS.EZPMACRO
// DD DISP=SHR,DSN=X.AIT.MLBS.EZPMACRO
// DD DISP=SHR,DSN=X.HOT.MLBS.EZPMACRO
// DD DISP=SHR,DSN=X.CST.MLBS.EZPMACRO
// DD DISP=SHR,DSN=X.PROD.MLBS.EZPMACRO
// DD DISP=SHR,DSN=X.PROD.EZPMACRO
//SYSPRINT DD SYSOUT=*
//SYSLIN DD DISP=(NEW,PASS),DSN=&&SYSLIN,
// UNIT=SYSDA,
// DCB=(BLKSIZE=3120,LRECL=80,RECFM=FB),
// SPACE=(3120,(100,50),RLSE)
//GENDATA DD DISP=(NEW,PASS),DSN=&&EZTCOMP,
// UNIT=SYSDA,
// DCB=(BLKSIZE=3120,LRECL=80,RECFM=FB),
// SPACE=(3120,(100,50),RLSE)
//EZTVFM DD UNIT=SYSDA,SPACE=(CYL,(1,5))
//*
//LKEDEZT EXEC PGM=IEWL,COND=(0,NE,EZTPLUS)
//SYSPRINT DD SYSOUT=*
//SYSLIN DD DISP=(OLD,DELETE),DSN=&&SYSLIN
//SYSLMOD DD DISP=SHR,DSN=&EZTLINK
//SYSUT1 DD UNIT=SYSDA,SPACE=(CYL,(1,5))
After compilation load module is present in the X.Y.LINKLIB. while using that its giving S30E problem.
Thanks,
Logu.
Back to top
dick scherrer Moderator Emeritus Joined: 23 Nov 2006Posts: 19244 Location: Inside the Matrix
Hello,
That's a start. . .
Quote:
It will probably help if you post the end of the compile and the linkedt output also
Now, it would be good to post the rest of the info.
Also, please post the complete diagnostic info from the abended run.
Back to top
Please enable JavaScript!