PRTSRCF PRINT A SOURCE FILE MEMBER TAASRCJ
The PRTSRCF command defaults to print a source member on a page that
is 8 1/2 inches wide. This differs from the CPYSRCF command or the
SEU printed output which print a wider listing. The sequence numbers
are printed on the left of the source statement. Only the first 72
columns of source are printed. The statement change date is not
printed by default.
PRTSRCF provides a simple solution for printing listings that will be
filed or presented to other people.
The command allows an easy entry of *CL, *RPG, etc. to designate the
standard system supplied source file names. The spooled file name
will be the name of the member printed.
A typical command would appear as follows:
PRTSRCF MBR(xxxx) MBRTYPE(*RPG)
An option exists to print the source statement change date. If you
take this option, the printed output line is 132 characters including
110 bytes of source.
Command parameters *CMD
MBR The member to be printed.
SRCFILE The qualified source file containing the member.
The special entries of *CL, *RPG etc. may be made
to designate the standard system supplied source
files. The library qualifier defaults to *LIBL.
OUTQ The qualified output queue name where the output
should be spooled to. The default is *JOB. The
library qualifier defaults to *LIBL (if *JOB is
specified, the value is ignored).
CHGBARS If change bars are desired, this is a 6 digit date
field in job format to use for a comparison against
the source statement change date. A change bar will
print if the parameter date is less than or equal to
the source statement date.
*NONE is the default which does not print a change
*TODAY may be entered which is the same as entering
the current date in job format.
The format of the output is shifted to the right two
characters if a CHGBARS date is entered. This
allows you to easily see the statements that have
been changed if you are using DSPSPLF.
The command recognizes when the CHGBARS date and the
source date are in different centuries and acts
CHGBARCHAR The change bar character that will be printed if
change bars are requested. An '*' is the default.
PRTCHGDAT A *YES/*NO value that determines if the individual
source change date will print and a 132 wide format
will be used. *NO is the default which will cause
output designed for 8 1/2 inch wide output.
If *YES is specified, the output is 132 wide.
The following TAA Tools must be on your system:
EDTVAR Edit variable
SNDCOMPMSG Send completion message
SNDESCMSG Send escape message
SNDSTSMSG Send status message
None, the tool is ready to use.
Objects used by the tool
Object Type Attribute Src member Src file
------ ----- --------- ---------- -----------
PRTSRCF *CMD TAASRCJ QATTCMD
TAASRCJC *PGM CLP TAASRCJC QATTCL
TAASRCJR *PGM RPG TAASRCJR QATTRPG
Added to TAA Productivity tools April 1, 1995