Copy Spoolfiles

[george_j_wen]

I know this isn't exactly a JDE question but a colleague of mine found a job
running twice (to satisfy user needs - don't ask) and I'd like to save the cpu
and
run it just once. I'm interested in copying (not moving) the resulting
spool-file
from one printer outque to another. This would need to be done in the CL.

Does anyone know of any command(s) that'll do this?

Thanks,

George

 

[Emad_S_Banoub1]

George,
What's your configuration! Just kidding.
In QUSRTOOLS there is a command called DUPSPLF it will duplicate your spool
file to a different OutQ.
Also there is a third party utility "Save Output Queues" by Generic
Software Inc. www.genericsoftware.com do the same thing and more (very
reasonable about $400 or $500).

Emad Banoub
Motgomery Watson
Pasadena, CA
626.568.6529
[email protected]
A7.3 Cum.12/X3 - Xe SP 13.0 coexistence





george_j_wen <[email protected]>@jdelist.com on 04/27/2001 02:43:30
PM

 

[Norma_Kircher61]

If this is for the purpose of sending a copy of the report to another user,
then try the AS400
command "SNDNETSPLF". This command will allow you to copy the spool file
and attach a different
user id to it. The spool file will be sent to the outqueue associated with
the user's AS400
user profile. You can then do a "CHGSPLFA" to direct that same spool file
to a specific output
queue of your choice.

Norma Kircher
AS400 Programmer/Analyst
Emerson Process Management
8301 Cameron Road
Austin, Texas 78754-3895
(512) 832-3035
(512) 832-3950 Fax
[email protected]

 

[Suni]

you could also use the sndnetsplf command to send a copy of the spooled file
to another user. That user could be set up to use a particular outq. One
prerequisite item that would need to be set up is an entry in the directory
entry table (WRKDIRE) for both the sender and the receiver. Some nominal
setup required, but its IBM-supplied and its free.

 

[CatD]

0002.00 MAINCLP: PGM

0005.00 DCL VAR(&JOB) TYPE(*CHAR) LEN(10)
0006.00 DCL VAR(&USER) TYPE(*CHAR) LEN(10)
0007.00 DCL VAR(&NBR) TYPE(*CHAR) LEN(6)
0008.00 RTVJOBA JOB(&JOB) USER(&USER) NBR(&NBR)
0009.00
95.02 SPLDUP FILE(QPRTC15) JOB(&NBR/&USER/&JOB) +
95.03 PRTFILE(QPRTC15) OUTQ(SMITH)+
95.04 SPLNBR(*LAST)

0009.00
95.02 SPLDUP FILE(QPRTC15) JOB(&NBR/&USER/&JOB) +
95.03 PRTFILE(QPRTC15) OUTQ(JONES)+
95.04 SPLNBR(*LAST)

 

[ekempter]

Is SPLDUP a TAATOOL?



Place your system configuration information in your signature!

 

[CatD]

[No message]