The following sample shows the Remote print server (LPD) server cataloged procedure (LPSPROC).
//LPSERVE PROC MODULE=LPD,
// LPDDATA=TCPIP.SEZAINST(LPDDATA),
// LPDPRFX='PREFIX TCPIP',
// DIAG=''
//*
//* z/OS Communications Server
//* SMP/E Name: EZAEB019 alias LPSPROC in library SEZAINST
//*
//* Copyright: Licensed Materials - Property of IBM
//* "Restricted Materials of IBM"
//* 5694-A01
//* Copyright IBM Corp. 1996, 2008
//* US Government Users Restricted Rights -
//* Use, duplication or disclosure restricted by
//* GSA ADP Schedule Contract with IBM Corp.
//*
//* Status: CSV1R10
//LPD EXEC PGM=MVPMAIN,
// PARM=('&MODULE,ERRFILE(SYSERR),HEAP(512)',
// 'NOSPIE/ ''&LPDDATA'' &LPDPRFX &DIAG'),
// REGION=6M,TIME=1440
//SPOOL OUTPUT CHARS=GT12
//STEPLIB DD DSN=TCPIP.SEZATCP,DISP=SHR
//LPD1 OUTPUT CHARS=GT12
//*
//* SYSPRINT contains runtime diagnostics from LPD. It
//* can be a data set or SYSOUT.
//*
//SYSPRINT DD SYSOUT=*
//*
//* SYSERR contains runtime diagnostics from Pascal. It can be
//* a data set or SYSOUT.
//*
//SYSERR DD SYSOUT=*
//*
//* SYSDEBUG receives output that is generated when the TRACE
//* parameter is specified in the PARM on the EXEC card.
//* It can be a data set or SYSOUT.
//*
//SYSDEBUG DD SYSOUT=*
//OUTPUT DD SYSOUT=*
//SYSIN DD DUMMY
//*
//* The SYSMDUMP DD statement will cause MVS to provide
//* an IPCS readable dump for ABENDs.
//*SYSMDUMP DD DISP=SHR,DSN=your.dump.data.set
//*
//* SYSTCPD explicitly identifies which data set is to be
//* used to obtain the parameters defined by TCPIP.DATA
//* when no GLOBALTCPIPDATA statement is configured.
//* See the IP Configuration Guide for information on
//* the TCPIP.DATA search order.
//* The data set can be any sequential data set or a member of
//* a partitioned data set (PDS).
//SYSTCPD DD DISP=SHR,DSN=TCPIP.SEZAINST(TCPDATA)