rohitcognizant
New User
Joined: 13 Feb 2007 Posts: 54 Location: Pune India
|
|
|
|
hi im trying to run a rexx program from jcl
the belw mentioned is the jcl i have used
Code: |
//COPYPROF EXEC PGM=IEBCOPY
//SYSPRINT DD DUMMY,DCB=(LRECL=121,BLKSIZE=9438,RECFM=FB)
//SYSUT3 DD UNIT=SYSDA,SPACE=(CYL,(1,1),RLSE)
//SYSUT4 DD UNIT=SYSDA,SPACE=(CYL,(1,1),RLSE)
//DDIN DD DSN=U150660.ISPPROF.DATA,DISP=SHR
//DDOUT DD DSN=&&PROF,DISP=(,PASS),
// UNIT=SYSDA,SPACE=(CYL,(1,1,20),RLSE),
// DCB=(LRECL=80,BLKSIZE=0,RECFM=FB)
//SYSIN DD *
COPY INDD=DDIN,OUTDD=DDOUT
/*
//*
//TSOBTCH1 EXEC PGM=IKJEFT01
//SYSTSPRT DD SYSOUT=*
//SYSUDUMP DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//ISPLOG DD DUMMY,DCB=(RECFM=VA,LRECL=125,BLKSIZE=129)
//ISPLIST DD DUMMY,DCB=(RECFM=VA,LRECL=125,BLKSIZE=129)
//ISPLST1 DD DISP=NEW,UNIT=SYSDA,SPACE=(CYL,(1,1)),
// DCB=(LRECL=121,BLKSIZE=1210,RECFM=FBA)
//ISPLST2 DD DISP=NEW,UNIT=SYSDA,SPACE=(CYL,(1,1)),
// DCB=(LRECL=121,BLKSIZE=1210,RECFM=FBA)
//ISPILIB DD DSN=ISP.SISPSAMP,DISP=SHR
//ISPPLIB DD DSN=ISP.SISPPENU,DISP=SHR
//ISPMLIB DD DSN=ISP.SISPMENU,DISP=SHR
//ISPSLIB DD DSN=ISP.SISPSENU,DISP=SHR
//ISPTLIB DD DSN=ISP.SISPTENU,DISP=SHR
//ISPPROF DD DSN=*.COPYPROF.DDOUT,DISP=(OLD,DELETE)
//SYSPROC DD DSN=ISP.SISPCLIB,DISP=SHR
//SYSEXEC DD DSN=U150660.IT.ISPSNEW,DISP=SHR
//SYSPRINT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSTSPRT DD SYSOUT=*
//INFILE DD DSN=U150660.REXX.OUTPUT,DISP=SHR
//OUTFILE DD SYSOUT=*
//SYSTSIN DD *
PROFILE PREFIX(U150660)
ISPSTART CMD(%ITUPD) |
while running the jcl i got an error in copyprof step..it showed that
"the following reserved datasets are noy available "
and a message asking to freee that dataset ws also shown i tried the same usin rexx but was of no use |
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006 Posts: 19244 Location: Inside the Matrix
|
|
|
|
Hello,
Please post the diagnostic information provided by the system. This will be in one or more of the jes sysout datasets for the job.
Whatever ddname/dsn is named is most likely in use by some other process - maybe even your own tso session that has the file open.
When you post a problem, it is best to post all of the information - especially any and all message numbers and their text - not just type in some of the text info. The more you provide, the more someone can help.
Also, when you post jcl & control statements, it is good to use the "Code" tab at the top of the reply panel. I'll change your post to "Code" and you will see the difference. |
|