Yes, unfortunately, because the records are dynamically created and could not
be put in a single file for a one-time sort. Why should life be simple? :)
I still find it strange that there is no way to prevent dynamic allocation
100%, even though the documentation hints about ways to do so, for
569 5338
Email otto.schumac...@hp.com
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of
Staffan Tylen
Sent: Wednesday, February 22, 2012 4:12 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Avoiding DFSORT dynamic allocatoin, was: Abend S0C4
Sorry Otto, SORTWK01 in the JCL doesn't help. DFSORT then starts to allocate
SORTDKnn files as real files, not VIO as is the case with dynamic allocation.
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send
:33 PM:
[image removed]
Re: Avoiding DFSORT dynamic allocatoin, was: Abend S0C4 in an internal
sort
Staffan Tylen
to:
IBM-MAIN
02/22/2012 12:19 PM
Sent by:
IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu
Please respond to IBM Mainframe Discussion List
Sorry Otto, SORTWK01
-MAIN@bama.ua.edu
Subject: Re: Avoiding DFSORT dynamic allocatoin, was: Abend S0C4 in an
internal sort
Yes, unfortunately, because the records are dynamically created and could
not be put in a single file for a one-time sort. Why should life be simple?
:)
I still find it strange
David, Ulrich,
Many thanks for your comments but I think we are drifting away from the
original issue, namely that there seems to be no way to prevent dynamic
allocation of sort work files. I wish to be able to sort records in storage
without risking that work files are dynamically allocated.
Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf
Of Staffan Tylen
Sent: Wednesday, February 22, 2012 11:08 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Avoiding DFSORT dynamic allocatoin, was: Abend S0C4 in an
internal sort
David, Ulrich,
Many thanks for your comments but I think we are drifting
Staffan Tylen at IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu wrote
on 02/22/2012 11:08:10 AM:
I wish to be able to sort
records in storage without risking that work files are dynamically
allocated
Staffan,
I don't know exactly what your job looks like so it's difficult to tell you
how
dynamic allocatoin, was: Abend S0C4 in an
internal sort
David, Ulrich,
Many thanks for your comments but I think we are drifting away from the
original issue, namely that there seems to be no way to prevent dynamic
allocation of sort work files. I wish to be able to sort records in storage
without
Frank, you did it again! I start to believe that I had not tried the MOSIZE
parameter together with all the rest, so when it's there - no more dynamic
allocations :) But as expected I got sort capacity exceeded situations, which I
only could solve by adding a high MAINSIZE value like 1000M
Steve, the original code was making calls to an internal QuickSort routine
written in assembler but I got to a point where the code abended when the input
to the sort was too large so I decided to look at using DFSORT instead. I now
have a combination of the two in place where small sorts use
Staffen Tylen at IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu wrote
on 02/22/2012 12:34:17 PM:
Frank, you did it again! I start to believe that I had not tried the
MOSIZE parameter together with all the rest, so when it's there - no
more dynamic allocations :) But as expected I got sort
I wish to continue this thread as it's related. I'm now running my program with
internal calls to DFSORT and it works fine except for one issue that I have,
namely that I get a lot of job log messages generated as a result of dynamic
allocation of VIO sortwork files. DFSORT is invoked 1000's of
There may well be a facility for suppressing unwanted DFSORT messages,
particularly informational ones. If there is, FY will provide you and
the rest of us with information about it here (unless perchance he is
in Timbuktu today).
John Gilmore, Ashland, MA 01721 - USA
On 2/20/2012 12:32 PM, John Gilmore wrote:
There may well be a facility for suppressing unwanted DFSORT messages,
particularly informational ones. If there is, FY will provide you and
the rest of us with information about it here (unless perchance he is
in Timbuktu today).
I don't think this
Discussion List IBM-MAIN@bama.ua.edu wrote on 02/20/2012
12:22:44 PM:
[image removed]
was: Abend S0C4 in an internal sort
Staffan Tylen
to:
IBM-MAIN
02/20/2012 12:23 PM
Sent by:
IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu
Please respond to IBM Mainframe Discussion List
I wish
... DFSORT is invoked 1000's of times by the program ...
Once upon a time, at a previous job, I ran into a similar situation. The job
ran for hours and hours. Analysis showed that SORT was invoked to sort 1
record (yes, that's ONE record!) most of the time and between 2 and about
100 records the
And we have a winner! Well spotted Frank. I made a simple change to the code
and set RMODE 24 and the abends disappeared. Many thanks to everyone who
responded.
Staffan
--
For IBM-MAIN subscribe / signoff / archive access
PS. Sorry Brian, you also spotted it but Frank was first :)
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message: INFO IBM-MAIN
In 1020628937438662.wa.stylenpfoneconsulting@bama.ua.edu, on
02/13/2012
at 11:31 AM, Staffan Tylen sty...@pf-one-consulting.com said:
So, who is the first to spot the obvious flaw that I can't see?
Does the sort expect a non-standard plist? Should the 4rh word be
A(=F'-1')+X'8000'?
Shmuel (Seymour J.) Metz at IBM Mainframe Discussion List
IBM-MAIN@bama.ua.edu wrote on 02/13/2012 07:25:11 PM:
Does the sort expect a non-standard plist? Should the 4rh word be
A(=F'-1')+X'8000'?
The end of the extended parameter list is indicated by a F'-1'
(X'') word. For
At 22:25 -0500 on 02/13/2012, Shmuel Metz (Seymour J.) wrote about
Re: Abend S0C4 in an internal sort:
Does the sort expect a non-standard plist? Should the 4rh word be
A(=F'-1')+X'8000'?
That +X'8000' is not needed (and can cause problems) since F'-1'
has set the high bit already
A. Rosenberg
Sent: Tuesday, February 14, 2012 10:37 AM
To: IBM-MAIN@bama.ua.edu
Subject: Re: Abend S0C4 in an internal sort
At 22:25 -0500 on 02/13/2012, Shmuel Metz (Seymour J.) wrote about
Re: Abend S0C4 in an internal sort:
Does the sort expect a non-standard plist? Should the 4rh word be
A(=F'-1
] On Behalf Of
Staffan Tylen
Sent: Monday, February 13, 2012 11:31 AM
To: MVS List Server 1
Subject: Abend S0C4 in an internal sort
I can't get my head around this one, I'm 100% sure the answer is starring at me
but I just don't see it. I'm writing an assembler program that invokes SORT
using LINK
I'm not really an asm programmer, but the 3rd parm '-1' looks iffy to me.
Should you not OR the 2nd parm with x'8000'? Or can you use link with a VL
option instead?
Julian
--
Sent from my Android phone with K-9 Mail. Please excuse my brevity.
Staffan Tylen sty...@pf-one-consulting.com
Subject: Abend S0C4 in an internal sort
I can't get my head around this one, I'm 100% sure the answer is starring at me
but I just don't see it. I'm writing an assembler program that invokes SORT
using LINK. There are E15 and E35 exits to handle records going in and out of
the sort, but it keeps
SORTSTMT DCAL2(SORTEND-SORT)
SORT DCC' SORT FIELDS=(1,1,CH,A)'
DCC' RECORD TYPE=F,LENGTH=80'
SORTEND EQU *
I noticed you've not included a trailing blank after the last control
statement. According to the DFSORT manual, a
-2633 (Office)
chuck.har...@thermofisher.com
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of
Staffan Tylen
Sent: Monday, February 13, 2012 12:31 PM
To: IBM-MAIN@bama.ua.edu
Subject: Abend S0C4 in an internal sort
I can't get my head around
I can't get my head around this one, I'm 100% sure the answer is starring
at me but I
just don't see it. I'm writing an assembler program that invokes SORT
using LINK.
There are E15 and E35 exits to handle records going in and out of the
sort, but it keeps
abending with S0C4 and sometimes
Staffan Tylen at IBM Mainframe Discussion List IBM-MAIN@bama.ua.edu wrote
on 02/13/2012 09:31:08 AM:
I can't get my head around this one, I'm 100% sure the answer is
starring at me but I just don't see it. I'm writing an assembler
program that invokes SORT using LINK. There are E15 and E35
The program works when I change RMODE to 24. I suspect the lines
SORTPARM DCA(SORTSTMT)
DCA(E15_EXIT)
DCA(E35_EXIT)
DCF'-1'
are not coded correctly - specifically the references to E15 and E35 exit
address entry points. The manual says the
31 matches
Mail list logo