DSINFO—data set information dialog service

The DSINFO service returns assorted information about a particular data set in dialog variables in the function pool. The information returned is the same as that displayed when you use ISPF Option 3.2 or Option 3.4 commands. Additionally, DSINFO returns the unformatted DSCB format1. DSINFO does not require an LMINIT to be performed first.

Command invocation format


>>-ISPEXEC--DSINFO--DATASET(dsname)--+----------------+--------><
                                     '-VOLUME(serial)-'

Call invocation format


>>-CALL--ISPEXEC--(buf-len,--buffer);--------------------------><


>>-CALL--ISPLINK--('DSINFObb'--,-+-dsname-+--,-+-serial-+------><
                                 '-'b'----'    '-'b'----'

Parameters

dsname: Specifies the data set name, in TSO syntax, of the data set that you want information about. This parameter must be a 46-byte length field for the call invocation format.
serial: Specifies the serial number of the volume on which the data set can be found. This is only required if the data set is uncataloged.
buf-len: Specifies a fullword fixed binary integer containing the length of "buffer".
buffer: Specifies a buffer containing the name of the service and its parameters in the same form as they would appear in an ISPEXEC call for a command procedure.

The DSINFO service saves these dialog variables in the function pool:

Table 1. Dialog variables saved by the DSINFO service
Variable	Information	Type	Length
ZDSVOL	First or only volume	Character	6
ZDS#VOLS	Number of volumes	Character	2
ZDSDEVT	Device type	Character	8
ZDSORG	Data set organization	Character	8
ZDSRF	Record format	Character	6
ZDSLREC	Logical record length	Character	7
ZDSBLK	Block size	Character	6
ZDSSPC	Primary space units	Character	8
ZDS1EX	Primary space allocation	Character	13
ZDS2SPC	Secondary space units	Character	8
ZDS2EX	Secondary space allocation	Character	13
ZDSTOTAX	Allocated space units (long format)	Character	18
ZDSTOTUX	Used space units (long format)	Character	18
ZDSDSNT	Data set name type	Character	8
ZDSSEQ	Compressible (YES/NO)	Character	4
ZDSCDATE	Creation date (National format)	Character	10
ZDSXDATE	Expiration date (National format)	Character	10
ZDSRDATE	Referenced date (National format)	Character	10
ZDSTOTA	Allocated space units	Character	13
ZDSTOTU	Used space units	Character	13
ZDSEXTA	Allocated extents	Character	7
ZDSEXTU	Used extents	Character	7
ZDSDIRA	Allocated directory blocks	Character	6
ZDSDIRU	Used directory blocks	Character	8
ZDSDIR	PDSE directory blocks	Character	8
ZDS#MEM	Number of members	Character	13
ZDSPAGU	Pages used (PDSE)	Character	13
ZDSPERU	Percent used (PDSE)	Character	13
ZDSMC	Management class	Character	8
ZDSSC	Storage class	Character	8
ZDSDC	Data class	Character	8
ZDSAPF	APF status of the data set (YES/NO/ERR)	Character	4
ZDSLNK	LNKLST status of the data set (YES/NO/ERR)	Character	4
ZDSCB1	Format 1 data control block	Character	96
ZDSVTAB	Volume table (contains all of the volume names for a multivolume set)	Character	354
ZDSOVF	Indicates that ZDSTOTAX and ZDSTOTUX should be used instead of ZDSTOTA and ZDSTOTU.	Character	3
ZDSEATR	Extended attribute indicator	Character	4
ZDSCJOBN	Create jobname	Character	8
ZDSCSTPN	Create stepname	Character	8
ZDSDSNV	Data set version	Character	1

Note: ISPF cannot calculate reliable space utilization values for BDAM data sets. Therefore, the DSINFO service returns question marks (?) in variables that contain space utilization data when reporting on BDAM data sets.

Return codes

These return codes are possible:

0

Normal completion.

8

User requested information unavailable. Dialog error variables (ZERRLM, and so on) contain further information.

12

One of these:

FAMS error
Obtain error
Error obtaining directory information

20

Severe error.

Example

This example shows an invocation of DSINFO to obtain information about a cataloged data set.

Command Invocation

ISPEXEC DSINFO DATASET(DSNAME)

Call Invocation

CALL ISPLINK('DSINFO  ',DSNAME);

or Set the program variable BUFFER to contain:

BUFFER = 'DSINFO DATASET(DSNAME)';

Set program variable BUFLEN to the length of the variable BUFFER. Enter the command:

CALL ISPEXEC (BUFLEN, BUFFER);