|
1) Convert the RPG/400 program into ILERPG, just because you can, if for no other reason. 2) Use the USROPN keyword on the printer file. Use the OPEN and CLOSE statements in your calc specs to open and close the printer file. This will generate separate spool files each time it is closed. 3) Include the following in your ILERPG program: H Bnddir('QC2LE') ... C Eval ErrorCPF=*blanks C eval ErrorFlag=system('ovrprtf myfile outq(' + C %trim(outqlib) + '/' + %trim(outqname) + C ')') 4) Do the ovrprtf right before the OPEN statement. Cool? Rob Berendt ================== Remember the Cole! Gary.Brown@appliedche micals.com To: RPG400-L@midrange.com Sent by: cc: owner-rpg400-l@midran Subject: Spool File Output Queue ge.com 05/16/01 07:05 AM Please respond to RPG400-L I have created an RPG/400 program that generates our Purchase Orders. Depending on the state of the supplier the output needs to end up on any of three printers. In any given purchase order run we will generate purchase orders for all three printers. I am happy to generate one spool file per purchase order (rather than having all the PO in one large spool file) Question: How can I control the output queue of my spool file(s) from within my program. Thanks for your help. Gary. +--- | This is the RPG/400 Mailing List! | To submit a new message, send your mail to RPG400-L@midrange.com. | To subscribe to this list send email to RPG400-L-SUB@midrange.com. | To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com. | Questions should be directed to the list owner/operator: david@midrange.com +--- +--- | This is the RPG/400 Mailing List! | To submit a new message, send your mail to RPG400-L@midrange.com. | To subscribe to this list send email to RPG400-L-SUB@midrange.com. | To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com. | Questions should be directed to the list owner/operator: david@midrange.com +---
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.