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 think I'll go that way). I thought I'd ask whether it would be
used enough to justify going through that process.
What I'm
h
defeats the purpose of variable length records. For VLR you put the temp
field right after the RDW and move the contents to the right.
Thanks,
Kolusu
DFSORT Development
IBM Corporation
--
For IBM-MAIN subscribe / signoff / archi
to have bothered all y'all!
Billy
-- Original Message --
From: "Billy Ashton"
To: "IBM Mainframe Discussion List"
Sent: 6/3/2020 12:12:33 PM
Subject: How to create two output files in DFSORT
Hi folks!
Today's SORT challenge:
I am reading a temporary fil
On Wed, 3 Jun 2020 16:12:33 +, Billy Ashton wrote:
>
>Today's SORT challenge:
>I am reading a temporary file for input, created in an earlier jobstep.
>I am using
>OPTION COPY
>INCLUDE COND=.
>INREC IFTHEN=
>
>OUTREC ...,
>IFTHEN=...
>
>This keeps only the records I want to reformat,
Hi folks!
Today's SORT challenge:
I am reading a temporary file for input, created in an earlier jobstep.
I am using
OPTION COPY
INCLUDE COND=.
INREC IFTHEN=
OUTREC ...,
IFTHEN=...
This keeps only the records I want to reformat, and creates a nice
output file of commands. However,
On Wed, 27 May 2020 19:04:09 +, Seymour J Metz wrote:
>No, it is not correct; it does not check the lengths of quoted components, but
>it does check the total length.
>
IBM agrees, promptly:
IBM>Hello.
IBM>I am the writer for the z/OS JCL Reference documentation and have received
your
From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of
Paul Gilmartin [000433f07816-dmarc-requ...@listserv.ua.edu]
Sent: Wednesday, May 27, 2020 12:11 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: DSN SYNTAX (was: ... last node in DFSORT)
On Wed, 27 May 2020 23:29:23 +0800
Gilmartin [000433f07816-dmarc-requ...@listserv.ua.edu]
Sent: Wednesday, May 27, 2020 11:20 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: DSN SYNTAX (was: ... last node in DFSORT)
On Wed, 27 May 2020 03:13:08 +, Seymour J Metz wrote:
>PATH ¬= DSN
>
But he did include the substring
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: DSN SYNTAX (was: ... last node in DFSORT)
Not an excuse but I bet they mean they don't validate the length of the node
names. DSN='MYLONGNODE.WHATEVER' is valid.
Charles
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN
SYNTAX (was: ... last node in DFSORT)
Well, it was designed one piece at a time. First came DSN's and VTOC's; then
came catalogs; then came UNIX filenames.
Charles
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf
Of Paul Gilmartin
Sent
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: DSN SYNTAX (was: ... last node in DFSORT)
On Wed, 27 May 2020 23:29:23 +0800, David Crayford wrote:
>>> //...
>> This moved me to look up DSN syntax in the JCL Ref.
>> It's chaos; I detect no plan in the design; it was put
>> t
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: DSN SYNTAX (was: ... last node in DFSORT)
On Wed, 27 May 2020 03:13:08 +, Seymour J Metz wrote:
>PATH ¬= DSN
>
But he did include the substring ".dsn" in the pathname.
>
>From: Sri h Kolusu
>Se
I hate JCL!
On 2020-05-28 12:11 AM, Paul Gilmartin wrote:
On Wed, 27 May 2020 23:29:23 +0800, David Crayford wrote:
//...
This moved me to look up DSN syntax in the JCL Ref.
It's chaos; I detect no plan in the design; it was put
together One Piece At A Time:
On Wed, 27 May 2020 23:29:23 +0800, David Crayford wrote:
>>> //...
>> This moved me to look up DSN syntax in the JCL Ref.
>> It's chaos; I detect no plan in the design; it was put
>> together One Piece At A Time:
>> https://www.youtube.com/watch?v=060A15ELz00
>Agreed! I had to write a
On 2020-05-27 11:20 PM, Paul Gilmartin wrote:
From: Sri h Kolusu
Sent: Tuesday, May 26, 2020 9:49 PM
...
Empirically, I found I couldn't create a DSN starting with a period even
within apostrophes. I don't know where this is documented.
This works fine for me
...
//SORTOUT DD
On Wed, 27 May 2020 03:13:08 +, Seymour J Metz wrote:
>PATH ¬= DSN
>
But he did include the substring ".dsn" in the pathname.
>
>From: Sri h Kolusu
>Sent: Tuesday, May 26, 2020 9:49 PM
>...
>> Empirically, I found I couldn't create a DSN starting with a
*Yakity Yak - The Coasters April 1958. *
I'm more of a Jeff Beck man. You're everywhere and nowhere baby.(Hi Ho
Silver Lining).
Or the inimitable Mrs Doubtfire (oooh, all over the place!).
--
For IBM-MAIN subscribe /
> From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf
> of Sri h Kolusu [skol...@us.ibm.com]
> Sent: Tuesday, May 26, 2020 9:49 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: How to get last node in DFSORT
>
> > Empirically, I found I c
: Re: How to get last node in DFSORT
> Empirically, I found I couldn't create a DSN starting with a period even
> within apostrophes. I don't know where this is documented.
Gil,
This works fine for me
//STEP0100 EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//SORTIN DD *
dummyrecord
//SORTOUT D
> Empirically, I found I couldn't create a DSN starting with a period even
> within apostrophes. I don't know where this is documented.
Gil,
This works fine for me
//STEP0100 EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//SORTIN DD *
dummyrecord
//SORTOUT DD PATH='/tmp/.create.dsn.with.period',
//
On Tue, 26 May 2020 22:50:10 +, Seymour J Metz wrote:
>
>Well, if it were up to me z/OS would support cataloged data sets with longer
>index levels, but circumstances being what they are I'd rather not parse them.
>Besides, they're only valid inside of apostrophes.
>
DISABLE(DSNCHECK)
Discussion List On Behalf Of
Seymour J Metz
Sent: Tuesday, May 26, 2020 6:50 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: How to get last node in DFSORT
> And Sri's example contained a node longer than 8 bytes.
Well, if it were up to me z/OS would support cataloged data sets with longer
in
alf of
Paul Gilmartin [000433f07816-dmarc-requ...@listserv.ua.edu]
Sent: Tuesday, May 26, 2020 6:02 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: How to get last node in DFSORT
On Tue, 26 May 2020 19:42:31 +, Seymour J Metz wrote:
>Well, in this case the hammer is the reverse fu
On Tue, 26 May 2020 19:42:31 +, Seymour J Metz wrote:
>Well, in this case the hammer is the reverse function;
>/\.([#$@[:upper:][:digit:]]{1,8})\n/, despite the awkward syntax, is still
>cleaner.
>
I was more thinking of the OP's requirement for DFSORT as the hammer.
And
m: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of
> Paul Gilmartin [000433f07816-dmarc-requ...@listserv.ua.edu]
> Sent: Tuesday, May 26, 2020 2:51 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: How to get last node in DFSORT
>
> On Sun, 24 May 2020 05:02:2
From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of
Paul Gilmartin [000433f07816-dmarc-requ...@listserv.ua.edu]
Sent: Tuesday, May 26, 2020 2:51 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: How to get last node in DFSORT
On Sun, 24 May 2020 05:02:24 +
On Sun, 24 May 2020 05:02:24 +, Seymour J Metz wrote:
>That sounds like a great use case for regexen.
>
Ob"When your favorite tool is a hammer ..."
>
>From: Billy Ashto
>Sent: Friday, May 22, 2020 3:57 PM
>
>I have an 80-byte LRECL list of filenames
/22/2020 8:44:32 PM
Subject: Re: How to get last node in DFSORT
Col 51...
For some reason the original question did not arrive in my inbox, but the
subsequent emails came in. So I did not see the actual requirement. So
adjusted the control cards to put the last node at position 51
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: How to get last node in DFSORT
Hi folks! This should be easy, but it escapes me...
I have an 80-byte LRECL list of filenames (starting in col 1, varying
lengths), and I need to capture just the last node of the file, and
store it as a separate word
BUILD=(01,44,51:46,8)),
> IFTHEN=(WHEN=NONE,BUILD=(01,44,51:45,9,JFY=(SHIFT=LEFT)))
> /*
>
> Thanks,
> Kolusu
> DFSORT Development
> IBM Corporation
>
>
> --
> For IBM-MAIN subscribe / signoff / ar
HEN=NONE,BUILD=(01,44,51:45,9,JFY=(SHIFT=LEFT)))
/*
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
.EFGHIJKL EFGHIJKL
> JOSEPH.CONTROL.SAMPLIB.JCL JCL
> PRODUCTION.CONTROL.VSAM.DATABASE.INDEX INDEX
> SYS1.PARMLIB PARMLIB
> SYS5.NPLEX1.PARMLIB PARMLIB
> SYS4.UBS.EXEC EXEC
> SYS3.UBS.A.B.C.D D
> SYS3.UBS.ABC.C.DE DE
> SYS3.UBS.AB.BC.DE DE
> SYS3.UBS.AB.BC.XAB XAB
>
&
RMLIB
SYS4.UBS.EXEC EXEC
SYS3.UBS.A.B.C.D D
SYS3.UBS.ABC.C.DE DE
SYS3.UBS.AB.BC.DE DE
SYS3.UBS.AB.BC.XAB XAB
On Sat, May 23, 2020 at 7:42 AM Sri h Kolusu wrote:
> Billy,
>
> Use the following DFSORT JCL which will give you the desired results
>
> //STEP0100 EXEC PGM=SORT
> //SYSOUT
Billy,
Use the following DFSORT JCL which will give you the desired results
//STEP0100 EXEC PGM=SORT
//SYSOUT DD SYSOUT=*
//SORTIN DD *
A.B.C.D.E
A.B.C.D.EF
A.B.C.D.EFG
A.B.C.D.EFGH
A.B.C.D.EFGHI
A.B.C.D.EFGHIJ
A.B.C.D.EFGHIJK
A.B.C.D.EFGHIJKL
JOSEPH.CONTROL.SAMPLIB.JCL
REV = REVERSE(PRODUCTION.CONTROL.VSAM.DATABASE.INDEX)
PARSE VALUE REV WITH LASTNODE '. ' .
LASTNODE = REVERSE(LASTNODE)
On Sat, May 23, 2020 at 7:16 AM Wayne Bickerdike wrote:
> Use REXX REVERSE function.
> Then parse out the first value.
> Reverse it again.
>
>
> On Sat, May 23, 2020
Use REXX REVERSE function.
Then parse out the first value.
Reverse it again.
On Sat, May 23, 2020 at 5:57 AM Billy Ashton wrote:
> Hi folks! This should be easy, but it escapes me...
>
> I have an 80-byte LRECL list of filenames (starting in col 1, varying
> lengths), and I need to capture
Hi folks! This should be easy, but it escapes me...
I have an 80-byte LRECL list of filenames (starting in col 1, varying
lengths), and I need to capture just the last node of the file, and
store it as a separate word on the record, in col 51.
For example, if the file has
ttps://www.youtube.com/channel/UCu_65HaYgksbF6Q8SQ4oOvA
From: Bob Bridges
To: IBM-MAIN@LISTSERV.UA.EDU
Date: 20/04/2020 17:38
Subject:[EXTERNAL] Re: DFSORT? Rexx? Re: Print/copy one record of
each type/subtype
Sent by:IBM Mainframe Discussion List
Wait, what? Since when?
---
On Mon, 20 Apr 2020 12:38:05 -0400, Bob Bridges wrote:
>Wait, what? Since when?
>
Now in:
z/OS Version 2 Release 4
TSO/E REXX Reference
IBM SA32-0972-40
https://www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.ikja300/dup0037.htm
I don't know the boundary. Bitsavers?
Wait, what? Since when?
---
Bob Bridges, robhbrid...@gmail.com, cell 336 382-7313
/* Great good nature, without prudence, is a great misfortune. -Poor Richard */
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf
Of Paul Gilmartin
Sent:
On Mon, 20 Apr 2020 15:43:44 +, kekronbekron wrote:
>
>When working with VBS files, I reckon it's easiest to get 1 of each (SMF
>record type & subtype) using DFSORT.
>Are there easier ways?
>Can y'all please help with a sample for picking such unique RTY_STY using
>select DB2 data as an E15 exit for DFSORT?
>
>My ideal would be (Maybe I should write an RFE)
>--
>In ICETOOL the ability to code SQLSEL FROM(SQL) USING()
>
>CNTL DD *
>
>SELECT
For anybody that might be interested, SYNCSORT can run SQL SELECT sta
I was not aware that the UNLOAD utility invoked DFSORT, I figured DSNTIAUL
did. I was wondering it that was as efficient as invoking an SQL query in E15,
but with the other responses I think it's probably not worth coding another
one to find out.
As for creating the symbols - I can
about it?
>
> There is nothing secret about it. Just did not want to clutter this forum
> and I wasn't even sure if OP was willing to share his DB2 DDL's.
>
> DFSORT Smart tricks page already has "Create DFSORT Symbols from COBOL
> Copybook" trick which can be used to create DFSORT s
> Why offline? What's so secret about it?
There is nothing secret about it. Just did not want to clutter this forum
and I wasn't even sure if OP was willing to share his DB2 DDL's.
DFSORT Smart tricks page already has "Create DFSORT Symbols from COBOL
Copybook" trick which can be u
On 2020-04-16 17:56, Sri h Kolusu wrote:
It would be nice if this could execute before SYMNAMES is read, so
the SELECT handler could create symbols for all of the columns in
the result set.
If your intention is to create DFSORT symbols from DB2 table definition
then there are a couple of ways
Tim,
DFSORT or ICETOOL does NOT have the capability of running DB2 queries.
However DB2 utilities(LOAD, REORG, UNLOAD..) invoke DFSORT in the
background. IBM already have 2 free unload utilities that does the job for
you. DSNTIAUL and DSNTEP2 are free unload utilities. DSNTIAUL unload
utility
Before I start chiseling a piece of stone into a wheel :-) - I've been
thinking about ICETOOL and DB2. Is there already in existence something that
would provide a SELECT (similar to what is used in DSNTIAUL or DSNTIAD) to
select DB2 data as an E15 exit for DFSORT?
My ideal would
ause the job to fail on a "NC2" message instead of
just ending with RC=0. It's not a dfsort behavior per se, but a z/OS wide
behavior.
Rex
-Original Message-
From: IBM Mainframe Discussion List On Behalf Of
Gadi Ben-Avi
Sent: Tuesday, January 28, 2020 11:30 PM
To: IB
They are users
They make mistakes :-)
I will check the ALLOC parameters.
Gadi
-Original Message-
From: IBM Mainframe Discussion List On Behalf Of Sri
h Kolusu
Sent: Wednesday, January 29, 2020 3:56 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: DFSort question
>>The output d
hence the
job failed. As mike pointed out the dataset still exists and you can
reference it with VOLSER.
Why would you create a dataset with the same name?
Thanks,
Kolusu
DFSORT Development
IBM Corporation
--
For IBM-MAIN sub
ser ran a job the uses DFSort to copy a dataset.
>The output dataset is on tape.
>The output dataset existed on tape before the job run.
>Message IGD17101I was issued saying that there already was a dataset with that
>name.
>The job ended with condition code 0.
>
>Is this a DFSort b
On Wed, 29 Jan 2020 05:29:40 +, Gadi Ben-Avi wrote:
>Hi,
>User ran a job the uses DFSort to copy a dataset.
>The output dataset is on tape.
>The output dataset existed on tape before the job run.
>Message IGD17101I was issued saying that there already was a dataset with that
or virtual tape. Lookout for automatic
deletion due to expiration or not cataloged status.
On Tue, Jan 28, 2020 at 11:30 PM Gadi Ben-Avi wrote:
>
> Hi,
> User ran a job the uses DFSort to copy a dataset.
> The output dataset is on tape.
> The output dataset existed on tape bef
Hi,
User ran a job the uses DFSort to copy a dataset.
The output dataset is on tape.
The output dataset existed on tape before the job run.
Message IGD17101I was issued saying that there already was a dataset with that
name.
The job ended with condition code 0.
Is this a DFSort behavior?
If yes
f the overlapping fields was a typo, and if you say that you are
> getting 2
> > > records, then I am guessing that there is an OVERFLOW during summing
> and
> > > you would see an
LOW during summing and
> > you would see an ICE152I message. Check if your joblog has any such
> > message. You can override the return code 0 during overflow by adding the
> > following statement to your control card statement.
> >
> > OPTION OVFLO=RC4
> >
>>Can send you the file and job so you can see
> yourself ). please confirm this option.
Please send as text files. I would also like to see your joblog too.
Thanks.
Kolusu
DFSORT Development
IBM Corporation
--
For
e right DDname (earlier scenario)
> and right file?
>
> I would like to see the entire joblog once again. Please send it to me
> offline
>
>
> Thanks,
> Kolusu
> DFSORT Development
> IBM Corporation
>
> ---
see the entire joblog once again. Please send it to me
offline
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
ng summing and
> you would see an ICE152I message. Check if your joblog has any such
> message. You can override the return code 0 during overflow by adding the
> following statement to your control card statement.
>
> OPTION
Check if your joblog has any such
message. You can override the return code 0 during overflow by adding the
following statement to your control card statement.
OPTION OVFLO=RC4
Thanks,
Kolusu
DFSORT Development
IBM Corporation
I have a sort filed of (1,2,ch,a) and sum flelds =(3,4,zd,5,6,zd). there
are many input records with same sort field value. I would expect to have a
single record in the output. however, I get two. what am i missing?
ITschak
--
ITschak Mugzach
*|** IronSphere Platform* *|* *Information
Lower case 'f' not same as 'F'. Not a valid sign or zone.
On Thu, Oct 24, 2019 at 11:45 PM ITschak Mugzach wrote:
> the following situation return abend0c7:
> 1. sort fields=(1,4,ch,a,9,5,ch,a)
>sum fields=(245,15,ZD)
>sum statement caused the abend. without sum, no issue.
>
> 2. run
> In your mailbox.
ITschak
Responded back. Probably an oversight. :) 125 and 245 are not one and
same. :D
Thanks,
Kolusu
DFSORT Development
IBM Corporation
--
For IBM-MAIN subscribe / signoff / archive access instructi
.
>
> If you say the VERIFY operator shows every record as valid, I would like to
> see the Complete joblog( Both SORT+SUM and the VERIFY). You can send it
> offline to my email id
>
> Thanks
> Kolusu
> DFSORT Development
> IBM Corporation
>
> -
SORT+SUM and the VERIFY). You can send it
offline to my email id
Thanks
Kolusu
DFSORT Development
IBM Corporation
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with th
uot;
Laozi
From: ITschak Mugzach
To: IBM-MAIN@LISTSERV.UA.EDU
Date: 2019-10-24 15:22
Subject:[EXTERNAL] Re: dfsort SUM processing
Sent by:IBM Mainframe Discussion List
I think CH is invalid for sum
בתאריך יום ה׳, 24 באוק׳ 2019, 17:10, מאת Joao Bentes <
joao.bentes.je.
; To: IBM-MAIN@LISTSERV.UA.EDU
> Date: 2019-10-24 14:54
> Subject:Re: [External] dfsort SUM processing
> Sent by:IBM Mainframe Discussion List
>
>
>
> It is not a copy paste. I might count wrong.
>
> בתאריך יום ה׳, 24 באוק׳ 2019, 16:44, מאת Lars H?glund &
thousand miles must begin with a single
step."
Laozi
From: ITschak Mugzach
To: IBM-MAIN@LISTSERV.UA.EDU
Date: 2019-10-24 14:54
Subject:Re: [External] dfsort SUM processing
Sent by:IBM Mainframe Discussion List
It is not a copy paste. I might count wrong.
בתארי
15
>
> //Lasse
>
> -Ursprungligt meddelande-
> Från: IBM Mainframe Discussion List För
> ITschak Mugzach
> Skickat: den 24 oktober 2019 15:37
> Till: IBM-MAIN@LISTSERV.UA.EDU
> Ämne: Re: [External] dfsort SUM processing
>
> No, and even if so, all are numbers and can be sub
@LISTSERV.UA.EDU
Ämne: Re: [External] dfsort SUM processing
No, and even if so, all are numbers and can be sub summerized with a valid sign
of F.
בתאריך יום ה׳, 24 באוק׳ 2019, 16:35, מאת Lars Höglund <
lars.hogl...@alecta.se>:
> Isn't this 16 numbers and You are doing sum on 15
&g
ITschak,
Yup, I misread the book. Sorry about that - and for the clutter...
Rex
-Original Message-
From: IBM Mainframe Discussion List On Behalf Of
ITschak Mugzach
Sent: Thursday, October 24, 2019 8:19 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: [External] dfsort SUM processing
Rex
> Från: IBM Mainframe Discussion List För
> ITschak Mugzach
> Skickat: den 24 oktober 2019 15:19
> Till: IBM-MAIN@LISTSERV.UA.EDU
> Ämne: Re: [External] dfsort SUM processing
>
> Rex,
>
> x'F5' is a valid sign for (positive) ZD field. I already read this
> section, and the
Isn't this 16 numbers and You are doing sum on 15
//Lasse
-Ursprungligt meddelande-
Från: IBM Mainframe Discussion List För ITschak
Mugzach
Skickat: den 24 oktober 2019 15:19
Till: IBM-MAIN@LISTSERV.UA.EDU
Ämne: Re: [External] dfsort SUM processing
Rex,
x'F5' is a valid sign
> From the DFSORT manual:
> An invalid PD or ZD sign or digit results in a data exception (0C7 ABEND);
> 0-9are invalid for the sign and A-F are invalid for the digit. For example,
> a ZDvalue such as 3.5 (X'F34BF5') results in an 0C7 because "." (X'4B') is
> treated as an i
Just a wild guess here, is the SUM statement looking for a signed field?
From the DFSORT manual:
An invalid PD or ZD sign or digit results in a data exception (0C7 ABEND);
0-9are invalid for the sign and A-F are invalid for the digit. For example, a
ZDvalue such as 3.5 (X'F34BF5') results
the following situation return abend0c7:
1. sort fields=(1,4,ch,a,9,5,ch,a)
sum fields=(245,15,ZD)
sum statement caused the abend. without sum, no issue.
2. run icetool verify and print. bothe ended with rc=0. print show
x'f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f5'
with seems to be ok.
why am I
the following situation return abend0c7:
1. sort fields=(1,4,ch,a,9,5,ch,a)
sum fields=(245,15,ZD)
sum statement caused the abend. without sum, no issue.
2. run icetool verify and print. bothe ended with rc=0. print show
x'f0f0f0f0f0f0f0f0f0f0f0f0f0f0f0f5'
with seems to be ok.
why am I
Gilson,
DFSORT does NOT support date arithmetic on Header/Trailers. However it is
an easy fix as you just need to add an INREC/OUTREC to get the desired
results. Basically we add the Current date-1 using OUTREC at a temporary
position say in this case 1501 ( as your LRECL is 1500) and then use
some time and not be responding. The rest of
the DFSORT support and development teams will respond as they can.
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message
I'm sorry but Sri Hari will be unavailable for some time and not be responding.
The rest of the DFSORT support and development teams will respond as they can.
Max Smith
DFSMS Development
--
For IBM-MAIN subscribe / signoff
Well, my previous post wasn't helpful. Those keywords are for INREC, and
do not work in HEADER1=.
Your first issue is that DFSORT HEADER1= requires DATENS=(4MD),TIME=(24)...
i.e. the '=' are required. But as previously stated, the '-1' isn't
supported at all.
Massimo B.'s advice should help
Dear list:
Follow the results using DFSORT:
ICE250I 0 VISIT http://www.ibm.com/storage/dfsort FOR DFSORT PAPERS, EXAMPLES
AND MORE
ICE000I 0 - CONTROL STATEMENTS FOR 5650-ZOS, Z/OS DFSORT V2R3 - 06:00 ON SUN
SEP 22, 2019 -
OPTION COPY
Hi,
it seems DFSORT is not accepting DATE operations on HEADER1.
If you've got at least one input record and can "accomodate" the record
itself with one more field, you can try something like this:
//SORTIN DD *
AAA
//SORTOUT DD SYSOUT=*
//SYSIN DD *
INREC IFTHEN=(WHEN=INI
Looks like DATE1,TIME1,DATE1-1 is the DFSORT way. I just found this in the
" DFSORT Application Programming Guide ", but I haven't tested it.
sas
...
> The result is the following in the Header line of the SORTOUT:
> > H2019092219315220190921
> > We need
What do you get with this format? It helps to see the results you get when you
use this.
What version of DFSORT?
Can you post the ICE messages?
Thank you
Lizette
> -Original Message-
> From: IBM Mainframe Discussion List On Behalf Of
> Gilson Cesar de Oliveira
>
Hello:
We have migrated our sort from SYNCSORT to DFSORT and we are facing issues
related to syntax in the following situation:
in SYNCSORT:
OPTION COPY
OUTFIL FNAMES=SORTOUT,REMOVECC,INCLUDE=(1,1,CH,EQ,C'1'),
HEADER1=(C'H',DATENS(4MD
>>Just never copied them to my running SYSRES volumes.
Dave,
Apart from the above mentioned you will also see
HLQ.SORTLIB
HLQ.SORTLPA
>>I tried to do a Syncsort to DFSORT migration for a former group. We had
to back it off because they were using some of the "then" speci
The only one around here doing fancy sort stuff is me. :)
And, I had to update Syncsort to do some of the things DFSORT features that Sri
Kolusu was showing me :)
Reading the program directory now. And will look at install/cust tomorrow.
Probably see how the sandbox behaves in the near future
If I remember correctly, IBM started providing DFSORT because DB2 uses it,
regardless of whether you are licensed for it.
If DFSORT is not activated via IFAPRD00, then no one else besides DB2 can use
it.
I tried to do a Syncsort to DFSORT migration for a former group. We had to
back it off
nframe Discussion List On
> Behalf Of Gibney, Dave
> Sent: Thursday, August 22, 2019 2:41 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: DFSORT?
>
> We've always had Syncsort. I don't remember DFSORT being an optional
> feature for my z/OS 2.1 Serverpac. Does DFSORT live enti
We've always had Syncsort. I don't remember DFSORT being an optional feature
for my z/OS 2.1 Serverpac. Does DFSORT live entirely in SYS1.LPA and
SYS1.LINKLIB(SYS1.SIEALNKE)?
We are further on the path of downsizing the z/OS based services. In about a
year, they plan is continue to run
this to be done using dfsort.
I am curious, why do you want to use Sort to perform these tasks?
The solutions are ingenious, but I wonder whether someone will be able
to understand them if modification is required in the future.
Maybe a more general programming language would be better
On Fri, Aug 2, 2019 at 8:17 AM Joe Monk wrote:
> Thats not what is being asked ...
>
> In the sample output...
>
> 50338 789997580026.00 36052910DF 96.12
> 50338 789997580026.00 36052910DF 96.12
> 50338 789997580026.00 36052910
cords is the same: 95.12. So
> there is no variance in the price. There are just duplicate records.
>
>
>
> >
> > > -Original Message-
> > > From: IBM Mainframe Discussion List On
> > > Behalf Of Ron Thomas
> > > Sent: Thursday, Augus
mas
> > Sent: Thursday, August 01, 2019 8:03 AM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: Re: dfsort: Sort job to get price variance records
> >
> > Ok Elardus.
> >
> > I will paste the requirement and output files generated again
> >
> > We have a
Why are two records desired for 96.12 but only one for 95.12?
> -Original Message-
> From: IBM Mainframe Discussion List On
> Behalf Of Ron Thomas
> Sent: Thursday, August 01, 2019 8:03 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: dfsort: Sort job to get pric
. Could
anyone let me know how this to be done using dfsort.
Input file :-
ITEM NUMBER UPC_NBR VendorNbr STATE_CODE BUY_PRICE
50338 789997580026.00 36052910DF 96.12
50338 789997580026.00 36052910DF 96.12
Sri h Kolusu wrote:
>When you used INCLUDE COND=(5,1000,SS,EQ,X'D67DFBB0113C7464') and have VLSHRT
>option, VLSHRT tells DFSORT to treat any comparison involving a short field as
>false. In this case, any records less than 5+1000 = 1005 bytes are not
>included.
>When you use
601 - 700 of 1369 matches
Mail list logo
