ISPEXEC VGET PDSENDX PROFILE
SET X = &STR(&PDSENDX)
SET PDSENDX = N
ISPEXEC VPUT PDSENDX PROFILE
PDS '&SYSUID..ISPF.ISPPROF' ISPXEQ LISTA
SET PDSENDX = &STR(&X)
ISPEXEC VPUT PDSENDX PROFILE
            

 The LA utility is a one-line CLIST which invokes the PDS utility to access its
 formatted LISTALC table display.  As you may or may not know, the TSO LISTALC
 (or LISTA) command will show you what datasets are currently allocated to which
 DDNAMEs in your TSO session.  It is helpful information, but not in a very
 useful format.

 The PDS utility has a builtin function which displays these allocations in a
 scrollable table and permits you to process against the datasets in a variety
 of ways.  The PDS utility can only be invoked with a dataset name to process
 against, so the LA utility uses your ISPF profile dataset as the "seed dataset"
 if you will.

 The help provided with this function in PDS is fairly good so you can use it to
 further familiarize yourself with the LISTA screen functions.

 Note: since you are in PDS, you will have to "END" twice to exit this utility
 table display....just the nature of the beast.