|
View previous topic :: View next topic
|
| Author |
Message |
josepnass
New User
Joined: 31 Dec 2003
Posts: 16
Location: dc
|
|
|
|
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  |
|
| Back to top |
|
 |
Frank Yaeger
DFSORT Developer
Joined: 15 Feb 2005
Posts: 7129
Location: San Jose, CA
|
|
|
|
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 |
|
|
josepnass
New User
Joined: 31 Dec 2003
Posts: 16
Location: dc
|
|
|
|
| thank u long day new job difficult people etc so hectic :-) |
|
| Back to top |
|
|
Frank Yaeger
DFSORT Developer
Joined: 15 Feb 2005
Posts: 7129
Location: San Jose, CA
|
|
|
|
| So is the DFSORT job I posted what you want or are you looking for something else? |
|
| Back to top |
|
|
josepnass
New User
Joined: 31 Dec 2003
Posts: 16
Location: dc
|
|
|
|
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 AS U KNOW SOME SHOPS LIKE IT DONE THEIR WAY .. IDEAS WELCOME IE TO HAVRE 2 STEPS |
|
| Back to top |
|
|
gcicchet
Senior Member
Joined: 28 Jul 2006
Posts: 1702
Location: Australia
|
|
|
|
Hi,
surely from what Frank has provided you can change it to a 2 step job
Gerry |
|
| Back to top |
|
|
josepnass
New User
Joined: 31 Dec 2003
Posts: 16
Location: dc
|
|
|
|
| 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 |
|
| Back to top |
|
|
gcicchet
Senior Member
Joined: 28 Jul 2006
Posts: 1702
Location: Australia
|
|
|
|
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 |
|
|
josepnass
New User
Joined: 31 Dec 2003
Posts: 16
Location: dc
|
|
|
|
| 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 |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007
Posts: 10888
Location: italy
|
|
|
|
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 |
|
|
Frank Yaeger
DFSORT Developer
Joined: 15 Feb 2005
Posts: 7129
Location: San Jose, CA
|
|
|
|
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 |
|
|
josepnass
New User
Joined: 31 Dec 2003
Posts: 16
Location: dc
|
|
|
|
I asked a question here and got some good answers.
Thank you all. |
|
| Back to top |
|
|
josepnass
New User
Joined: 31 Dec 2003
Posts: 16
Location: dc
|
|
|
|
| have a great weekend thanks for the answers Frank :-) |
|
| Back to top |
|
|
Terry Heinze
JCL Moderator
Joined: 14 Jul 2008
Posts: 1248
Location: Richfield, MN, USA
|
|
|
|
| I blame the proliferation of text messaging for the cryptic use of the English language these days. |
|
| Back to top |
|
|
josepnass
New User
Joined: 31 Dec 2003
Posts: 16
Location: dc
|
|
|
|
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 |
|
|
Terry Heinze
JCL Moderator
Joined: 14 Jul 2008
Posts: 1248
Location: Richfield, MN, USA
|
|
|
|
| It's hrd 2 no wht ur tlkng abt wen u use "chat speak" on a mnfrm bltn brd. |
|
| Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006
Posts: 19243
Location: Inside the Matrix
|
|
|
|
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 |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007
Posts: 10888
Location: italy
|
|
|
|
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 |
|
| Back to top |
|
|
Terry Heinze
JCL Moderator
Joined: 14 Jul 2008
Posts: 1248
Location: Richfield, MN, USA
|
|
|
|
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.  |
|
| Back to top |
|
|
Terry Heinze
JCL Moderator
Joined: 14 Jul 2008
Posts: 1248
Location: Richfield, MN, USA
|
|
|
|
| Besides that, old geezers have earned the right to be occasionally crotchety. |
|
| Back to top |
|
|
enrico-sorichetti
Superior Member
Joined: 14 Mar 2007
Posts: 10888
Location: italy
|
|
|
|
| couldn' t agree more |
|
| Back to top |
|
|
josepnass
New User
Joined: 31 Dec 2003
Posts: 16
Location: dc
|
|
|
|
ok ok relax i will try and use my harvard degree next time and put more effort into creating my sentence punctuation etc  dont be so quick to judge others |
|
| Back to top |
|
|
dick scherrer
Moderator Emeritus
Joined: 23 Nov 2006
Posts: 19243
Location: Inside the Matrix
|
|
|
|
Hello,
| Quote: |
| ok ok relax i will try and use my harvard degree next time and put more effort into creating my sentence punctuation etc |
What was wrong with this time?
| Quote: |
| dont be so quick to judge others |
When you repeatedly wave the "I'm inconsiderate" flag, it is not a quick judgement. . .
And this has certainly gone on more than is needed. . . 
And has been locked.
d |
|
| Back to top |
|
|
|
|
