re: sending a printout to several printers

Unless you are concerned with things like font changes, bolding, underlining
etc. you can keep most important attributes when using CPYSPLF if you create
the physical file one byte longer than the report width.  Then on CPYSPLF
use CTLCHAR(*FCFC).  When copying back from disk file to respool report
just do  OVRPRTF QSYSPRT CTLCHAR(*FCFC) then CPYF diskfile QSYSPRT
Anyway, my suggestion of using SNDNETSPLF command (despite needing to
configure SNADS) is much simpler, and won't lose ANY attributes of spool
files as long as the SNDNETSPLF command specifies DTAFMT(*ALLDATA).
You can simply use an OVRPRTF to make sure your report stays on hold (or
another technique like a special FORMTYPE or OUTQ), then in you CL program
after printing report, you can use something like SNDNETSPLF FILE(REPORT01)
TOUSRID((USER1 SYSTEM1) (PRT03 SYSTEM15) (MOREUSRS OTHERSYS)) SPLNBR(*LAST)
Then, if you held the spool file and want to release copy to print on local
system do a RLSSPLF, or you can do a DLTSPLF, or even things like MOVSPLF
(a QUSRTOOL command - yeah Al Barsa paid me $1,000 to plug it !   ;-)  ).
or just a CHGSPLFA to move it to another queue for local printing etc.


On Sat, 2 Aug 1997 boothm@earth.goddard.edu wrote:

> I went to IBM's Redbook page and it said:
> ---------------------------------------
> "The Copy Spooled File (CPYSPLF) command copies the data records in the
> specified spooled file to a user-defined physical data-base file. ...Print
> lines that are all blank are not copied. 
> 
> When you copy a spooled file to a physical file, certain information is
> lost or changed, including: ...
> 
> If the CPYF command is used to copy the data back to another spooled file,
> additional information is lost, including: ...
> ---------------------------------
> So, it seems to me that this technique can't be reliable.  I'll give it a
> try though. Thanks for all of the replies.
> 
> In <Pine.SUN.3.96.970802154706.1364H-100000@access4.digex.net>, on
> 08/02/97 
>    at 03:47 PM, Don <dr2@access.digex.net> said:
> 
> 
Booth,
> 
> 
checkout the cpysplf cmd.....
> 
> -----------------------------------------------------------
> boothm@earth.goddard.edu
> -----------------------------------------------------------
> 
> * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
> * This is the Midrange System Mailing List!  To submit a new message,   *
> * send your mail to "MIDRANGE-L@midrange.com".  To unsubscribe from     *
> * this list send email to MAJORDOMO@midrange.com and specify            *
> * 'unsubscribe MIDRANGE-L' in the body of your message.  Questions      *
> * should be directed to the list owner / operator: david@midrange.com   *
> * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
> uucp
> 
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
* This is the Midrange System Mailing List!  To submit a new message,   *
* send your mail to "MIDRANGE-L@midrange.com".  To unsubscribe from     *
* this list send email to MAJORDOMO@midrange.com and specify            *
* 'unsubscribe MIDRANGE-L' in the body of your message.  Questions      *
* should be directed to the list owner / operator: david@midrange.com   *
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *