Thanks in advance
(P.S. V4R3M0)
Basically there isn't a built-in way of doing this. However:
1) You can read the spool file and write it to something you can save by
using APIs
2) You could just buy a third-party application that will do it
3) If it's a SCS spool file, then you could to CPYSPLF to the spool file
to a DB file. Then use, I believe, CPYF TOFILE(*PRINT) to recreate the
spool file.
HTH,
Charles
But much easier is to specify save(*yes) on spool file. You can print it as
many times as you want then.
HTH
Alex
<jla...@gadisa.es> wrote in message news:3cee6626$1...@news.arrakis.es...
Brad
So, either save (*yes), either copying spool file into some data member (PF)
using CPYSPLF and losing some info.
Alex
Hope dies last...
"Bradley V. Stone" <bvs...@onebox.com> wrote in message
news:3ceec211...@news.gotocrystal.net...
To Save:
1. CRTPF FILE(MYLIB/SPOOLDTA) SRCMBR(256)
2. CPYSPLF FILE(filename)
TOFILE(MYLIB/SPOOLDTA)
JOB(jobno/user/jobname)
SPLNBR(0001)
CTLCHAR(*FCFC)
3. SAVOBJ ...
To Restore:
1. RSTOBJ ...
2. OVRPRTF FILE(QSYSPRT) CTLCHAR(*FCFC)
3. CPYF FROMFILE(MYLIB/SPOOLDTA) TOFILE(QSYSPRT)
It's cheesy, but it works... You can add other parameters to the OVRPRTF if
you
need different CPI, LPI, etc...
HTH,
Chris
<jla...@gadisa.es> wrote in message news:3cee6626$1...@news.arrakis.es...
CPYTOOUTQ
CPYFRMOUTQ
Info found here: http://www.taatool.com/document/L_cpyfrmoutq.htm
<jla...@gadisa.es> wrote in message news:3cee6626$1...@news.arrakis.es...
Henk
Bradley V. Stone <bvs...@onebox.com> schreef in berichtnieuws
3ceec211...@news.gotocrystal.net...
I suggest mr. Rotman tries to recover a spoolfile saved this way...
I'm pretty sure he never did.
To the original poster: If you do a SNDNETSPLF (SNA) or a SNDTCPSPLF
(TCP) to yourself, you get a nice 'personal' copy that you can play
with. If you really need to save the spoolfile to tape, you need to copy
it to a database file using CTLCHR(*FCFC) and save the database file to
tape. You can then later recreate the spoolfile using CPYF <database
file> QSYSPRT after having overriden QSYSPRT with ctlchr(*fcfc) (OVRPRTF
command).
--
Vriendelijke groeten / Kind regards
René H. Hartman
R.H. Hartman Automatiserings Consultancy
www.hac-maarssen.nl
-----= Posted via Newsfeed.Com, Uncensored Usenet News =-----
http://www.newsfeed.com - The #1 Newsgroup Service in the World!
-----== 100,000 Groups! - 19 Servers! - Unlimited Download! =-----
Henk
René H. Hartman <sup...@sorry-nospam.nl> schreef in berichtnieuws
3cf3...@post.newsfeed.com...
HIS wrote:
--
Rodney A Johnson
Technical Team Lead for AS/400 Spool
Dept GJC
IBM Rochester, Minnesota
The contents of this message express only the sender's opinion.
This message does not necessarily reflect the policy or views of
my employer, IBM. All responsibility for the statements
made in this Usenet posting resides solely and completely with the
sender.