IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Filter Jobid is not working in the following code


IBM Mainframe Forums -> CLIST & REXX
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
teethu thomas

New User


Joined: 17 May 2007
Posts: 24
Location: India

PostPosted: Wed Jun 06, 2007 10:09 pm
Reply with quote

ADDRESS TSO
"ALLOC F(ISFIN) TRACKS SPACE(1) REU"
"ALLOC F(ISFOUT) DA ('DFC2.C03399.GLOB.FFB.SPOOL2') SHR"
"ALLOC F(TEMPPRT) DA('DFC2.C03399.GLOB.FFB.SPOOL') SHR"

SAY 'ENTER JOB ID'
PULL JOBID
QUEUE "PRE C033995$"
QUEUE "ST"
QUEUE " "
QUEUE "FILTER JOBID EQ "JOBID
QUEUE "++?"
QUEUE "FIND 'OUTD'"
QUEUE "++S"
QUEUE "PRINT FILE TEMPPRT "
QUEUE "PRINT 1 999999"
QUEUE "PRINT CLOSE"
QUEUE "END"
QUEUE "EXIT"

"EXECIO" QUEUED()" DISKW ISFIN (FINIS" /* INPUT TO SDSF BATCH */

ADDRESS ISPEXEC "SELECT PGM(ISFAFD) PARM('++32,255)" /* INVOKE SDSF */
SAY 'JOB FINISHED'
EXIT

In this code Filter Jobid is not working . Evverything else is workig fine. The first job in the spool is getting copied into the file. Can anybody tell me why it is not working. I have traced and copied the command and tried it in the spool that time it worked fine.
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales

PostPosted: Wed Jun 06, 2007 10:39 pm
Reply with quote

Take a look at this thread

http://ibmmainframes.com/viewtopic.php?t=20505
Back to top
View user's profile Send private message
teethu thomas

New User


Joined: 17 May 2007
Posts: 24
Location: India

PostPosted: Thu Jun 07, 2007 8:12 pm
Reply with quote

I have tried what ever mentioned in the link you have given but it is till not working. I have tried select as well as filter, it is working fine when i tried it in the spool i dont know hwy it is not working from the program. Can somebody suggest some other way to filter out a particular JOBID.
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales

PostPosted: Thu Jun 07, 2007 8:45 pm
Reply with quote

What exactly are you trying to do, copy the selected output of a job into a dataset. For one job or multiple jobs ?

You say that the first job is being copied but not other jobs.

Please give some more detail.
Back to top
View user's profile Send private message
teethu thomas

New User


Joined: 17 May 2007
Posts: 24
Location: India

PostPosted: Thu Jun 07, 2007 8:47 pm
Reply with quote

I am trying to copy a unique job (using JOBID) from the spool to a dataset.
Back to top
View user's profile Send private message
teethu thomas

New User


Joined: 17 May 2007
Posts: 24
Location: India

PostPosted: Thu Jun 07, 2007 8:48 pm
Reply with quote

Actually there are multiple jobs with the same JOBNAME. So I am trying to identify using the JOBID.
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales

PostPosted: Thu Jun 07, 2007 8:53 pm
Reply with quote

That was the exact problem that another user had, and the thread that I posted and linked to worked perfectly for that user.

Strange why it doesn't for you. You get nothing at all in the SDSF out dataset
Back to top
View user's profile Send private message
teethu thomas

New User


Joined: 17 May 2007
Posts: 24
Location: India

PostPosted: Thu Jun 07, 2007 9:09 pm
Reply with quote

I am getting written the spool into the output dataset but I am getting written the First Job. The filter is not working when I try through the REXX. Actually there are more than one job inthe SDSF in the same name that is why I am trying to filter using JOBID. But it is not filtering it out. Can you suggest something for this.( I have also used the ISFOUT to debug )
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales

PostPosted: Thu Jun 07, 2007 9:14 pm
Reply with quote

The code I used actually ran PGM=SDSF rather than from within a REXX, but I really can't see REXX causing a problem.

Try it in SDSF batch and see what happens. Use the code that I posted, just need to change it to fit your standards etc. etc.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> CLIST & REXX

 


Similar Topics
Topic Forum Replies
No new posts run rexx code with jcl CLIST & REXX 15
No new posts Compile rexx code with jcl CLIST & REXX 6
No new posts PD not working for unsigned packed JO... DFSORT/ICETOOL 5
No new posts Def PD not working for unsigned packe... JCL & VSAM 3
No new posts REXX code to expand copybook in a cob... CLIST & REXX 2
Search our Forums:

Back to Top