IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

S30E abend while running Easytrieve program.


IBM Mainframe Forums -> CA Products
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
ramfrom84

New User


Joined: 23 Aug 2006
Posts: 93
Location: chennai

PostPosted: Mon Jun 23, 2008 8:29 pm
Reply with quote

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
View user's profile Send private message
dick scherrer

Moderator Emeritus


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

PostPosted: Mon Jun 23, 2008 11:34 pm
Reply with quote

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
View user's profile Send private message
rrlogu
Warnings : 1

New User


Joined: 13 Sep 2006
Posts: 13

PostPosted: Mon Aug 11, 2008 4:49 pm
Reply with quote

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
View user's profile Send private message
dick scherrer

Moderator Emeritus


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

PostPosted: Mon Aug 11, 2008 8:33 pm
Reply with quote

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
View user's profile Send private message
Terry Heinze

JCL Moderator


Joined: 14 Jul 2008
Posts: 1249
Location: Richfield, MN, USA

PostPosted: Tue Aug 12, 2008 2:38 am
Reply with quote

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
View user's profile Send private message
dick scherrer

Moderator Emeritus


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

PostPosted: Tue Aug 12, 2008 2:41 am
Reply with quote

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
View user's profile Send private message
chandrarkar

New User


Joined: 27 May 2008
Posts: 24
Location: india

PostPosted: Tue Aug 12, 2008 6:14 pm
Reply with quote

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
View user's profile Send private message
dick scherrer

Moderator Emeritus


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

PostPosted: Tue Aug 12, 2008 8:59 pm
Reply with quote

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
View user's profile Send private message
rrlogu
Warnings : 1

New User


Joined: 13 Sep 2006
Posts: 13

PostPosted: Tue Aug 19, 2008 5:28 pm
Reply with quote

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
View user's profile Send private message
dick scherrer

Moderator Emeritus


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

PostPosted: Tue Aug 19, 2008 10:17 pm
Reply with quote

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
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> CA Products

 


Similar Topics
Topic Forum Replies
No new posts Using API Gateway from CICS program CICS 0
No new posts Running REXX through JOB CLIST & REXX 13
No new posts ISAM and abend S03B JCL & VSAM 10
No new posts DB2 Event passed to the Application P... DB2 1
No new posts How to pass the PARM value to my targ... COBOL Programming 8
Search our Forums:

Back to Top