Z/OS Commands and Tips

JES2 TIPS:

To find out the jobs that are filling the JES2 spool:

 

$djq,spl=(%>5) Display all jobs which occupy more than 5% of the spool
$djq,a>5,q=ppu Display all jobs on the print/punch queue more than 5 days old
$djq,q=ppu,type=tsu Display all TSUs on the print/punch queue
$djq'jobname',spl Display spool percent occupied by the named job
$djq,q=ppu,userid Display userid associated with jobs on print/punch queue
$pjq,a>5,q=ppu Purges all jobs on the print/punch queue more than 5 days old
$pjq,q=ppu,type=tsu Purge all TSUs on the print/punch queue
$da,x Displays all jobs, including TSU and STC
$pjnnnnn Purge JOB number nnnnn
$psnnnnn Purge STC number nnnnn
$ptnnnnn Purge TSU number nnnnn
$dspl Display percent spool used
$ta wlog,t=23.58,i=86400,'$vs,''W L''' Automatically spin SYSLOG to sysout L once per day
$pos'syslog',a>5 Delete SYSLOG output groups more than 5 days old 

MVS TIPS:

Commands to add datasets to the APF and LNKLST:

SETPROG APF,ADD,DSN=USER.LOADLIB,VOL=SMS002
SETPROG LNKLST,DEFINE,NAME=LNKLST01,COPYFROM=LNKLST00       
SETPROG LNKLST,ADD,NAME=LNKLST01,DSN=USER.LOADLIB,VOL=SMS002
SETPROG LNKLST,ACTIVATE,NAME=LNKLST01
D PROG,APF
D PROG,LNKLST

Increase the size of a VTOC:
 ICKDSF can now change the size of the VTOC without re-initialising the volume. Two methods are available: 
 

       1. Extend the VTOC in place (if there is free space next to the VTOC):

     
                REFORMAT UNIT(xxxx) VERIFY(serial) EXTVTOC(new size)
            2. Move the VTOC to a different location on the volume: 

     
                REFORMAT UNIT(xxxx) VERIFY(serial) NEWVTOC(cc,hh,n) 

TCP/IP TIPS:

How to allow a z/OS application to bind to a port less than 1024?

    In TCPIP.TCPIP.PROFILE, the following statements restrict the ability of jobs to bind to the so-called "non-ephemeral" ports (port numbers 1-1023):

    TCPCONFIG RESTRICTLOWPORTS
    UDPCONFIG RESTRICTLOWPORTS

    If these statements are specified, then the job must either be:

       1. APF-authorized, or
       2. Running under a userid defined in RACF with OMVS(UID(0)), or
       3. Mentioned in a PORT or PORTRANGE statement

    A PORT or PORTRANGE statement with the optional keyword SAF followed by a 1-8 character name can be used to control access to the port using the RACF. Example: PORT 80 TCP * SAF HTTPSERV (where "*" means "any jobname"). You need to define a RACF resource in the class SERVAUTH with the following name:
    EZB.PORTACCESS.sysname.tcpname.safname
    where:

        * EZB.PORTACCESS is a constant
        * sysname is the MVS system name
        * tcpname is the TCPIP jobname
        * safname is the 1-8 character name following the SAF keyword

How to run the z/OS FTP client in passive mode?

    Use this command in the FTP client:

                                  locsite fwf