On Fri, 20 Sep 2013 08:41:56 +0200, [email protected] wrote:
>
>I agree with Gerhard on "In any case, IBM should be persuaded to either
>produce a JCL error or modify the directory build to write an EOF."
>I tend to the second solution: Write the EOF in any case. (In setting up my
>testcases, I have used IEBDG excessively, and quite a few allocations that
>succeeded nevertheless produced unusable data sets. So I don't think a JCL
>error is the way to go. But correct setting of the EOF marker should be
>required and should be aparable, since the manual clearly says that that
>should have happened.
>
However, in:
Title: z/OS V1R13 DFSMS Using Data Sets
Document Number: SC26-7410-11
3.7.2 PDS Directory
... The last entry in the last used directory block has a name field of
maximum binary value (all 1s, a TTR field of zeros, and a zero-length
user data field). ...
I believe this is stated as a requirement. So if the "last entry" can not
be created, allocation should fail, not "[succeed and] nevertheless
[produce] unusable data sets. (I may submit an RCF on the misplaced
right parenthesis.)
I tried the following to write an EOF at the beginning:
//STEP1 EXEC PGM=IEFBR14
//SYSUT2 DD DISP=(,CATLG),DSN=&SYSUID..TEMP.EMPTYDIR,UNIT=SYSALLDA,
// DSORG=PO,SPACE=(1000,(1000,0,0)),RECFM=FB,LRECL=80
//*
//STEP2 EXEC PGM=IEBGENER # Write EOF at beginning.
//SYSPRINT DD SYSOUT=(,)
//SYSIN DD DUMMY
//SYSUT2 DD DISP=SHR,DSN=*.STEP1.SYSUT2,DSORG=PS,
// RECFM=F,LRECL=256,BLKSIZE=256
//SYSUT1 DD DUMMY,RECFM=F,LRECL=256,BLKSIZE=256
The data set created gave I/O errors in ISPF Info and ISPF View.
>Doug also found this in SC26-7410-11 Using Data sets:
>"To allocate a PDS, specify PDS in the DSNTYPE parameter and the number of
>directory blocks in the SPACE parameter, in either the JCL or the data class.
>You must specify the number of the directory blocks, or the allocation fails."
>I reran the DSORG=PO,SPACE=(TRK,(10000,0,0)) job explicitly specifying
>DSNTYPE=PDS (and with VSM UseZosV1R9Rules back to NO). Note that directory
>blocks are specified! This time the data set ended up on SMS001 but still
>shows 66000 directory entries. Then I deleted and reran, the data set ended up
>on SMS004 and I got I/O error. Presumably that means we don't do erase on
>scratch.
>
>If anyone wants to report this to IBM as a bug, feel free. I would do it, but
>our contract doesn't allow me to report bugs.
>
>Barbara
>
>----------------------------------------------------------------------
>For IBM-MAIN subscribe / signoff / archive access instructions,
>send email to [email protected] with the message: INFO IBM-MAIN
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
