Ituriel,
Here is DFSORT/ICETOOL job that would give you the desired results. I
assumed that you can have a maximum of 100 records in a single record. I
assumed that the maximum length of each individual record has a length of
60 bytes.
//STEP0100 EXEC PGM=ICETOOL
//TOOLMSG DD SYSOUT
Hi,
I have an omvs file and would like to separate the fields into multiple
lines.The input file has the following format:
: Syncsort to DFSORT - my time has come.
[CAUTION: This Email is from outside the Organization. Unless you trust the
sender, Don’t click links or open attachments as it may be a Phishing email,
which can steal your Information and compromise your Computer.]
Barry pointed this out to me. And I did
within the year. For me, the path
to ASCII is not likely.
> -Original Message-
> From: IBM Mainframe Discussion List On
> Behalf Of Edward Finnell
> Sent: Wednesday, October 28, 2020 12:40 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Syncsort to DFSORT - my time
SAS and MXG have PC versions.
So, I lose MXG and reasonable ability to process SMF anyway.
-Original Message-
From: Gibney, Dave
To: IBM-MAIN@LISTSERV.UA.EDU
Sent: Wed, Oct 28, 2020 11:47 am
Subject: Re: Syncsort to DFSORT - my time has come.
If we had longer to exist, I might
t; Behalf Of Martin Packer
> Sent: Wednesday, October 28, 2020 1:32 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Syncsort to DFSORT - my time has come.
>
>
> FWIW I would go with SMF=FULL - unless you have an exceptionally large
> number of sorts - or tight SMF space restricti
Not my dog... I'm just a developer.
From: IBM Mainframe Discussion List on behalf of
Martin Packer
Sent: Wednesday, October 28, 2020 2:32 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Syncsort to DFSORT - my time has come.
FWIW I would go with SMF=FULL
TSOINV
> SMF=SHORT
> TD1
> SMF=SHORT
> TD2
> SMF=SHORT
> TD3
> SMF=SHORT
> TD4
> SMF=SHORT
>
>
> From: IBM Mainframe Discussion List on behalf
of R.S.
> Sent: Tuesday, October 27, 2020 11:26 AM
> To: IBM-MAI
EXEC PGM=ICETOOL
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//OUT DD SYSOUT=*
//TOOLIN DD *
DEFAULTS LIST(OUT)
/*
Thanks,
Kolusu
DFSORT Development
IBM Corporation
--
For IBM-MAIN subscribe / signoff / archi
t; To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Syncsort to DFSORT - my time has come.
>
> After review of our SYNCSORT settings, I have:
> * JCL (ICEAM1)
> JCL
> DYNALOC=(3390,10)
> DYNAUTO=IGNWKDD
> EQUALS=NO
> ERET=ABEND
> SORTLIB=SYSTEM
> Y2PAST=0
> *
> * INV (ICEAM2
EQUALS=NO
ERET=ABEND
SORTLIB=SYSTEM
Y2PAST=0
> -Original Message-
> From: IBM Mainframe Discussion List On
> Behalf Of R.S.
> Sent: Tuesday, October 27, 2020 10:26 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Syncsort to DFSORT - my time has
TD2
SMF=SHORT
TD3
SMF=SHORT
TD4
SMF=SHORT
From: IBM Mainframe Discussion List on behalf of
R.S.
Sent: Tuesday, October 27, 2020 11:26 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Syncsort to DFSORT - my time has come.
W dniu 27.10.2020 o 18:16, Gibney
> I can evaluate and transfer our long time SYNCSORT options. And the
manual does offer advice in this area.
Dave,
I sent you an email offline about DFSORT equivalent installation options
for syncsort. As always please feel free to send me any kind of questions
related to migration.
Tha
Thank you. I knew these existed, but hadn't searched them out yet. They will
be very helpful.
From: Sri h Kolusu
Sent: Tuesday, October 27, 2020 10:59 AM
To: Gibney, Dave
Subject: DFSORT Migration Documents
Hi Dave,
Not sure you already have these documents, but the following
less than one year before we stop z/OS and DFSORT is included in our MFaaS
contract.
> -Original Message-
> From: IBM Mainframe Discussion List On
> Behalf Of R.S.
> Sent: Tuesday, October 27, 2020 10:26 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Syncsort to DF
W dniu 27.10.2020 o 18:16, Gibney, Dave pisze:
A fairly quick question. Are there sample ICEPRMxx members provided by IBM
for tailoring DFSORT? I don't find any in SICESAMP.
Yesterday, in my sandbox, I IPL'd with SICELPA, SORTLPA, SICELINK, SORTLIB
ahead of the SYNCSORT libraries
Thanks,
Kolusu
DFSORT Development
IBM Corporation
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
A fairly quick question. Are there sample ICEPRMxx members provided by IBM
for tailoring DFSORT? I don't find any in SICESAMP.
Yesterday, in my sandbox, I IPL'd with SICELPA, SORTLPA, SICELINK, SORTLIB
ahead of the SYNCSORT libraries and not ICEPRMxx. SHOWZOS shows DFSORT as
resident sort
be.com/channel/UCu_65HaYgksbF6Q8SQ4oOvA
From: Sri h Kolusu
To: IBM-MAIN@LISTSERV.UA.EDU
Date: 26/10/2020 19:55
Subject:[EXTERNAL] Re: DFSORT Question
Sent by:IBM Mainframe Discussion List
Martin,
Like minds think alike :)
Thank you both.
Sent from my iPhone
> On Oct 26, 2020, at 3:55 PM, Sri h Kolusu wrote:
>
> Martin,
>
> Like minds think alike :)
>
> Thanks,
> Kolusu
>
>
> --
> For IBM-MAIN subscribe / signoff / archive access
Martin,
Like minds think alike :)
Thanks,
Kolusu
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
d
as Temp space and can be overlaid and the contents can referred
iteratively.)
If you're not familiar with DFSORT and DFSORT's ICETOOL, I'd suggest
reading through "z/OS DFSORT: Getting Started". It's an excellent tutorial,
with lots of examples, that will show you how to use DFSOR
ttps://www.youtube.com/channel/UCu_65HaYgksbF6Q8SQ4oOvA
From: Cameron Conacher
To: IBM-MAIN@LISTSERV.UA.EDU
Date: 26/10/2020 19:31
Subject:[EXTERNAL] Re: DFSORT Question
Sent by:IBM Mainframe Discussion List
Sri
Could you refer me to some documentation to help me better unders
SHIFT=LEFT,MID=C';'))
>
> OUTFIL FNAMES=TRACEIT
> /*
>
>
> If you wish to see the contents before SORT and eliminating the dups (SUM),
> then it is quite simple
>
> Change your SYSIN to the following (use a COPY operation). By default
> DFSORT will write
* MEMBER NAME
>100,08,CH,A) * PROC NAME
>
>SUM FIELDS=NONE
>
> OUTFIL INCLUDE=(162,1,CH,EQ,C'P'),
> BUILD=(82,80,SQZ=(SHIFT=LEFT,MID=C';'))
>
> OUTFIL FNAMES=TRACEIT
> /*
>
>
> If you wish to see the
your SYSIN to the following (use a COPY operation). By default
DFSORT will write out to the DDname SORTOUT. So check the contents from
position 82 thru 162.
//SYSINDD *
INCLUDE COND=((2,3,CH,NE,C'//*'),AND, * NO COMMENTS
(((2,11,CH,EQ,C'MEMBER NAME'),OR, * M
; on to the member content.
>
> The following shows the order of processing in DFSORT
>
>
> https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.4.0/com.ibm.zos.v2r4.icea100/ice2ca_DFSORT_processing_.htm
>
> If you show me your control cards I can re-code them to meet your
of processing in DFSORT
https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.4.0/com.ibm.zos.v2r4.icea100/ice2ca_DFSORT_processing_.htm
If you show me your control cards I can re-code them to meet your
requirements.
Thanks,
Kolusu
DFSORT Development
IBM Corporation
Hello folks,
I put together a small process that runs an IEBPTPCH to generate a stream
from one of our JCL Libraries.
Then I ran a small DFSORT to pull out the combinations of JCL Member Name
and the PROC Names that are executed from the JOB.
Everything is fine.
I do not understand the high level
On Tue, 13 Oct 2020 16:19:39 -0300, Clark Morris wrote:
>...
>What field is 1,4,CH? Why should an applications programmer have to
>know in 2020 that offset 5 in the COBOL data division map means 6 if
>it is a fixed block file and 10 if it is a variable block file?
>
PL1 and COBOL
are reading via DFSORT.
As for offsets, COBOL calculates the offsets by copybook/mapping of the
file. Similarly you can use DFSORT symbols to specify the layout of the
file and you can refer the fields directly in the control cards. DFSORT
even provides a smart trick to convert your COB
tfully disagree with you. The control statements for DFSORT
>are not obscure and they are on the same level as following the
>coding/syntax rules for a programming language. For example COBOL, you
>would follow all the rules governing it. So why not do the same for DFSORT?
What field is 1,
The suggestion was mine alone, and not meant to imply that it came from
you. That was not my intent.
In the sketchy strategy I suggested, my past task involved some additional
data manipulations other than differentiating various input formats.
Philosophically I agree that multiple passes of data
>Can DFSORT regular expressions do something similar?
Gil,
DFSORT supports regular expression for selecting/filtering data but it does
not support editing of the data.
>I believe Massimo Biancucci has already posted a simpler more general
solution.
Agreed. Massimo solution covers OP'
>> I've borrowed and taken advice from Sri K. and that's
always proven to be the path of simplicity.
Anthony,
Honestly I would never suggest multiple passes of data. So I am not sure
when I suggested "n" outfil approach to handle pattern.
Thanks,
Kolusu
g fixed length OUTREC will not solve the problem
>
Hmmm. I see that DFSORT lately supports regular expressions.
In a POSIX shell, I'd use "sed 's/ */ /g'". Can DFSORT regular
expressions do something similar? (I tested the sed command
on Ron's example.)
(Or just us
On Fri, 9 Oct 2020 13:24:47 -0500, Anthony B. wrote:
>Let's assume that 'n' patterns of input exist. Above we see two. Code 'n'
>number of OUTFIL statements, each with their own OUTREC constructs. Sorry I
>don't have an example to show but in the past I've seen many of what's
>being discussed.
Let's assume that 'n' patterns of input exist. Above we see two. Code 'n'
number of OUTFIL statements, each with their own OUTREC constructs. Sorry I
don't have an example to show but in the past I've seen many of what's
being discussed. I've borrowed and taken advice from Sri K. and that's
always
On Fri, 9 Oct 2020 13:02:26 -0500, Anthony B. wrote:
>So create a second OUTFIL.
>
I don't understand what you're suggesting. Can you provide
details? I suspect that what Ron posted was not his entire input,
but other numbers of blanks might exist in a larger data set.
>On Fri, Oct 9, 2020 at
So create a second OUTFIL.
On Fri, Oct 9, 2020 at 11:43 AM Ron Thomas wrote:
> Anthony - The file has data as below also
>
> 000657|VHO TRIVENTO RESERVA |MALBEC 750ML
> 007762|FJAO PTO CAMIL |T1 1KG
> 007762|FJAO PTO CAMIL |T1 1KG
> 007762|FJAO PTO CAMIL
On Thu, 8 Oct 2020 10:46:00 -0500, Ron Thomas wrote:
>
>I have a sample file as below and we would need to remove the spaces
>
>000645|VHO CASILLERO DIABLO |PINOT NOIR 750ML |
>...
>i have coded as below
>SORT FIELDS=COPY
>INREC OVERLAY=(001:001,010,UFF,M10,LENGTH=10,
>
paul- this was a typo error , what the output i got from my control card is
below
645|CASILLERODELDIABLO|VHOCASILLERODIABLO|
Thanks
Ron T
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to
Anthony - The file has data as below also
000657|VHO TRIVENTO RESERVA |MALBEC 750ML
007762|FJAO PTO CAMIL |T1 1KG
007762|FJAO PTO CAMIL |T1 1KG
007762|FJAO PTO CAMIL |T1 1KG
007762|FJAO PTO CAMIL |T1 1KG
007762|FJAO PTO CAMIL
I don't understand why the solution is so complex. If the spaces all line
up in fixed columns (I hope this assumption is correct), then simply coding
OUTRECs for each field non-blank would accomplish the desired output. I've
coded many hundreds of DF/SORT jobs and I don't see a degree of
thanks a lot Massimo . it worked great !!
Regards
Ron T
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
On Thu, 8 Oct 2020 10:46:00 -0500, Ron Thomas wrote:
>
>I have a sample file as below and we would need to remove the spaces
>
>000645|VHO CASILLERO DIABLO |PINOT NOIR 750ML |
>...
>i have coded as below
>SORT FIELDS=COPY
>INREC OVERLAY=(001:001,010,UFF,M10,LENGTH=10,
>
Ron,
sorry for me not understanding the meaning of the actual SYSIN.
If you run this (assuming SORTIN LRECL is 2500):
INREC FIELDS=(1,2500,SQZ=(SHIFT=LEFT,MID=C' '))
SORT FIELDS=COPY
OUTREC FINDREP=(INOUT=(C' |',C'|'))
The INREC squeezes the record dropping all spaces and inserting a single
Hello
I have a sample file as below and we would need to remove the spaces
000645|VHO CASILLERO DIABLO |PINOT NOIR 750ML |
000645|VHO CASILLERO DIABLO |PINOT NOIR 750ML |
000645|VHO CASILLERO DIABLO |PINOT NOIR 750ML |
000645|VHO CASILLERO
nly with double-blank at 651:
>
>
> Massimo,
>
> That will NOT work. Keybegin will look wherever there is a change in the
> key at position 40 for 5 bytes. So the first key change is on the Header
> record itself.
>
>
> Thanks,
> Kolusu
> DFSORT Development
> IBM Cor
Thanks a lot Kolusu.. it worked like a charm :)
mazimo- the solution provided did not work for me .
Regards
Ron T
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with
'01,06')
/*
>> for instance if the header record is the only with double-blank at 651:
Massimo,
That will NOT work. Keybegin will look wherever there is a change in the
key at position 40 for 5 bytes. So the first key change is on the Header
record itself.
Thanks,
Kolusu
DFSORT Development
IBM
Ron,
if you mean the very same header record of the file, if there's a condition
that does allow you to recognize it, for instance if the header record is
the only with double-blank at 651:
SORT FIELDS=COPY
OUTREC IFTHEN=(WHEN=GROUP,KEYBEGIN=(40,5),PUSH=(651:ID=2))
OUTFIL
Hello-
i have a file which has a header and detail records , i want to split the file
based on value and here below is the one i have coded
//SPLITEXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//SORTIN DD DSN=PYU678S.ITR1.FUTR.RTLDTA.UNLOAD,DISP=SHR
//OUT01DD SYSOUT=*
//OUT02DD SYSOUT=*
We are happy to announce DFSORT exploitation of Integrated Accelerator for
Z Sort is now available. The z15 provides a hardware accelerated approach
to sorting using a new CPU coprocessor that can be exploited by software
using the new SORTL instruction. By providing one sort accelerator per
core
Sent: Friday, September 25, 2020 1:16 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [IBM-MAIN] DFSort to pull the latest record date
[External Email: Use caution with links and attachments]
Why not load the data into a DB and use SQL or similar language?
If you have SAS - Max Min - functions
On Fri, 25 Sep 2020 10:25:13 -0700, Sri h Kolusu wrote:
>
>... The control statements for DFSORT
>are not obscure and they are on the same level as following the
>coding/syntax rules for a programming language. For example COBOL, you
>would follow all the rules governing it
On Fri, 25 Sep 2020 14:08:30 -0300, Clark Morris wrote:
>
>Given the obscurity of the control statements (quick tell me what
>field is 1,4,CH) why not write the thing in a language that has access
>to the descriptions of the fields being used? We are not in the era
>of 22K DOS360 partitions, 100K
Excel is awful to use. I would recommend doing as much as possible
elsewhere before loading into Excel. (Including what some of my code does:
Creating the CSV files in DFSORT.)
Cheers, Martin
Martin Packer
Systems Investigator & Performance Troubleshooter, IBM
+44-7802-245-584
e
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: DFSort to pull the latest record date
>>If you can load to EXCEL - use its functions
Not all functions on the mainframe can do everything. You should look at
what makes sense. And if the tool you are comfortable in using, does not
have the function, I
Thanks a lot Kolusu for the help.. it worked like a charm!!
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>>If you can load to EXCEL - use its functions
Not all functions on the mainframe can do everything. You should look at
what makes sense. And if the tool you are comfortable in using, does not
have the function, I would say to find one that does.
Lizette,
EXCEL is limited to 1 million
> Given the obscurity of the control statements (quick tell me what
> field is 1,4,CH) why not write the thing in a language
Clark,
I have to respectfully disagree with you. The control statements for DFSORT
are not obscure and they are on the same level as following the
coding/syntax
not have the
function, I would say to find one that does.
Hope that helps
Lizette
-Original Message-
From: IBM Mainframe Discussion List On Behalf Of Ron
Thomas
Sent: Friday, September 25, 2020 9:55 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: DFSort to pull the latest record date
Hello
> Here we need to pull the 2'nd record to the Output as this is the
> latest date .
Ron,
Use the following DFSORT/ICETOOL JCL which will give you the desired
results
//STEP0100 EXEC PGM=ICETOOL
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//IN DD *
+1+2
[Default] On 25 Sep 2020 09:54:45 -0700, in bit.listserv.ibm-main
ron5...@gmail.com (Ron Thomas) wrote:
>Hello
>
>We are using DFSORT utility to extract the latest record for a store/item/po
>and below is the sample file
>
>item_nbr| Store_nbr|Po_nbr|item_date|mode|
>
Hello
We are using DFSORT utility to extract the latest record for a store/item/po
and below is the sample file
item_nbr| Store_nbr|Po_nbr|item_date|mode|
00604|9137|1100276393|2017-12-26|7|DSD |
00604|9137|1100278550|2018-01-09|6|DSD |
Here we need to pull the 2'nd record
sults. I would suggest that the programmer have
this chart handy to understand the order of record processing
https://www.ibm.com/support/knowledgecenter/SSLTBW_2.4.0/com.ibm.zos.v2r4.icea100/ice2ca_DFSORT_processing_.htm#idg7073__stmtseq
Thanks,
Kolusu
DFSORT Development
IBM Co
I am repeatedly amazed at supposedly professional computer people who don't
know how to report problems. When an end user calls me and says "it didn't
work", I get it; I have to drag the necessary information out of him with
pointed and sometimes repeated questions ("What ~did~ it do?"
S Performance Specialist
> Cloud and Systems Performance
> IBM Corporation
> email: bet...@us.ibm.com
>
> IBM Mainframe Discussion List wrote on
> 08/20/2020 07:26:45 AM:
>
> > From: John McKown
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Date: 08/20/2020 07:
Performance Specialist
Cloud and Systems Performance
IBM Corporation
email: bet...@us.ibm.com
IBM Mainframe Discussion List wrote on
08/20/2020 07:26:45 AM:
> From: John McKown
> To: IBM-MAIN@LISTSERV.UA.EDU
> Date: 08/20/2020 07:27 AM
> Subject: [EXTERNAL] DFSORT confusion.
&g
would be any different, but I might try it if I
> get desperate enough.
>
>
>
> >
> > Joe
> >
> > On Thu, Aug 20, 2020 at 6:27 AM John McKown <
> john.archie.mck...@gmail.com>
> > wrote:
> >
> > > This is on z/OS 1.12 (sorry). A prog
oe
>
> On Thu, Aug 20, 2020 at 6:27 AM John McKown
> wrote:
>
> > This is on z/OS 1.12 (sorry). A programmer has run two DFSORT jobs with
> > slightly different control statements which both of us think should
> result
> > in the same output. But it does not
ifferent output files to see what is different
> (other than the 231 additional records)? Do you know which output set is
> correct?
>
OMIT is correct.
>
> Billy
> -- Original Message --
> From: "John McKown"
> To: IBM-MAIN@listserv.ua.edu
> Se
What happens if you code the include like this?
OUTFIL INCLUDE=(19,1,CH,EQ,C'ABCDEFGHIJKLNOPQRSTUVWXYZ0123456789')
Joe
On Thu, Aug 20, 2020 at 6:27 AM John McKown
wrote:
> This is on z/OS 1.12 (sorry). A programmer has run two DFSORT jobs with
> slightly different control statements
is
correct?
Billy
-- Original Message --
From: "John McKown"
To: IBM-MAIN@listserv.ua.edu
Sent: 8/20/2020 7:26:45 AM
Subject: DFSORT confusion.
This is on z/OS 1.12 (sorry). A programmer has run two DFSORT jobs with
slightly different control statements which both of us think sho
This is on z/OS 1.12 (sorry). A programmer has run two DFSORT jobs with
slightly different control statements which both of us think should result
in the same output. But it does not. One uses the OMIT statement. The other
uses an OUTFIL with a COND. Both use SUM FIELDS=NONE and EQUALS=YES
: Re: DFSORT and SS search
> This could be done thorough an RFE to JCL and no change to SORT,
> such as (suppose this worked):
>
> // SET X01=X'01',X05=X'05'
> //* Then:
> //SYSINDD *,SYMBOLS=JCLONLY
> OPTION COPY
> INCLUDE COND=(1,500,SS,EQ,'')
>
Gil,
Hex valu
On Mon, 17 Aug 2020 15:34:56 -0700, Sri h Kolusu wrote:
>> This could be done thorough an RFE to JCL and no change to SORT,
>> such as (suppose this worked):
>>
>> // SET X01=X'01',X05=X'05'
>> //* Then:
>> //SYSINDD *,SYMBOLS=JCLONLY
>> OPTION COPY
>> INCLUDE COND=(1,500,SS,EQ,'')
>
*,SYMBOLS=JCLONLY
OPTION COPY
INCLUDE COND=(1,80,SS,EQ,C'')
/*
Thanks,
Kolusu
DFSORT Development
IBM Corporation
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
COND=(1,500,SS,EQ,X'01F105C1C2C3C4C5')
>
>Many thanks. I eventualy used that X'???' format. I don't mind to do all the
>char to hex conversion myself. There is actually a REXX function just for
>that. Or I can just enter all fields in Char in a dataset and then use HEX
>DATA for a copy/p
> That absolutely works, but it's less intuitively legible than (e.g. in
Rexx):
> say '01'x || '1' || '05'x || 'ABCDE'
> (I've wished for similar facility in JCL.
Gil,
DFSORT V2R4 Supports Regular Expressions. You can use the following to get
the desired results.
//SY
Paul Gilmartin wrote:
>Welcome back. I've missed you since February.
Many thanks. Was busy with projects which kept me too busy and somewhat
sidetracked ...
I also missed being on the discussion lists where I can get advice and give
assistance where I can..
>That absolutely works, but it's
Char in a dataset and then use HEX DATA for a
copy/paste into DFSORT/ICETOOL JCL.
I initially wondered if that is possible using mixed formats ala REXX, but then
I remembered OPTION VLSCMP which included short records too where OPTION VLSHRT
totally sidetracked me.
Eventually I finally got all my res
On Mon, 17 Aug 2020 08:00:39 -0700, Sri h Kolusu wrote:
>>>I want to search for four terms: X'01' and C'1' and X'05' and C'ABCDE'.
>All these 4 terms are next to each other.
>
>Elardus,
>
Welcome back. I've missed you since February.
>
>Unless this is a trick question, isn't it simple to have
DD *
OPTION COPY
INCLUDE COND=(1,500,SS,EQ,X'01F105C1C2C3C4C5')
/*
Thanks,
Kolusu
DFSORT Development
IBM Corporation
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.
Good day to all DFSORT gurus,
Ok, I was not into these discussion lists for a time, was busy with 1001 other
things..
Question: Is it possible to use SS ('Substring Search') where I search for
variety of formats, like this one:
With input (sitting "anywhere" in a record):
3--
Gentlemen,
Thank you for your help. JOIN is the function I know less than other
features. Time to change it, since it is good thing.
I'll look at Smart DFSORT Tricks, especially I'm also author of one of
them. ;-)
(it was ~20 years ago, Frank Yeager asked me for that trick, nothing
big, just
>>I see it is candidate for REXX script, but DFSORT job seems to be more
elegant.
Radoslaw Skorupka,
As Max already shown DFSORT does have an elegant file matching capability
using JOINKEYS. Please check the smart DFSORT trick "Create files with
matching and non-matching reco
You can use JOIN function of DFSORT:
//ST100EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//FILE1 DD *
DSNAME01
DSNAME09
DSNAME02
DSNAME27
DSNAME04
/*
//FILE2 DD *
DSNAME09
DSNAME04
/*
//SORTOUT DD SYSOUT=*
//SYSIN DD *
JOINKEYS F1=FILE1,FIELDS=(1,44,A)
JOINKEYS F2=FILE2,FIELDS=(1,44,A)
JOIN
If you want to do it DFSORT, I think you'll have to use ICETOOL with the
SPLICE option.
Joe
On Thu, Jul 23, 2020 at 3:11 AM R.S. wrote:
> I have the following case:
>
> Large (thousands) list containing filenames,
> filea10002
> fileb10041
> filec20043
> filed39093
> l
entgh name, no
other fields exist in the record.
The goal is to exclude from large list all the entries which are present
in the short list.
Lists are unsorted, but I think it doesn't matter. I see it is candidate
for REXX script, but DFSORT job seems to be more elegant.
Any clue?
--
Radoslaw Sko
>which means writing a Rexx exec to parse it into
> something to match to the output of the other stuff
Tim,
You can use DFSORT to parse the content. If you need help parsing the
contents, then please send me an offline email with the contents to be
parsed.
Thanks,
Kolusu
DFSORT Devel
I could try to do that but I was hoping to use just the tools I have. The
nslookup command on z/OS (TSO and "TSO in batch" returns more than one line,
which means writing a Rexx exec to parse it into something to match to the
output of the other stuff
deal request for TCP/IP component. You can
parse the output from NSLOOKUP or DIG Command to meet your requirement.
Thanks,
Kolusu
DFSORT Development
IBM Corporation
--
For IBM-MAIN subscribe / signoff / archive access instru
I see no reason why SORT should be involved. A separate program to process
the SORT output would be simpler, more flexible, and more robust.
If you insist, an E35 could do it. But as an RFE, I think it's DOA.
sas
--
For
LLC
On Wed, 22 Jul 2020 18:23:38 +, Martin Packer
wrote:
>
>If it were me I’d probably extract the IP addresses, use another program to
>look them up, then do a DFSORT / ICETOOL JOIN on the original report and
>the looked up IP addresses / domains. (And take any ambiguity as i
If it were me I’d probably extract the IP addresses, use another program to
look them up, then do a DFSORT / ICETOOL JOIN on the original report and
the looked up IP addresses / domains. (And take any ambiguity as inevitable
dirtiness in the data.)
Cheers, Martin (NOT a DFSORT developer)
Sent
f Tim Hare
Sent: Wednesday, July 22, 2020 9:58 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Possible new function for DFSORT?
I don't think this function exists, and I'm thinking about writing up a SHARE
requirement for it (which I guess these days becomes an RFE but I'm a member of
SHARE so I thi
] On Behalf
Of Tim Hare
Sent: Wednesday, July 22, 2020 12:58 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Possible new function for DFSORT?
Caution! This message was sent from outside your organization.
I don't think this function exists, and I'm thinking about writing up a SHARE
requirement
@LISTSERV.UA.EDU] on behalf of Tim
Hare [haresystemssupp...@comcast.net]
Sent: Wednesday, July 22, 2020 12:57 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Possible new function for DFSORT?
I don't think this function exists, and I'm thinking about writing up a SHARE
requirement for it (which I guess these days
501 - 600 of 1369 matches
Mail list logo
