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

Problem in REXX Program Execution
IBM Mainframe Forums -> CLIST & REXX
Post new topic   Reply to topic Quick References
View previous topic :: View next topic  
Author Message
ksk

Active User


Joined: 08 Jun 2006
Posts: 355
Location: New York
PostPosted: Wed Nov 12, 2008 3:10 pm
 Reply with quote
Hi,

I am learning REXX and written a small program(first program in REXX icon_lol.gif ). We have a Proc REXXCLG through which we can COMPILE, LINK EDITED and RUN the program.

When I was trying to execute this Proc, Compilation step executed successfully but PLKED step ( To PREPARE SYSLIN DATA SET FOR SUBSEQUENT LINK STEP) got abended with the following error.

Code:

IEF212I PLKED S1 SYSEXEC - DATA SET NOT FOUND


Code is as follows.

Code:

//SYSEXEC   DD DSN=&LIBXDSN,DISP=SHR

and
Code:

LIBXDSN='SYS1.IBM.SEAGCMD'


LIBXDSN is an IBM library for SAA REXX/370 EXEC Library. Please let me know if I am missing something.

Regards,
KSK
Back to top
View user's profile Send private message
Aaru

Senior Member


Joined: 03 Jul 2007
Posts: 1287
Location: Chennai, India
PostPosted: Wed Nov 12, 2008 5:46 pm
 Reply with quote
Ksk,

Quote:
I am learning REXX and written a small program(first program in REXX ).


Good. But why do you want to submit the REXX code from a JCL? As it is your first program just run it without using a JCL using

- EXEC command
- TSO execname after allcating it to SYSEXEC/PROC
- batch mode using IKJEFT01


In the 3rd case where you use the batch mode

//SYSEXEC DD DSN=XXXX.YYYY.ZZZZ,DISP=SHR

XXXX.YYYY.ZZZZ - Your REXX library

Try this.
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: Wed Nov 12, 2008 10:07 pm
 Reply with quote
Hello,

Code:
IEF212I PLKED S1 SYSEXEC - DATA SET NOT FOUND
This is caused by a misspelled dataset name (or one that does not exist). For us to help, you need to post the expanded proc and the complete diagnostic info.
Back to top
View user's profile Send private message
ksk

Active User


Joined: 08 Jun 2006
Posts: 355
Location: New York
PostPosted: Thu Nov 13, 2008 12:20 pm
 Reply with quote
Dick,

Following is my Proc.

Code:

//REXXCLG PROC STUB=MVS,                      TYPE OF STUB             
//             OPTIONS='XREF OBJECT NOCEXEC', REXX COMPILER OPTIONS     
//             COMPDSN='SYS1.SFANLMD', REXX COMPILER LOAD LIB           
//             LIBDSN='SYS1.IBM.SEAGLMD',  REXX LIBRARY LOAD LIB       
//*            LIBLPA='SYS1.IBM.SEAGLPA',  REXX LIBRARY LPA LIB         
//             LIBXDSN='SYS1.IBM.SEAGCMD'  REXX LIBRARY EXEC LIB       
//*                                                                     
//*-----------------------------------------------------------------   
//* COMPILE REXX PROGRAM.                                               
//*-----------------------------------------------------------------   
//*                                                                     
//REXX    EXEC PGM=REXXCOMP,PARM='&OPTIONS'                             
//STEPLIB   DD DSN=&COMPDSN,DISP=SHR                                   
//SYSPRINT  DD SYSOUT=*                                                 
//SYSTERM   DD SYSOUT=*                                                 
//*SYSIEXEC DD DUMMY                                                   
//*SYSDUMP  DD DUMMY                                                   
//*SYSCEXEC DD DUMMY                                           
//SYSPUNCH  DD DSN=&&OBJECT,DISP=(MOD,PASS),UNIT=SYSDA,         
//             SPACE=(800,(800,100))                           
//*                                                             
//*-------------------------------------------------------------
//* PREPARE SYSLIN DATA SET FOR SUBSEQUENT LINK STEP.           
//*-------------------------------------------------------------
//*                                                             
//PLKED   EXEC PGM=IRXJCL,PARM='REXXL &STUB',                   
//             COND=(9,LT,REXX)                                 
//*                                                             
//SYSEXEC   DD DSN=&LIBXDSN,DISP=SHR                           
//SYSIN     DD DSN=&&OBJECT,DISP=(OLD,DELETE)                   
//SYSTSPRT  DD SYSOUT=*                                         
//SYSOUT    DD DSN=&&SYSOUT,DISP=(MOD,PASS),UNIT=SYSDA,         
//             DCB=(RECFM=FB,LRECL=80,BLKSIZE=800),             
//             SPACE=(800,(800,100))                           
//*                                                               
//*----------------------------------------------------------------
//* LINK TOGETHER STUB AND PROGRAM.                               
//*----------------------------------------------------------------
//*                                                               
//LKED    EXEC PGM=HEWL,PARM='LIST,AMODE=31,RMODE=ANY,RENT,MAP',   
//             COND=((9,LT,REXX),(0,NE,PLKED))                     
//*                                                               
//SYSLIN    DD DSN=&&SYSOUT,DISP=(OLD,DELETE)                     
//SYSLIB    DD DSN=&LIBDSN,DISP=SHR                               
//SYSUT1    DD UNIT=SYSDA,SPACE=(1024,(200,20))                   
//SYSPRINT  DD SYSOUT=*                                           
//SYSLMOD   DD DSN=&&GOSET(GO),DISP=(MOD,PASS),UNIT=SYSDA,         
//             SPACE=(1024,(50,20,1))                             
//*                                                               
//*----------------------------------------------------------------
//* RUN THE COMPILED REXX PROGRAM.                                 
//*-----------------------------------------------------------------   
//*                                                                     
//GO      EXEC PGM=*.LKED.SYSLMOD,                                     
//             COND=((9,LT,REXX),(0,NE,PLKED),(0,NE,LKED))             
//*                                                                     
//* ACTIVATE STEPLIB ONLY IF &LIBLPA IS NOT IN THE SEARCH ORDER         
//*STEPLIB  DD DSN=&LIBLPA,DISP=SHR                                     
//SYSTSPRT  DD SYSOUT=*                                                 
**************************** Bottom of Data ****************************


Following is error description.

Code:

IEF373I STEP/REXX    /START 2008318.0139                                       
IEF374I STEP/REXX    /STOP  2008318.0139 CPU    0MIN 00.01SEC SRB    0MIN 00.00S
IEF212I TESTJOB PLKED S1 SYSEXEC - DATA SET NOT FOUND                           
IEF272I TESTJOB PLKED S1 - STEP WAS NOT EXECUTED.                               
IEF373I STEP/PLKED   /START 2008318.0139                                       
IEF374I STEP/PLKED   /STOP  2008318.0139 CPU    0MIN 00.00SEC SRB    0MIN 00.00S
IEF285I   SYS3.MVSV5.RUNTIME                           KEPT                     
IEF285I   VOL SER NOS= MCATPE.                                                 
IEF237I 8935 ALLOCATED TO SYS00001                                             
IEF285I   SYS08318.T013951.RA000.TESTJOB.R0583962      KEPT                     
IEF285I   VOL SER NOS= S2XYCJ.                                                 
IGD105I SYS08318.T013950.RA000.TESTJOB.OBJECT.H05    DELETED,   DDNAME=SYSPUNCH
IEF375I  JOB/TESTJOB /START 2008318.0139                                       
IEF376I  JOB/TESTJOB /STOP  2008318.0139 CPU    0MIN 00.01SEC SRB    0MIN 00.00S
******************************** BOTTOM OF DATA ********************************


I found SYS1.IBM.SEAGCMD does not exist. My question is if this does not exist, what should we provide here?
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: Thu Nov 13, 2008 3:09 pm
 Reply with quote
Hello,

You will need to name an existing library that you permitted to write new execs into or you will need to allocate a new library for execs.

Suggest you talk with your system support people to see if what you need already exists or how you should name a new library for this purpose.
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 -> CLIST & REXX

 

Similar Topics
Topic Forum Replies
No new posts Compile Several JCL JOB Through one r... CLIST & REXX 4
No new posts Using API Gateway from CICS program CICS 0
No new posts Running REXX through JOB CLIST & REXX 13
No new posts Error to read log with rexx CLIST & REXX 11
No new posts isfline didnt work in rexx at z/OS ve... CLIST & REXX 7
Search our Forums:

Back to Top
IBMMainframes.com is not an official and/or affiliated with IBM® in anyway
Board Rules | FAQ | Downloads | Wiki | SiteMap | Contact Us