Exit 7: LIBDEF service exit

This user exit lets you restrict the use of the LIBDEF service. ISPF passes control to the exit routines at this user exit after determining that a syntactically valid call has been made and before allocating and opening the alternate library.

Exit parameters

In addition to the standard exit parameters described in Exit parameter list, the exit routines at this user exit receive these parameters. ISPF ignores any changes the exit routines make to the parameters.

libtype

An 8-character field that contains the library type as specified on the LIBDEF request. The value is left-justified and padded with blanks.

Flags

4 bytes of bit flags defined as follows:

0: 1 = DATASET keyword specified
1: 1 = LIBRARY keyword specified
2: 1 = EXCLDATA keyword specified
3: 1 = EXCLLIBR keyword specified
4: 1 = COND request
5: 1 = STACK request. If bit 4 and 5 are both 0, an UNCOND request was done
6: 1 = STKADD request. Valid if bit 0 equals 1
7-31: Reserved

dsname#

A fullword binary number indicating the number of elements in the lengths and names arrays that follow. The number will not exceed 15.

lengths

An array of fullwords indicating the lengths of the corresponding elements of the names array. The maximum length of a dsname is 44. If a libname is provided using the LIBRARY or EXCLLIBR keyword, the length will be eight.

names

An array containing the data set names or library name as specified in the ID parameter of the LIBDEF service. Data set names are fully qualified without quotes. Each element can be up to 44 characters long and those names less than 44 characters are padded on the right with blanks.

Return codes

0: Normal completion; ISPF continues processing.
16: Authorization failure. ISPF issues a message indicating an authorization failure has occurred and LIBDEF terminates with a severe error.
Other: LIBDEF treats return codes other than 0 or 16 as a severe error and returns a code of 20 to the caller.