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
 

 

Job step to extract from the dataset
Goto page 1, 2  Next
 
Post new topic   This topic is locked: you cannot edit posts or make replies.    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
josepnass

New User


Joined: 31 Dec 2003
Posts: 16
Location: dc

PostPosted: Thu Jul 31, 2008 4:37 am    Post subject: Job step to extract from the dataset
Reply with quote

I want to extract from a file i have ssns = '123445555' from column 7 into a seperate data set

next create a second job step to extract from the dataset created the following fund code '113' from column 21 into yet another data set


any ideas glady welcome here thanks icon_biggrin.gif
Back to top
View user's profile Send private message

Frank Yaeger

DFSORT Moderator


Joined: 15 Feb 2005
Posts: 7130
Location: San Jose, CA

PostPosted: Thu Jul 31, 2008 5:11 am    Post subject:
Reply with quote

You posted the same question on another board and I told you how to do it using a DFSORT job like this:

Code:

//S1    EXEC  PGM=ICEMAN
//SYSOUT    DD  SYSOUT=*
//SORTIN DD DSN=...  input file
//OUT1 DD DSN=...  output file1
//OUT2 DD DSN=...  output file2
//SYSIN    DD    *
  OPTION COPY                                     
  INCLUDE COND=(7,9,CH,EQ,C'123445555')           
  OUTFIL FNAMES=OUT1                             
  OUTFIL FNAMES=OUT2,INCLUDE=(3,3,CH,EQ,C'113')   
/*


Why are you posting the same question here?

If you're looking for a solution using a particular program, programming language or utility (not DFSORT), you should identify what you want exactly so people will know what you're looking for.
Back to top
View user's profile Send private message
josepnass

New User


Joined: 31 Dec 2003
Posts: 16
Location: dc

PostPosted: Thu Jul 31, 2008 5:16 am    Post subject:
Reply with quote

thank u long day new job difficult people etc so hectic :-)
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Moderator


Joined: 15 Feb 2005
Posts: 7130
Location: San Jose, CA

PostPosted: Thu Jul 31, 2008 5:17 am    Post subject:
Reply with quote

So is the DFSORT job I posted what you want or are you looking for something else?
Back to top
View user's profile Send private message
josepnass

New User


Joined: 31 Dec 2003
Posts: 16
Location: dc

PostPosted: Thu Jul 31, 2008 5:42 am    Post subject:
Reply with quote

YAH I AM NEW THERE THEY WANT IN 2 STEPS I HAVE THE FILE EXTRACT FROM ITS SSNS THAT ARE IN COLUMN 7 EQ TO '123556666' INTO A SEPARATE DATA SET

THEN CREATE A SECOND JOBSTEP TO EXTRACT FROM THE THE DATA SET CREATED THE FUND CODE WHCH IS IN COLUM 31 INTO YET ANOTHER DATA SET icon_biggrin.gif AS U KNOW SOME SHOPS LIKE IT DONE THEIR WAY .. IDEAS WELCOME IE TO HAVRE 2 STEPS
Back to top
View user's profile Send private message
gcicchet

Senior Member


Joined: 28 Jul 2006
Posts: 1703
Location: Australia

PostPosted: Thu Jul 31, 2008 5:54 am    Post subject:
Reply with quote

Hi,

surely from what Frank has provided you can change it to a 2 step job


Gerry
Back to top
View user's profile Send private message
josepnass

New User


Joined: 31 Dec 2003
Posts: 16
Location: dc

PostPosted: Thu Jul 31, 2008 6:54 am    Post subject:
Reply with quote

ok so on step 2 should i execute pgm iceman again remember i am not a jcl person etc u guys are and obviously jcl can be complicated just being along few weeks here came back from california to dc etc was doing adabas natural now jcl time icon_biggrin.gif
Back to top
View user's profile Send private message
gcicchet

Senior Member


Joined: 28 Jul 2006
Posts: 1703
Location: Australia

PostPosted: Thu Jul 31, 2008 7:20 am    Post subject:
Reply with quote

Hi,

here is an example
Code:
//S1       EXEC PGM=ICEMAN                                     
//SYSOUT   DD SYSOUT=*                                         
//SORTIN   DD DSN=  INPUT-FILE                                 
//OUT1     DD DSN=  OUTPUT FILE                               
//SYSIN    DD *                                               
  OPTION COPY                                                 
  INCLUDE COND=(7,9,CH,EQ,C'123445555')                       
  OUTFIL FNAMES=OUT1                                           
/*                                                             
//S2       EXEC PGM=ICEMAN                                     
//SYSOUT   DD SYSOUT=*                                         
//SORTIN   DD DSN= INPUT-FILE FROM OUT1 IN PREVIOUS STEP       
//OUT2     DD DSN= OUTPUT-FILE                                 
//SYSIN    DD    *                                             
  OPTION COPY                                                 
  INCLUDE COND=(3,3,CH,EQ,C'113')                             
  OUTFIL FNAMES=OUT2                                           
/*                                                             


I'm not sure if you are "not a JCL person" how you are going to deal with all the other parameters required to create the output files or with JCL errors etc etc.

I could go on but maybe I'm missing something.

Good luck


Gerry
Back to top
View user's profile Send private message
josepnass

New User


Joined: 31 Dec 2003
Posts: 16
Location: dc

PostPosted: Thu Jul 31, 2008 3:47 pm    Post subject:
Reply with quote

thanks will get back to u i am familiar just have nt used it for a while u mean the disp rec size etc
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10201
Location: italy

PostPosted: Thu Jul 31, 2008 7:04 pm    Post subject: Reply to: Job step to extract from the dataset
Reply with quote

Sir,

avoiding posting in all capitals, and using wannabe hacker' s posting style (*)
Quote:
hanks will get back to u i am familiar just have nt used it for a while u mean the disp rec size etc

might help to get You more benevolent answers

(*) but maybe it' s just a symptom of a broken keyboard
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Moderator


Joined: 15 Feb 2005
Posts: 7130
Location: San Jose, CA

PostPosted: Thu Jul 31, 2008 9:28 pm    Post subject:
Reply with quote

josepnass,

If you really need two steps, then you can use this DFSORT job:

Code:

//S1       EXEC PGM=ICEMAN                                     
//SYSOUT   DD SYSOUT=*                                         
//SORTIN   DD DSN=...  input file                                 
//SORTOUT DD DSN=...  output file1                               
//SYSIN    DD *                                               
  OPTION COPY                                                 
  INCLUDE COND=(7,9,CH,EQ,C'123445555')                       
/*                                                             
//S2       EXEC PGM=ICEMAN                                     
//SYSOUT   DD SYSOUT=*                                         
//SORTIN   DD DSN=...  output file1       
//SORTOUT  DD DSN=... output file2                               
//SYSIN    DD    *                                             
  OPTION COPY                                                 
  INCLUDE COND=(3,3,CH,EQ,C'113')                             
/*         
Back to top
View user's profile Send private message
josepnass

New User


Joined: 31 Dec 2003
Posts: 16
Location: dc

PostPosted: Thu Jul 31, 2008 10:19 pm    Post subject: CALM DOWN
Reply with quote

I asked a question here and got some good answers.
Thank you all.
Back to top
View user's profile Send private message
josepnass

New User


Joined: 31 Dec 2003
Posts: 16
Location: dc

PostPosted: Sat Aug 02, 2008 12:07 am    Post subject: okay
Reply with quote

have a great weekend thanks for the answers Frank :-) icon_biggrin.gif
Back to top
View user's profile Send private message
Terry Heinze

JCL Moderator


Joined: 14 Jul 2008
Posts: 1238
Location: Richfield, MN, USA

PostPosted: Mon Aug 04, 2008 10:18 pm    Post subject:
Reply with quote

I blame the proliferation of text messaging for the cryptic use of the English language these days.
Back to top
View user's profile Send private message
josepnass

New User


Joined: 31 Dec 2003
Posts: 16
Location: dc

PostPosted: Mon Aug 04, 2008 10:28 pm    Post subject:
Reply with quote

what are u talking about please be more specific here what is it your trying to say hard to read between the lines
Terry Heinze wrote:
I blame the proliferation of text messaging for the cryptic use of the English language these days.
Back to top
View user's profile Send private message
Terry Heinze

JCL Moderator


Joined: 14 Jul 2008
Posts: 1238
Location: Richfield, MN, USA

PostPosted: Mon Aug 04, 2008 10:45 pm    Post subject:
Reply with quote

It's hrd 2 no wht ur tlkng abt wen u use "chat speak" on a mnfrm bltn brd.
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Mon Aug 04, 2008 11:23 pm    Post subject:
Reply with quote

Hello,

Terry refers to this form of "communication". . .
Quote:
thanks will get back to u i am familiar just have nt used it for a while u mean the disp rec size etc
You have put together several thoughts and i believe a question with out bothering to form any kind of sentence, spell the words, use any punctuation, etc.

You did the same thing in your reply to Terry.

It is both lazy, and rude. This is not some chat room or IM service.

Due to the number of "freshers", "newbies". students, etc and the number of people who do not have English as their primary language, it is important to be clear. To many, "texting" is not.
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10201
Location: italy

PostPosted: Mon Aug 04, 2008 11:47 pm    Post subject: Reply to: Job step to extract from the dataset
Reply with quote

Hi Terry !

Quote:
It's hrd 2 no wht ur tlkng abt wen u use "chat speak" on a mnfrm bltn brd.


How did You do it ?
some kind of advanced crypto algorithm icon_biggrin.gif
Back to top
View user's profile Send private message
Terry Heinze

JCL Moderator


Joined: 14 Jul 2008
Posts: 1238
Location: Richfield, MN, USA

PostPosted: Mon Aug 04, 2008 11:56 pm    Post subject:
Reply with quote

I apologize for being so sarcastic, but I really get tired of reading IM-speak on a forum where terminology and precise terms are so important. I have no problem dealing with posts from folks whose 1st language is not English. I can usually figure out what the intent of the question or reply is. What I have a hard time with is people who are just too lazy to express themselves so that others know what they're talking about. icon_smile.gif
Back to top
View user's profile Send private message
Terry Heinze

JCL Moderator


Joined: 14 Jul 2008
Posts: 1238
Location: Richfield, MN, USA

PostPosted: Tue Aug 05, 2008 12:04 am    Post subject:
Reply with quote

Besides that, old geezers have earned the right to be occasionally crotchety. icon_smile.gif
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   This topic is locked: you cannot edit posts or make replies.    IBMMAINFRAMES.com Support Forums -> JCL & VSAM 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 FTP - JCL failed while passing FTP co... Suneetha1612 JCL & VSAM 12 Wed Nov 16, 2016 7:33 pm
No new posts To trim spaces in a pipe delimited da... Nish84 COBOL Programming 16 Mon Oct 10, 2016 1:54 pm
No new posts Allocate dataset withour BLKSIZE Susanta CLIST & REXX 2 Thu Sep 22, 2016 11:51 am
No new posts Converting multiple VB files to FB fi... Viswanath Reddy JCL & VSAM 6 Mon Aug 08, 2016 11:49 pm
No new posts dataset copy question - REPRO or some... atulxp TSO/ISPF 2 Wed Aug 03, 2016 10:56 pm


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