//PDSEDD DD DSNAME=MASTFILE(MEMBERK),SPACE=(TRK,(100,5,7)),
// DISP=(NEW,CATLG),DCB=(RECFM=FB,LRECL=80,BLKSIZE=80),
// DSNTYPE=LIBRARY,STORCLAS=S1P01S01,---
...
OPEN (OUTDCB,(OUTPUT))
...
PUT OUTDCB,OUTAREA Write record to member
...
CLOSE (OUTDCB) Automatic STOW
...
OUTAREA DS CL80 Area to write from
OUTDCB DCB ---,DSORG=PS,DDNAME=PDSEDD,MACRF=PM
You can use the same program to allocate either a sequential data set or a member of a PDS or PDSE with only a change to the JCL, as follows:
As a result of these steps, the data set and its directory are created, the records of the member are written, and an entry is automatically made in the directory with no user data.
A PDSE becomes a PDSE program library when the binder stores the PDSE's first member.