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
 

 

S30E abend while running Easytrieve program.

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CA Products
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    Post subject: S30E abend while running Easytrieve program.
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

Site Director


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

PostPosted: Mon Jun 23, 2008 11:34 pm    Post subject:
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    Post subject:
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

Site Director


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

PostPosted: Mon Aug 11, 2008 8:33 pm    Post subject:
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    Post subject:
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

Site Director


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

PostPosted: Tue Aug 12, 2008 2:41 am    Post subject:
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    Post subject:
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

Site Director


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

PostPosted: Tue Aug 12, 2008 8:59 pm    Post subject:
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    Post subject:
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

Site Director


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

PostPosted: Tue Aug 19, 2008 10:17 pm    Post subject:
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    IBMMAINFRAMES.com Support Forums -> CA Products All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts UNIT=AFF for Easytrieve code gandikk JCL & VSAM 7 Wed Jul 12, 2017 11:42 pm
No new posts Writing a file using online program grvtomar PL/I & Assembler 3 Fri Jun 30, 2017 1:06 pm
No new posts pre-compiler for program in an HFS Pedro DB2 0 Fri Jun 23, 2017 11:13 pm
No new posts Compiling program in endeavor for tra... RALAKKAL Compuware & Other Tools 4 Mon Jun 05, 2017 8:27 pm
No new posts C03 ABEND sjiraga PL/I & Assembler 1 Thu Jun 01, 2017 4:51 pm


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