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
 

 

Error while submitting a rexx to submit a
Goto page 1, 2  Next
 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> TSO/ISPF
View previous topic :: :: View next topic  
Author Message
Pragati Soni

New User


Joined: 18 Jan 2008
Posts: 47
Location: India

PostPosted: Mon May 04, 2009 5:13 pm    Post subject: Error while submitting a rexx to submit a
Reply with quote

Hello All,

I submitted a REXX code which in turn submit a skeleton JCL.

I got the error:

The input or output file TMPJCL is associated with a partitioned data set. A me
mber name must be specified.
EXECIO error while trying to GET or PUT a record.
***

Below is the REXX code.

/*REXX*/
"ISPEXEC LIBDEF ISPSLIB DATASET ID('PRD.Y00205.REXX.QHTOOL.PRACTICE')"
"ALLOC FI(TMPJCL) DA('PRD.Y00205.REXX.QHTOOL.SKEL') SHR"
"ISPEXEC FTOPEN TEMP" /*FILE TAILORING*/
"ISPEXEC FTINCL RUNJCL02" /*FILE TAILORING*/
"ISPEXEC FTCLOSE" /*FILE TAILORING*/
"ISPEXEC VGET (ZTEMPN)"
"EXECIO * DISKR "ZTEMPN" (FINIS STEM SKEL."
"EXECIO * DISKW TMPJCL (FINIS STEM SKEL."
"ISPEXEC EDIT DATASET ('"PRD.Y00205.REXX.QHTOOL.SKEL"("TMPJCL")')"
"FREE FI(TMPJCL)"
SAY RC

I also modified the REXX and re-submitted the code.

/*REXX*/
"ISPEXEC LIBDEF ISPSLIB DATASET ID('PRD.Y00205.REXX.QHTOOL.PRACTICE')"
"ALLOC FI(TMPJCL) DA('PRD.Y00205.REXX.QHTOOL.SKEL') SHR"
"ISPEXEC FTOPEN TEMP" /*FILE TAILORING*/
"ISPEXEC FTINCL RUNJCL02" /*FILE TAILORING*/
"ISPEXEC FTCLOSE" /*FILE TAILORING*/
"ISPEXEC VGET (ZTEMPN)"
"EXECIO * DISKR "ZTEMPN" (FINIS STEM SKEL."
"EXECIO * DISKW TMPJCL (FINIS STEM SKEL."
"ISPEXEC EDIT DATASET ('PRD.Y00205.REXX.QHTOOL.SKEL')"
"FREE FI(TMPJCL)"

But same eror is coming.
Back to top
View user's profile Send private message

Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 7914
Location: Bellevue, IA

PostPosted: Mon May 04, 2009 5:17 pm    Post subject:
Reply with quote

I guess the first questions have to be, do you understand what the error message is telling you? Do you know what a partitioned data set is? Do you know how to allocate a member of a partitioned data set in TSO so it can be read?
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Mon May 04, 2009 5:19 pm    Post subject:
Reply with quote

Here let ME find the manual for you

click HERE and see how to use ISPF file tailoring services.

Please refer to the manuals before posting.
Back to top
View user's profile Send private message
superk

Moderator Team Head


Joined: 26 Apr 2004
Posts: 4648
Location: Raleigh, NC, USA

PostPosted: Mon May 04, 2009 5:25 pm    Post subject: Reply to: Error while submitting a rexx to submit a
Reply with quote

With the allocation of TMPJCL done properly the code works just fine.
Back to top
View user's profile Send private message
Pragati Soni

New User


Joined: 18 Jan 2008
Posts: 47
Location: India

PostPosted: Mon May 04, 2009 6:05 pm    Post subject:
Reply with quote

Hello,

I know about PDS. and took help of the manual, forum and google to know how to allocate a member of a PDS in TSO so that it can be read or edited.

But as it is giving error which is not as per the expectation I have posted it in the forum so that the experts can guide me if I am doing anything wrong.

Bring a novice in this, I can not catch the errors so easily.

Looking for the cooperation.

Robert Sample wrote:
I guess the first questions have to be, do you understand what the error message is telling you? Do you know what a partitioned data set is? Do you know how to allocate a member of a partitioned data set in TSO so it can be read?
Back to top
View user's profile Send private message
Pragati Soni

New User


Joined: 18 Jan 2008
Posts: 47
Location: India

PostPosted: Mon May 04, 2009 6:08 pm    Post subject:
Reply with quote

I went thru the manual but could not get much except the below:

1.5.2 File Tailoring Services

The file tailoring services, listed in the order in which they are normally invoked, are:


FTOPEN
Prepares the file tailoring process and specifies whether the temporary file is to be used for output.

FTINCL
Specifies the skeleton to be used and starts the tailoring process.

FTCLOSE
Ends the file tailoring process.

FTERASE
Erases an output file created by file tailoring.

I have taken care of the above but then too as it was giving errors, I posted in the forum.

I duly read the available manual and doing so again.

Thanks a lot.


expat wrote:
Here let ME find the manual for you

click HERE and see how to use ISPF file tailoring services.

Please refer to the manuals before posting.
Back to top
View user's profile Send private message
Pragati Soni

New User


Joined: 18 Jan 2008
Posts: 47
Location: India

PostPosted: Mon May 04, 2009 6:09 pm    Post subject: Re: Reply to: Error while submitting a rexx to submit a
Reply with quote

Thanks.

Could you please let me know where the problem resides in allocating the TMPJCL?

Thanks a lot.


superk wrote:
With the allocation of TMPJCL done properly the code works just fine.
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne

PostPosted: Mon May 04, 2009 6:14 pm    Post subject:
Reply with quote

this is incorrect format for a pds(member)
DA('PRD.Y00205.REXX.QHTOOL.SKEL')
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Mon May 04, 2009 6:16 pm    Post subject:
Reply with quote

You may have gone through a manual, but certainly not the one that I have indicated and linked to.

The one that I have linked to explains what you need to do to use a PDS as the file tailoring output library.
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 7914
Location: Bellevue, IA

PostPosted: Mon May 04, 2009 6:24 pm    Post subject:
Reply with quote

The error message you posted indicated
Quote:
A member name must be specified.
If you understand a PDS, put a member name on the statement and your issue resolves itself.
Back to top
View user's profile Send private message
Pragati Soni

New User


Joined: 18 Jan 2008
Posts: 47
Location: India

PostPosted: Mon May 04, 2009 6:34 pm    Post subject:
Reply with quote

I tried with the member name too.

Infact that is the issue. May Be I am not getting where to give that.

/*REXX*/
"ISPEXEC LIBDEF ISPSLIB DATASET ID('PRD.Y00205.REXX.QHTOOL.PRACTICE')"
"ALLOC FI(TMPJCL) DA('PRD.Y00205.REXX.QHTOOL.SKEL') SHR"
"ISPEXEC FTOPEN TEMP" /*FILE TAILORING*/
"ISPEXEC FTINCL RUNJCL02" /*FILE TAILORING*/
"ISPEXEC FTCLOSE" /*FILE TAILORING*/
"ISPEXEC VGET (ZTEMPN)"
"EXECIO * DISKR "ZTEMPN" (FINIS STEM SKEL."
"EXECIO * DISKW TMPJCL (FINIS STEM SKEL."
"ISPEXEC EDIT DATASET ('"PRD.Y00205.REXX.QHTOOL.SKEL"("TMPJCL")')"
"FREE FI(TMPJCL)"

If you are getting plz let me know.

Thanks a lot!


Robert Sample wrote:
The error message you posted indicated
Quote:
A member name must be specified.
If you understand a PDS, put a member name on the statement and your issue resolves itself.
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne

PostPosted: Mon May 04, 2009 6:35 pm    Post subject:
Reply with quote

Quote:
I tried with the member name too.


show us the allocate statement.

posted edited, since OP changed his:

ok, you have not changed the allocate statement.
Back to top
View user's profile Send private message
superk

Moderator Team Head


Joined: 26 Apr 2004
Posts: 4648
Location: Raleigh, NC, USA

PostPosted: Mon May 04, 2009 6:38 pm    Post subject: Reply to: Error while submitting a rexx to submit a
Reply with quote

Is 'PRD.Y00205.REXX.QHTOOL.SKEL' a PDS or a sequential dataset? If it's a PDS, you need a member name on your ALLOCATE command. If not, then your EDIT command needs to be fixed.
Back to top
View user's profile Send private message
Pragati Soni

New User


Joined: 18 Jan 2008
Posts: 47
Location: India

PostPosted: Mon May 04, 2009 6:40 pm    Post subject:
Reply with quote

The below is the allocate command.

"ALLOC FI(TMPJCL) DA('PRD.Y00205.REXX.QHTOOL.SKEL') SHR"


(I gave it in the first post only)

Thanks


dbzTHEdinosauer wrote:
Quote:
I tried with the member name too.


show us the allocate statement.

posted edited, since OP changed his:

ok, you have not changed the allocate statement.
Back to top
View user's profile Send private message
Pragati Soni

New User


Joined: 18 Jan 2008
Posts: 47
Location: India

PostPosted: Mon May 04, 2009 6:42 pm    Post subject: Re: Reply to: Error while submitting a rexx to submit a
Reply with quote

I gave the member name in the allocate command itself.

"ALLOC FI(TMPJCL) DA('PRD.Y00205.REXX.QHTOOL.SKEL') SHR"

I tried the below one too
"ALLOC DA('PRD.Y00205.REXX.QHTOOL.SKEL') FI(TMPJCL) SHR"

Thanks


superk wrote:
Is 'PRD.Y00205.REXX.QHTOOL.SKEL' a PDS or a sequential dataset? If it's a PDS, you need a member name on your ALLOCATE command. If not, then your EDIT command needs to be fixed.
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Mon May 04, 2009 6:49 pm    Post subject:
Reply with quote

If you actually do get around to reading the manual I have linked to, you will see that you can not allocate any old FI to be the output of ISPF file tailoring services.

That is the whole reason of me giving you that specific manual to look at.

It explains how to do it correctly.

Please pay attention to the TEMP subparameter of the FTOPEN statement.

Please pay attention to the file name used for a pre allocated file tailoring output dataset.

Please pay attention to the differences between using PDS and PS datasets - FTCLOSE.
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 7914
Location: Bellevue, IA

PostPosted: Mon May 04, 2009 7:09 pm    Post subject:
Reply with quote

Quote:
I gave the member name in the allocate command itself.

"ALLOC FI(TMPJCL) DA('PRD.Y00205.REXX.QHTOOL.SKEL') SHR"

I tried the below one too
"ALLOC DA('PRD.Y00205.REXX.QHTOOL.SKEL') FI(TMPJCL) SHR"
Neither of these allocate statements includes a member name. Try again.
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8593
Location: Back in jolly old England

PostPosted: Mon May 04, 2009 7:36 pm    Post subject:
Reply with quote

Having reread the thread and seen a little deeper .......................

If you want to edit the output file - why not use
Code:

"ISPEXEC VGET (ZTEMPF)"
"ISPEXEC EDIT DATASET('"ZTEMPF"')"

rather than copying it to another file.
Back to top
View user's profile Send private message
Pedro

Senior Member


Joined: 01 Sep 2006
Posts: 2019
Location: Silicon Valley

PostPosted: Mon May 04, 2009 9:59 pm    Post subject: Reply to: Error while submitting a rexx to submit a
Reply with quote

There is possibility that they want to edit and SAVE it for later use, so maybe copying it to a PDS is a valid use.
Back to top
View user's profile Send private message
Pragati Soni

New User


Joined: 18 Jan 2008
Posts: 47
Location: India

PostPosted: Tue May 05, 2009 10:45 am    Post subject:
Reply with quote

Could anyone of you please guide me if there is a problem with the allocate command?

"ALLOC FI(TMPJCL) DA('PRD.Y00205.REXX.QHTOOL.SKEL') SHR"

I tried the below one too
"ALLOC DA('PRD.Y00205.REXX.QHTOOL.SKEL') FI(TMPJCL) SHR"
Thanks
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
Goto page 1, 2  Next
Page 1 of 2

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts S922 Error yuvan ABENDS & Debugging 3 Fri Dec 02, 2016 6:58 pm
No new posts Invoke Webservice Fails with DFHPI100... divated CICS 2 Thu Nov 24, 2016 5:57 pm
No new posts What is the command to check MODE of ... rohanthengal CLIST & REXX 6 Fri Nov 18, 2016 1:48 pm
This topic is locked: you cannot edit posts or make replies. Rexx to create GDG by scanning JJ result krish.deepu CLIST & REXX 5 Tue Oct 25, 2016 5:32 pm
No new posts Error during restore rename archanamuthukrishnan All Other Mainframe Topics 2 Fri Oct 14, 2016 3:30 pm


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