Re: Re: Compile and run later

Rick Fochtman <[email protected]>
Newsgroups gmane.comp.emulators.turnkey-mvs
Message-ID <[email protected]>
---------------------------<snip>--------------------------

>  
>
> HI Rick,
>
> Much has happend since that email - I deleted the PDS first off 
> (easily replace as it just recieves
> objects made from my own source code).
>
> I Wrote JCL to re-created the PDS itself, then in the two jobs that 
> add members to the library i just
> add the member with no space parameter..
>
> Here is the JCL to create the library...
>
> Update MKLIB   : Trunc Xlate Top Nonum Nulls Asis 
> -----------------------------
> Cmd =>                                                  Scope 01,72 
> Scroll CSR
> ...... 
> ----+----1----+----2----+----3----+----4----+----5----+----6----+----7--
> 000100 //MKLIB    JOB (MKLIB),'-HUDSONRA-',
> 000200 //         CLASS=A,
> 000300 //         MSGCLASS=A,
> 000400 //         MSGLEVEL=(1,1)
> 000500 //* *************************************************************
> 000600 //DO       EXEC PGM=IEFBR14
> 000700 //DD00     DD  DISP=(NEW,CATLG),DSN=HUDSON.LINKLIB(TEMP),
> 000800 //          SPACE=(TRK,(45,15,50)),VOL=SER=(PUB000),
> 000900 //          DCB=SYS1.LINKLIB,UNIT=SYSALLDA
> ****** ****************************** End of data 
> *****************************
>
> BTW I set these in the email as 'small' 'courier new' do you see them 
> that way?
>
> Currently I am finding that after I add the second member the size and 
> free are
> drastically reduced...
>
>  Datasets starting with HUDSON                
> 8---------------------------------
>  Cmd =>
>  C Dataset name               Volume Ref.dt Org  RECFM RECL   BLK Ext  
> Size Free
>    HUDSON.ASMB.ASM            PUB002 10.139 PO   FB      80  3120   
> 1   225  224
>    HUDSON.CMDPROC             MVSCAT 10.140 PO   FB      80 19040   
> 1    15   14
>    HUDSON.COBOL.COBOL         PUB002 10.136 PO   FB      80  3120   
> 1   150  149
>    HUDSON.COMM.CNTL           PUB000 10.140 PO   FB      80  3120   
> 1    30   28
>    HUDSON.DATA.DATA           PUB002 10.139 PO   FB      80  3120   
> 1   300  299
>    HUDSON.FORT.FORTH          PUB000 10.140 PO   FB      80  3120   
> 1    30   28
>    HUDSON.LINKLIB             PUB000 10.140 PO   U        0 19069   
> 1     5    0
>    HUDSON.PROG.PL1            PUB002 10.139 PO   FB      80  3120   
> 1   150  149
>
> The item of interest is HUDSON.LINKLIB - I have just added the 2nd 
> member and
> it had a size of 95 and free of 45 - now look at it - 5 and 0.
>
----------------------------------<unsnip>----------------------------------
Take everything off the LKED.SYSLMOD statement except the DSNAME(member) 
and DISP=SHR.

What's happening is that you're releasing all unused space after each 
LMOD goes into it.

Then try re-allocating with SPACE=(CYL,(5,5,89)).

Rick
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.