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
 

 

Problem with SUBMIT "ZTEMPF" ( not able to submit

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> TSO/ISPF
View previous topic :: :: View next topic  
Author Message
thesumitk

Active User


Joined: 24 May 2013
Posts: 129
Location: INDIA

PostPosted: Fri Feb 14, 2014 1:55 pm    Post subject: Problem with SUBMIT "ZTEMPF" ( not able to submit
Reply with quote

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

thesumitk

Active User


Joined: 24 May 2013
Posts: 129
Location: INDIA

PostPosted: Fri Feb 14, 2014 2:38 pm    Post subject:
Reply with quote

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

Active User


Joined: 03 May 2010
Posts: 154
Location: Kuala Lumpur

PostPosted: Fri Feb 14, 2014 3:06 pm    Post subject:
Reply with quote

This worked for me !

Code:

address ispexec
"ftopen temp"
"ftincl "mem_name
"ftclose"
"vget (ztempf) shared"
address tso
"submit '"ztempf"'"


icon_question.gif
Back to top
View user's profile Send private message
TheMFKid

New User


Joined: 20 Nov 2013
Posts: 91
Location: India

PostPosted: Fri Feb 14, 2014 3:09 pm    Post subject:
Reply with quote

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

New User


Joined: 20 Nov 2013
Posts: 91
Location: India

PostPosted: Fri Feb 14, 2014 3:16 pm    Post subject:
Reply with quote

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

Active User


Joined: 24 May 2013
Posts: 129
Location: INDIA

PostPosted: Sat Feb 15, 2014 9:59 am    Post subject:
Reply with quote

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

Active User


Joined: 24 May 2013
Posts: 129
Location: INDIA

PostPosted: Sat Feb 15, 2014 10:00 am    Post subject:
Reply with quote

Thanks sureshpathi10 for Sharing .. I tried that yesterday but was getting the same problem icon_smile.gif
Back to top
View user's profile Send private message
thesumitk

Active User


Joined: 24 May 2013
Posts: 129
Location: INDIA

PostPosted: Sat Feb 15, 2014 11:05 am    Post subject:
Reply with quote

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

Active User


Joined: 24 May 2013
Posts: 129
Location: INDIA

PostPosted: Sat Feb 15, 2014 11:25 am    Post subject:
Reply with quote

It worked fine when I tried with ISPSTART command icon_smile.gif

Thanks All for your support .. I appreciate your time and help !!
Back to top
View user's profile Send private message
TheMFKid

New User


Joined: 20 Nov 2013
Posts: 91
Location: India

PostPosted: Sun Feb 16, 2014 11:02 am    Post subject:
Reply with quote

Great!! Nice to know it worked with ISPSTART. RC=-3 means the address environment is not available.
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 -> TSO/ISPF All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Problem in writing Output file vickey_dw COBOL Programming 5 Mon Nov 14, 2016 11:14 pm
No new posts Problem in Running Query via JCL vickey_dw DB2 3 Tue Oct 18, 2016 11:11 pm
No new posts Amount field is getting corrupted whe... thesumitk SYNCSORT 5 Tue Oct 18, 2016 8:20 pm
No new posts DB2 Streaming Batch Processing Problem Manshadi DB2 4 Sat Sep 24, 2016 12:14 pm
No new posts hot to get details when "EXEC CI... Andi1982 CICS 11 Tue Sep 20, 2016 5:01 pm


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