Re: Avoiding DFSORT dynamic allocatoin, was: Abend S0C4 in an internal sort

2012-02-22 Thread Staffan Tylen
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 th

Re: Avoiding DFSORT dynamic allocatoin, was: Abend S0C4 in an internal sort

2012-02-22 Thread Staffan Tylen
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 toget

Re: Avoiding DFSORT dynamic allocatoin, was: Abend S0C4 in an internal sort

2012-02-22 Thread Staffan Tylen
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.

Re: Avoiding DFSORT dynamic allocatoin, was: Abend S0C4 in an internal sort

2012-02-22 Thread Staffan Tylen
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 em

Re: Avoiding DFSORT dynamic allocatoin, was: Abend S0C4 in an internal sort

2012-02-22 Thread Staffan Tylen
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 e

was: Abend S0C4 in an internal sort

2012-02-20 Thread Staffan Tylen
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

Re: Abend S0C4 in an internal sort

2012-02-14 Thread Staffan Tylen
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 ins

Re: Abend S0C4 in an internal sort

2012-02-14 Thread Staffan Tylen
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

Abend S0C4 in an internal sort

2012-02-13 Thread Staffan Tylen
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 S0C1,

Re: RC=4093 from TSO ALLOC in compiled REXX

2010-03-21 Thread Staffan Tylen
Spot on, Bob. No TSO environment. Thanks. Staffan -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@bama.ua.edu with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/

Re: RC=4093 from TSO ALLOC in compiled REXX

2010-03-21 Thread Staffan Tylen
Thanks for the tip but I run both in batch using the same JCL except for the EXEC statement, which either points to IKJEFT01 or to the compiled program. Wrong! SYSPROC is of course changed to STEPLIB also. And the ALLOC is for a temporary data set so the prefix should not come into question anyway,

RC=4093 from TSO ALLOC in compiled REXX

2010-03-21 Thread Staffan Tylen
I'm staring myself blind on a silly problem that I've created for myself. Here is a very advanced REXX program: /* rexx */ address TSO "ALLOC F(FILE1) NEW TRACKS SPACE(1) RECFM(F B) LRECL(80)

SMP/E ++PROGRAM vs ++LMOD

2008-02-07 Thread Staffan Tylen
Hi. I'm having a problem building a usermod that should replace an installed source, assemble it, and replace the existing load module. The source was during product installation defined as ++SAMP(name) and the load module as ++PROGRAM(name). My question is if there is a way to have the usermod rep

ENQ management

2007-02-14 Thread Staffan Tylen
Can anyone suggest how one could provide functions similar to CA-MIM's resource conflict notification and job requeueing without too much programming efforts? Thanks in advance. Staffan -- For IBM-MAIN subscribe / signoff / archiv

Problem with RMM and VRSes

2005-11-04 Thread Staffan Tylen
Existing VRS chain: ADDVRS DSN('ABC.DEF.**.GV¬¬') CYCLES LOCATION(DR2H) STORENUMBER(1) WHILECATALOG NEXTVRS(DR8H) ADDVRS NAME(DR8H) NEXTVRS(VLT1) LOCATION(DR8H) STORENUMBER(1) ADDVRS NAME(VLT1) LOCATION(VLT1) STORENUMBER(9) Using this schema we expect to see ABC.DEF.XYZ(0) in DR2H, ABC.DE

Re: DFSORT problem when generating RMM reports

2005-10-27 Thread Staffan Tylen
Mike, thanks for the quick-course. Being new to the RMM dialogue I never realised that you could put multiple entries on one line in that way. That sure makes things easier. The boolean problem suddenly disappeared! And the generated code looks correct. Sorry for stirring up this discussion for not

Re: DFSORT problem when generating RMM reports

2005-10-27 Thread Staffan Tylen
Mike, I think you've done exactly what I tried out, namely to place one of the ANDs after the OR sequence. And it seems to work. But, using the conjunction operators available in RMM, how would you then, in ISPF, code for example "A and (B or C)"? Staffan -

Re: DFSORT problem when generating RMM reports

2005-10-27 Thread Staffan Tylen
Thanks gentlemen, I think the boolean logic is wrong and explains why things go wrong. The JCL and control stmts were, as already mentioned, generated using the RMM ISPF function, but this function doesn't support generating the required logic, as it accepts only the following conjugation operators

Re: DFSORT problem when generating RMM reports

2005-10-26 Thread Staffan Tylen
Thanks Mike, the VLSCMP issue MIGHT explain why I get more in the report than I hoped for (but not quite). In any case, how about this twist to the problem - if I insert the following DFSORT step to generate a temporary file from the extract file and use that as input instead, it works! OPTION CO

DFSORT problem when generating RMM reports

2005-10-26 Thread Staffan Tylen
Hi. I'm facing a strange problem when generating RMM reports using DFSORT. I use JCL generated by the ISPF reporting function in RMM. In short, I receive the following message for a few of the reports whilst other similar reports work fine: ICE218A 1 820 BYTE VARIABLE RECORD IS SHORTER THAN 1065 B