expat
Global Moderator
Joined: 14 Mar 2007
Posts: 3509
Location: Brussels once more ...
|
|
|
|
I suppose that to be certain you could always use a little PROC to setup the datasets, and ensure that they are correctly written to to stop any problems.
Here's one I prepared earlier
This one can also create PDS & PDSE datasets, works with GDG's too.
| Code: |
//*
//SETFILE PROC DSN=,RF=,LR=,UN=TRK,PR=1,SC=1,DR=
//SETFILE EXEC PGM=IEBGENER
//SYSOUT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSIN DD DUMMY
//SYSUT1 DD DUMMY,RECFM=&RF.,LRECL=&LR
//SYSUT2 DD DSN=&DSN.,
// DISP=(,CATLG,DELETE),
// SPACE=(&UN.,(&PR.,&SC.&DR.)),
// RECFM=&RF.,LRECL=&LR
//SETFILE PEND
//*
//FILE01 EXEC SETFILE,
// DSN='data.set.name',
// RF=FB,LR=80,DR=',44'
//*
//FILE02 EXEC SETFILE,
// DSN='data.set.name(+1)',
// RF=FB,LR=80
|
FILE01 is a PDS with 44 directory blocks
FILE02 is a plain old PS file AND a GDS as well. |
|
