One of my sysprogs allocated a file on all LPARs. His intent was to have an
uncataloged file on SYSnR2, where n is the LPAR ID.
That worked on 3 out of 4 LPARs. On the fourth LPAR SMS directed the allocation
to a SMS managed pool.
//ALLOC1 EXEC PGM=IEFBR14
//SIXMEXP DD DSN=SYS1.SIXMEXP,
// DISP=(NEW,KEEP),
// RECFM=FB,
// LRECL=80,
// BLKSIZE=0,
// SPACE=(8800,(700,70,5)),
// UNIT=3390,
// VOL=SER=SYS4R2
//*
On Sys4 he got the following:
IGD100I 10C5 ALLOCATED TO DDNAME SIXMEXP DATACLAS (PDS)
IGD100I 10C5 ALLOCATED TO DDNAME SIXMLOD1 DATACLAS (PDS)
IEF142I $AOEALO4 ALLOC1 - STEP WAS EXECUTED - COND CODE 0000
IEF285I SYS1.SIXMEXP KEPT
IEF285I VOL SER NOS= SYS4R2.
IEF285I SYS1.SIXMLOD1 KEPT
IEF285I VOL SER NOS= SYS4R2.
On Sys9 he gets
IEF236I ALLOC. FOR $AOEALO9 ALLOC1
IGD101I SMS ALLOCATED TO DDNAME (SIXMEXP )
DSN (SYS1.SIXMEXP )
STORCLAS (STANDARD) MGMTCLAS (DISK2YR) DATACLAS (PDS)
VOL SER NOS= DSP903
IGD101I SMS ALLOCATED TO DDNAME (SIXMLOD1)
DSN (SYS1.SIXMLOD1 )
STORCLAS (STANDARD) MGMTCLAS (DISK2YR) DATACLAS (PDS)
VOL SER NOS= DSP904
IEF142I $AOEALO9 ALLOC1 - STEP WAS EXECUTED - COND CODE 0000
Dataclass routine has the following as the first Select in the routine:
SELECT
WHEN (&ANYVOL EQ 'SYS%R%')
DO
SET &DATACLAS = ''
EXIT
END
So how did Sys9 assign dataclass = PDS?
The following is the base config display:
CDS Name . : ACTIVE
CDS Status : VALID
Description : THIS IF THE PROD CONFIGURATION FOR SYS4
==> . . . . :
Default Management Class : DISK2YR Default Device Geometry :
Default Unit . . . . . . : SYSDA Bytes/track . . . . . : 56664
Tracks/cylinder . . . : 15
DS Separation Profile :
System: SYS3 SYS4 SYS5 SYS9
As you can see both Sys4 and Sys9 are represented.
Yes, the ACDS resides on a volume shared al all LPARs.
Yes, the same ACDS is pointed to be Sys4 and 9.
All ideas and suggestions welcome.
Thank you,
Dave O'Brien
NIH Contractor
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html
