Home > Archive > ASM370 > February 2005 > Params in DFSPARM Dataset on OS/390
You are viewing an archived Text-only version of the thread.
To view this thread in it's original format and/or if you want to reply to
this thread please [click here]
| Author |
Params in DFSPARM Dataset on OS/390
|
|
| j?rg brehe 2005-02-20, 8:55 pm |
| Plattform OS/390
>
> I have a little problem. I allocate dynamically a dataset with
> DISP (New,delete,delete), DDName=DFSPARM, DSNAME=&&CNTL1
> in an assembler program.
>
>
>
> In our mainprogramm I call my
> Cobolprogram UPRODFSPARM which calls the assembler program to allocate the
> dataset. After allocation I write my options into the temporary
> allocated Dataset. I have proved, that i have written the option into
> the dataset. I use the LRECL 80 and f-Type =FB.
>
>
> Cobol-Upro: UPRO1
> .
> .
Set Options in Upro1 (AVGRLEN = XXX, FILESZ= XXX)
> Call 'UPRODFSPARM'
> MOVE 'DFSPARM' TO SORT-CONTROL
>
> SORT SFILE ASCENDING SORT-FELDER
> INPUT PROCEDURE SORT-EIN
> OUTPUT PROCEDURE SORT-AUS
Call 'UPRODFSPARM' "Delete Options"
>
Cobol-Upro: UPRO2 again
> .
> Set Options in Upro2 (AVGRLEN = XXX, FILESZ= XXX)
> Call 'UPRODFSPARM'
> MOVE 'DFSPARM' TO SORT-CONTROL
>
> SORT SFILE ASCENDING SORT-FELDER
> INPUT PROCEDURE SORT-EIN
> OUTPUT PROCEDURE SORT-AUS
Call 'UPRODFSPARM' "Delete Options"
>
and again in the next UPRO.
This will done well 10 times. I try this in 12 Upros and I get an
INSUFFICIENT STORAGE S878 in DFSORT.
I only create my DFSPARM File on time. In the next Upro I ask if this
File is allways there. I delete the old options and write new
parameters in my File DFSPARM. Dfsort read this Options. However in
the 11 sort i get the errormessage. DFSORT has not enough memory.
Region is 0M. will DFSORT get for any sort a copy of this little file,
or what is going wrong.
regards
Jörg
>
| |
| Andreas Lerch 2005-02-20, 8:55 pm |
|
Am 16.02.05, 16:55:47, schrieb Joerg.Brehe@set-software.de (j?rg=20
brehe) zum Thema Params in DFSPARM Dataset on OS/390:
[color=darkred]
> Plattform OS/390
te=20
the[color=darkred]
o[color=darkred]
> Set Options in Upro1 (AVGRLEN =3D XXX, FILESZ=3D XXX)
[color=darkred]
[color=darkred]
> Call 'UPRODFSPARM' "Delete Options"
[color=darkred]
> Cobol-Upro: UPRO2 again
[color=darkred]
[color=darkred]
> Call 'UPRODFSPARM' "Delete Options"
> and again in the next UPRO.
> This will done well 10 times. I try this in 12 Upros and I get an
> INSUFFICIENT STORAGE S878 in DFSORT.
> I only create my DFSPARM File on time. In the next Upro I ask if this=
> File is allways there. I delete the old options and write new
> parameters in my File DFSPARM. Dfsort read this Options. However in
> the 11 sort i get the errormessage. DFSORT has not enough memory.
> Region is 0M. will DFSORT get for any sort a copy of this little file,=
> or what is going wrong.
Hello Joerg
i think this is a bufferpool problem! Open close does not free buffer=20=
of qsam files. Some times you need a freebuff after close.
Einen schoenen Tag
Andreas Lerch
| |
| j?rg brehe 2005-02-21, 3:57 pm |
| Frank Yaeger <yaeger@us.ibm.com> wrote in message news:<42138461.8070000@us.ibm.com>...
> j?rg brehe wrote:
>
> DFSPARM is a special ddname for supplying control statements to DFSORT.
> SORT-CONTROL is a different ddname for supplying control statements to
> DFSORT via a different mechanism. It could be that using 'DFSPARM' as
> your SORT-CONTROL ddname is causing problems.
>
> Try using a different ddname for SORT-CONTROL like 'MYCNTL'.
>
> If I write the Parms one time in the Data set DFSPARM it works well.
In my first test i use the biggest sort in one Upro and all is fine.
After n-times I get a crash. In my case on this system after I have
call it 11 times.
jörg
|
|
|
|
|