I missed most of the thread but, is this what you mean, in REXX you can
issue:
RC = LISTDSI('K248610.USER.EXEC' "RECALL DIRECTORY SMSINFO")
Which might give results something like this...
SYSDSNAME = K248610.USER.EXEC
SYSVOLUME = PRI001
SYSUNIT = 3390
SYSDSORG = PO
SYSRECFM = FB
SYSLRECL = 80
SYSBLKSIZE = 23200
SYSKEYLEN = 0
SYSALLOC = 290
SYSUSED = N/A
SYSUSEDPAGES = 1626
SYSPRIMARY = 290
SYSSECONDS = 90
SYSUNITS = BLOCK
SYSEXTENTS = 1
SYSCREATE = 2012/102
SYSREFDATE = 2015/134
SYSEXDATE = 0
SYSPASSWORD = NONE
SYSRACFA = GENERIC
SYSUPDATED = NO
SYSTRKSCYL = 15
SYSBLKSTRK = N/A
SYSADIRBLK = NO_LIM
SYSUDIRBLK = N/A
SYSMEMBERS = 391
SYSREASON = 0000
SYSMSGLVL1 =
SYSMSGLVL2 =
SYSDSSMS = DATA_LIBRARY
SYSDATACLASS = NODCB
SYSSTORCLASS = TSO
SYSMGMTCLASS = STANDARD
/Steve
From: "Shmuel Metz (Seymour J.)" <[email protected]>
To: [email protected]
Date: 2015-05-13 19:10
Subject: Re: Primary allocation of a dataset
Sent by: IBM Mainframe Discussion List <[email protected]>
In <[email protected]>, on 05/06/2015
at 01:43 PM, Fred van der Windt <[email protected]>
said:
>I want to retrieve the primary allocation of a dataset.
You can't get that from the DSCB; the NVR has it for SMS datasets.
There is no indication in the VTOC as to which extent came from the
primary. The best that you can do is to look at the first extent and
hope that it is the only extent initially allocated. Even then you
can't tell the allocation units.
Query: does that change on an EAV?
--
Shmuel (Seymour J.) Metz, SysProg and JOAT
ISO position; see <http://patriot.net/~shmuel/resume/brief.html>
We don't care. We don't have to care, we're Congress.
(S877: The Shut up and Eat Your spam act of 2003)
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
Såvida annat inte anges ovan: / Unless stated otherwise above:
IBM Svenska AB
Organisationsnummer: 556026-6883
Adress: 164 92 Stockholm
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
