Rui Miguel Feio

As you may know, Page datasets are defined on the IEASYSxx member of the Parmlib but if you want to avoid the hassle of checking this member or if you would like to obtain more information about them, you can use the following MVS commands to display Page Dataset information:

1. Command: /D ASM

Displays information about the page data sets the system is currently using and the status of the PAGEDEL command.

Example:

RESPONSE=TST1
IEE200I 08.14.54 DISPLAY ASM 182
TYPE     FULL STAT   DEV  DATASET NAME
PLPA      28%   OK  8833  SYS1.TST1.PAGE.PLPA
COMMON     0%   OK  863B  SYS1.TST1.PAGE.COMMON
LOCAL      1%   OK  880E  SYS1.TST1.PAGE.LOCAL1
LOCAL      2%   OK  880F  SYS1.TST1.PAGE.LOCAL2
PAGEDEL COMMAND IS NOT ACTIVE

2. Command: /D ASM,PLPA

Displays  information about the PLPA page data set.

Example:

RESPONSE=TST1
IEE200I 08.19.40 DISPLAY ASM 236
TYPE     FULL STAT   DEV  DATASET NAME
PLPA      28%   OK  8833  SYS1.TST1.PAGE.PLPA

VOLSER  DEVTYP        SIZE        USED       AVAIL      ERRORS
TST1P1  3390        53,999      15,508      38,491           0

3. Command: /D ASM,LOCAL

Displays information about all local page data sets.

Example:

RESPONSE=TST1
IEE200I 08.23.00 DISPLAY ASM 264
TYPE     FULL STAT   DEV  DATASET NAME
LOCAL      1%   OK  880E  SYS1.TST1.PAGE.LOCAL1
LOCAL      2%   OK  880F  SYS1.TST1.PAGE.LOCAL2

4. Command: /D ASM,COMMON

Displays information about the common page data set.

Example:

RESPONSE=TST1
IEE200I 08.28.25 DISPLAY ASM 305
TYPE     FULL STAT   DEV  DATASET NAME
COMMON     0%   OK  863B  SYS1.TST1.PAGE.COMMON

VOLSER  DEVTYP        SIZE        USED       AVAIL      ERRORS
TST1P0  3390        89,999          42      89,957           0

5. Command: /D ASM,PAGE=page_dataset_name

Displays information about page data sets.

Example:

page_dataset_name = SYS1.TST1.PAGE.LOCAL1

/D ASM,PAGE=SYS1.TST1.PAGE.LOCAL1

Returns:

RESPONSE=TST1
IEE200I 08.31.01 DISPLAY ASM 328
TYPE     FULL STAT   DEV  DATASET NAME
LOCAL      1%   OK  880E  SYS1.TST1.PAGE.LOCAL1

VOLSER  DEVTYP        SIZE        USED       AVAIL      ERRORS
TST1P2  3390       599,399      11,242     588,157           0

Whoever works with mainframes knows that to be able to o know what the Linklist concatenation is is one of the most important things in the job.

There is a very simple MVS command for the effect:

D PROG,LNKLST

Here’s an example of what this command returns:

RESPONSE=TST1
CSV470I 12.29.52 LNKLST DISPLAY 888
LNKLST SET LNKLST01 LNKAUTH=LNKLST
ENTRY  APF  VOLUME  DSNAME
1       A TST1R1 SYS2.LINKLIB
2       A TST1R1 SYS1.MIGLIB
3       A TST1R1 SYS1.CSSLIB
4       A TST1R1 SYS2.LINKLIB
5       A TST1R1 SYS1.LINKLIB
6 TST1R1 SYS1.SORTLIB
...

Explanation:

TST1 is the LPAR name

LNKLST01 indicates the Linklist set currently active and in use by the system

A indicates that the dataset is also in APF list

TST1R1 indicates the volume where the dataset is allocated

Note:

The Linklist concatenation is defined in the PROGxx member of the PARMLIB.

Sometimes we find it necessary either to inactivate an active exit routine or the other way around. In order to achieve this, we need to use the MVS command:

/SETPROG EXIT,MODIFY,EXITNAME=exit_name,MODNAME=mod_name,STATE=active_inactive

Example:

/SETPROG EXIT,MODIFY,EXITNAME=SYS.IEFACTRT,MODNAME=IEFACTRT,STATE=INACTIVE

Other parameters:

JOBNAME=jobname – The job(s) name(s) for which this exit routine is to get control. If some other job calls the exit, this exit routine does not get control. The default value is * which means all the jobs. The default for the MODIFY parameter is to leave the jobname unchanged.

When you require to add an exit routine to an exit you may use the most simple form of the Add command:

/SETPROG EXIT,ADD,EXITNAME=exit_name,MODNAME=mod_name,DSNAME=dsname

Example:

exit_name = SYS.IEFACTRT

mod_name = IEFACTRT

dsname = SYS2.LINKLIB.TST1

/SETPROG EXIT,ADD,EXITNAME=SYS.IEFACTRT,MODNAME=IEFACTRT,DSNAME=SYS2.TST1.LINKLIB

Other parameters:

When adding an Exit routine to an Exit you may also have the need to use one or more of the following parameters:

STATE=active_inactive - Indicates the state of the exit routine. ACTIVE is the default value.

JOBNAME=jobname – The job(s) name(s) for which this exit routine is to get control. If some other job calls the exit, this exit routine does not get control. The default value is * which means all the jobs.

ABENDNUM=(n[,CONSEC]) – indicates that the exit routine is not to be given control after the n abends occur. CONSEC indicates that there must be n consecutive abends before the system stops giving control to the exit routine.

FIRST – Specifies that the system is to call the exit routine before all other exit routines associated with this exit, unless another exit routine, added after it, also specifies FIRST.

LAST - Specifies that the system is to call the exit routine after all other exit routines associated with this exit, unless other exit routines are added after it.

Examples:

/SETPROG EXIT,ADD,EX=SYS.IEFU83,MOD=CYN1FU83,DSN=CYN.SCYNAUTH,FIRST

/SETPROG EXIT,ADD,EX=SYS.IEFU83,MOD=CYN1FU83,DSN=CYN.SCYNAUTH,FIRST,STATE=INACTIVE

/SETPROG EXIT,ADD,EX=SYSSTC.IEFACTRT,MOD=IEFACTRT,ABENDNUM=(5)

/SETPROG EXIT,ADD,EX=SYSSTC.IEFACTRT,MOD=IEFACTRT,ABENDNUM=(5,CONSEC)

The following are some of the most common ways to display Exits and Exit Routines:

1. Display the names of all the Exits

/D PROG,EXIT,ALL

Example of what this command returns:

CSV460I 13.31.32 PROG,EXIT DISPLAY 941
EXIT             DEF EXIT             DEF EXIT             DEF
SYSSTC.IEFACTRT   E  SYSSTC.IEFUJI     E  SYSSTC.IEFUJV     E
SYS.IEFACTRT      E  SYS.IEFUJI        E  SYS.IEFUJV        E
SYS.IEFU83        E  SYS.IEFU84        E  SYS.IEFU85        E
SYSSTC.IEFU83     E  SYSSTC.IEFU84     E  SYSSTC.IEFU85     E
...


2. Display the names of all exit routines associated with the named exit

/D PROG,EXIT,EXITNAME=exit_name

Example:

exit_name = SYS.IEFACTRT

/D PROG,EXIT,EXITNAME=SYS.IEFACTRT

Returns:

RESPONSE=TST1
CSV461I 14.15.02 PROG,EXIT DISPLAY 068
EXIT MODULE STATE MODULE STATE MODULE STATE
SYS.IEFACTRT IEFACTRT A STRBACTR A


3. Display the names of the exits with which the specified exit routine is associated

/D PROG,EXIT,MODNAME=mod_name

Example:

mod_name = IEFACTRT

/D PROG,EXIT,MODNAME=IEFACTRT

Returns:

RESPONSE=TST1
CSV462I 14.20.25 PROG,EXIT DISPLAY 906
MODULE  IEFACTRT
EXIT(S) SYSSTC.IEFACTRT  SYS.IEFACTRT


The following command deletes an exit routine from an exit:

/SETPROG EXIT,DELETE,EXITNAME=exit_name,MODNAME=mod_name,FORCE=yes_no

Example:

exit_name = SYSSTC.IEFACTRT

mod_name = IEFACTRT

/SETPROG EXIT,DELETE,EXITNAME=SYSSTC.IEFACTRT,MODNAME=IEFACTRT

Note:

FORCE = NO is the default value and therefore we don’t need to specify it. This changes the state of the exit routine to inactive and the system does not free the storage.

FORCE=YES frees the storage of the exit routine immediately and it should be used only if you are sure that no exit is running that exit routine.

Let’s say for instance that you have a DASD volume (TSTCT1) and you would like to know who’s using it (allocating it).

In order to do this we first need to know the unit address of said device:

/D U,VOL=volume_name

In our example:

/D U,VOL=TSTCT1

Result:

RESPONSE=TST1
IEE457I 09.53.10 UNIT STATUS 444
UNIT TYPE STATUS        VOLSER     VOLSTATE
7001 3390 A             TSTCT1     PRIV/RSDNT

Note: In this case as we can see the unit address of TSTCT1 is 7001.

Once we know the unit address then we can check who’s allocating it by using the command:

/D U,,ALLOC,address,1

In our case:

/D U,,ALLOC,7001,1

Result:

RESPONSE=TST1
IEE106I 09.56.08 UNITS ALLOCATED 623
UNIT    JOBNAME  ASID   JOBNAME  ASID   JOBNAME  ASID   JOBNAME  ASID
7001 *MASTER* 0000   *MASTER* 0001   XCFAS    0006   OMVS     000E
7001 CATALOG  0023   LLA      0024   JES2     0028

Note:

We use “1″ in the end of the command so that we only get the display for the single device we’ve specified in the command.