|
View previous topic :: View next topic
|
| Author |
Message |
thesumitk
Active User
Joined: 24 May 2013
Posts: 156
Location: INDIA
|
|
|
|
Hi All, Good Day !!
I am runign a job which is runing a REXX program and this rexx submitting a job again , This was runign fine earlier even I have soem other codes as well which running fine with same functionality but from yesterday I started getting one error like below
| Code: |
********************************* TOP OF DATA **********************************
READY
EX 'XXXX.XXXXX.EXECS(XXXXXX)'
01/01/01
12/31/99
0
-3
DATA SET ZTEMPF NOT IN CATALOG OR CATALOG CAN NOT BE ACCESSED
12
JOB SUBMITTED
READY
END
******************************** BOTTOM OF DATA ******************************** |
Below is my code whihc is sumitting the job
| Code: |
O = outtrap('OUT.','*')
Address ISPEXEC
"LIBDEF ISPSLIB DATASET ID('TESTFM.NBDHBFY.JCLIB')"
"FTOPEN TEMP"
"FTINCL TSTJRPT2"
"FTCLOSE"
"VGET ZTEMPF"
say rc
Address TSO
"SUBMIT" "'"ZTEMPF"'"
say rc
O = outtrap('OFF') |
Note: I am running all compiled REXX
Can some please put some light on this ..
I searched the forum but didnt get the same problem which I am getting
Many Thanks in Advance !! |
|
| Back to top |
|
 |
thesumitk
Active User
Joined: 24 May 2013
Posts: 156
Location: INDIA
|
|
|
|
In Addition to my Post
The error message is below
| Code: |
| DATA SET ZTEMPF NOT IN CATALOG OR CATALOG CAN NOT BE ACCESSED |
and
RC=-3 for "VGET ZTEMPF "
RC =12 for "SUBMIT" '"ZTEMPF"'
Please let me know if I am not clear |
|
| Back to top |
|
|
sureshpathi10
Active User
Joined: 03 May 2010
Posts: 154
Location: Kuala Lumpur
|
|
|
|
This worked for me !
| Code: |
address ispexec
"ftopen temp"
"ftincl "mem_name
"ftclose"
"vget (ztempf) shared"
address tso
"submit '"ztempf"'" |
 |
|
| Back to top |
|
|
TheMFKid
New User
Joined: 20 Nov 2013
Posts: 91
Location: India
|
|
|
|
COde SAY RC for all other ISPEXEC commands in your program like the below
| Code: |
"LIBDEF ISPSLIB DATASET ID('TESTFM.NBDHBFY.JCLIB')"
say rc
"FTOPEN TEMP"
say rc
"FTINCL TSTJRPT2"
say rc
"FTCLOSE"
say rc
|
let know if you are gettign RC=-3 for all above statements. |
|
| Back to top |
|
|
TheMFKid
New User
Joined: 20 Nov 2013
Posts: 91
Location: India
|
|
|
|
| If you are running the rexx in batch, post your JCL as well. I think you may not be running your program using ISPSTART with all ISPF libraries defined. |
|
| Back to top |
|
|
thesumitk
Active User
Joined: 24 May 2013
Posts: 156
Location: INDIA
|
|
|
|
HI TheMFKid
Thanks for your reply !!
Yes.. It os giving RC= -3 in all the ISPEXEC Commands
| Code: |
libdef code - -3
ftopen code - -3
ftincl code - -3
ftclose code - -3
vget code - -3
submit code 12
DATA SET ZTEMPF NOT IN CATALOG OR CATALOG CAN NOT BE ACCESSED |
PLease let me know |
|
| Back to top |
|
|
thesumitk
Active User
Joined: 24 May 2013
Posts: 156
Location: INDIA
|
|
|
|
Thanks sureshpathi10 for Sharing .. I tried that yesterday but was getting the same problem  |
|
| Back to top |
|
|
thesumitk
Active User
Joined: 24 May 2013
Posts: 156
Location: INDIA
|
|
|
|
| Code: |
//JS001 EXEC PGM=IKJEFT01
//STEPLIB DD DSN=AAAA.AAAAA(JREPORT1),DISP=SHR
//SYSPROC DD DSN=AAAA.AAAAA(JREPORT1),DISP=SHR
//SYSTSPRT DD SYSOUT=*
//IN DD DISP=(OLD,DELETE),DSN=&TEMP1
//IN1 DD DSN=DSN1,DISP=SHR
//DATEC DD DSN=DSN2,DISP=SHR
//OUT DD DSN=DSN3,DISP=SHR
//SYSTSPRT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSTSIN DD *
EX 'AAAA.AAAAA(JREPORT1),' |
This is the JCL I am using to run the rexx. I am not using the ISPSTART to run my rexx.. Since its compiled code |
|
| Back to top |
|
|
thesumitk
Active User
Joined: 24 May 2013
Posts: 156
Location: INDIA
|
|
|
|
It worked fine when I tried with ISPSTART command
Thanks All for your support .. I appreciate your time and help !! |
|
| Back to top |
|
|
TheMFKid
New User
Joined: 20 Nov 2013
Posts: 91
Location: India
|
|
|
|
| Great!! Nice to know it worked with ISPSTART. RC=-3 means the address environment is not available. |
|
| Back to top |
|
|
|
|
