A quick code to transfer a spool file to a text file

Here's the code to transfer a spool file to a text file in order to print it from a PC or include it in a docu...

ment:

The filename, library, and folder entries will be different depending on what you choose to call them, but this is basically how it works.

CRTPF
File = xferfile
library = yourlib
source file = QDDSSRC
Record Length = 250
description = file for spool file conversion

WRKSPLF
find the name of the job you just printed
CPYSPLF
spooled file = name of hte file printed
to data base file = xferfile
library = yourlib
to member = *FIRST
replace or add = *REPLACE

control character = *PRTCTL

CPYTOPCD
from file = xferfile
library = yourlib
to folder = yourfldr
to document = xferfile.txt
replace document = *YES