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
 

 

ISPF file tailoring problem

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

New User


Joined: 04 Feb 2010
Posts: 39
Location: Mumbai

PostPosted: Mon Jul 26, 2010 12:48 pm    Post subject:
Reply with quote

Hi all,

I am trying to execute a simple REXX usign Skeleton. Where i have the skeleton of a job card and skeleton of a Sort jcl. The ouput PDS opens but none of the skeleton gets inserted..

The code i used is as follows:

"ISPEXEC LIBDEF ISPSLIB DATASET ID('R992.SKELETON')"
"ALLOC FI(SORTJCL) DA(R992.FTAILOR(SORTJCL)') SHR REU"
SAY 'ENTER JOB NAME:'
PULL JOBNAME
SAY 'ENTER OLD DATASET'
PULL OLDSRC
SAY 'ENTER NEW DATASET'
PULL NEWSRC
"ISPEXEC FTINCL JOBSTMT"
"ISPEXEC FTINCL SYNCSORT"
"ISPEXEC FTCLOSE"
"ISPEXEC EDIT DATASET (R992.FTAILOR(SORTJCL)')"
EXIT
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 Jul 26, 2010 2:43 pm    Post subject:
Reply with quote

DO NOT stuff your problem at the end of an unrelated and dormant topic.
start your own topic.

Have you used the REXX trace facility.
Have you used the ISPF FT trace facility.

If not, suggest that you do.
Back to top
View user's profile Send private message
PeterHolland

Global Moderator


Joined: 27 Oct 2009
Posts: 2422
Location: Netherlands, Amstelveen

PostPosted: Mon Jul 26, 2010 2:49 pm    Post subject:
Reply with quote

I miss a FTOPEN for SORTJCL.
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 Jul 26, 2010 2:51 pm    Post subject:
Reply with quote

Good spot Peter. Go to the top of the class icon_biggrin.gif
Back to top
View user's profile Send private message
PeterHolland

Global Moderator


Joined: 27 Oct 2009
Posts: 2422
Location: Netherlands, Amstelveen

PostPosted: Mon Jul 26, 2010 2:59 pm    Post subject:
Reply with quote

Expat, you make me blush all the time. icon_redface.gif
Back to top
View user's profile Send private message
karz

New User


Joined: 04 Feb 2010
Posts: 39
Location: Mumbai

PostPosted: Mon Jul 26, 2010 3:25 pm    Post subject:
Reply with quote

Thanks Peter:)...FTOPEN was indeed missing..now its working as expected...the code being:

/*REXX*/
"ISPEXEC LIBDEF ISPSLIB DATASET ID('R992.SKELETON')"
"ISPEXEC LIBDEF ISPFILE DATASET ID('R992.FTAILOR(SORTJCL)')"
SAY 'ENTER JOB NAME:'
PULL JOBNAME
SAY 'ENTER OLD DATASET'
PULL OLDSRC
SAY 'ENTER NEW DATASET'
PULL NEWSRC
"ISPEXEC FTOPEN"
"ISPEXEC FTINCL JOBSTMT"
"ISPEXEC FTINCL SORTJCL"
"ISPEXEC FTINCL SYNCSORT"
"ISPEXEC FTCLOSE NAME(SORTJCL)"
"ISPEXEC EDIT DATASET ('R992.FTAILOR(SORTJCL)')"
EXIT
Back to top
View user's profile Send private message
PeterHolland

Global Moderator


Joined: 27 Oct 2009
Posts: 2422
Location: Netherlands, Amstelveen

PostPosted: Mon Jul 26, 2010 3:45 pm    Post subject:
Reply with quote

karz, good its working for you. I always used something like this :

Code:

ISPEXEC FTOPEN TEMP
ISPEXEC FTINCL aaaaaaaa
ISPEXEC FTINCL bbbbbbbb
ISPEXEC FTCLOSE
ISPEXEC VGET (ZTEMPF)
ISPEXEC EDIT DATASET('&ZTEMPF')
SUB '&ZTEMPF'
Back to top
View user's profile Send private message
Prasun De

New User


Joined: 17 Jan 2008
Posts: 28
Location: Kolkata, INDIA

PostPosted: Mon Jan 09, 2012 4:23 pm    Post subject: Reply to: ISPF file tailoring problem
Reply with quote

Hi PeterHolland,

I was just going through this thread and tried your approach. But the ISPEXEC EDIT command is throwing ISPF dialog error and
telling that the ZTEMPF temporary file is not cataloged.

But without the EDIT if I use only SUBMIT ZTEMPF, it does submit the job.

I am not getting why the temporary file is getting uncataloged before the execution is complete.

Please help me understand...
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10202
Location: italy

PostPosted: Mon Jan 09, 2012 4:37 pm    Post subject: Reply to: ISPF file tailoring problem
Reply with quote

the ZTEMPF dataset name returned is an ABSOLUTE dataset name...
( in other words the PREFIX/NOPREFIX process has already been done )

when using it the proper apostrophes should be used in order not to invoke again the PREFIX/NOPREFIX stuff
Code:
Address ISPEXEC "EDIT DATASET('"ZTEMPF"') "



also when You have a problem, good forum manners require to start a new topic
instead of piggybacking on an existing one, more than ever when the topic is 2 years old

Quote:
Hi PeterHolland,

forums are a community effort, what makes You think that Peter will interested in resurrecting a 2 years old topic
Back to top
View user's profile Send private message
PeterHolland

Global Moderator


Joined: 27 Oct 2009
Posts: 2422
Location: Netherlands, Amstelveen

PostPosted: Mon Jan 09, 2012 5:32 pm    Post subject:
Reply with quote

Quote:

forums are a community effort, what makes You think that Peter will interested in resurrecting a 2 years old topic


At my age its a problem to resurrect anything at all. icon_eek.gif
Back to top
View user's profile Send private message
Prasun De

New User


Joined: 17 Jan 2008
Posts: 28
Location: Kolkata, INDIA

PostPosted: Tue Jan 10, 2012 5:32 pm    Post subject:
Reply with quote

sorry for replying on a old topic.
I'll start a new one on this.

Thank You very much for replying though. I appreaciate your reply.
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 Add PD field from 2nd file to PD in 1st Sushant Garje DFSORT/ICETOOL 6 Thu Dec 01, 2016 4:32 pm
No new posts File Aid to File Manager conversion murali3955 IBM Tools 4 Thu Nov 24, 2016 3:41 pm
No new posts How to convert the VBM file to VB or... Sulabh Agrawal JCL & VSAM 4 Fri Nov 18, 2016 1:04 pm
No new posts CICS Roll back partially - Need to re... dwijadas CICS 4 Wed Nov 16, 2016 4:30 pm
No new posts Problem in writing Output file vickey_dw COBOL Programming 5 Mon Nov 14, 2016 11:14 pm


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