RE: Change printer

USROPN is only needed if the print file is first overridden within the RPG IV
program before it is initially open. You are always allowed to use CLOSE PRTF on
any file regardless of the USROPN keyword.

-Bob Cozzi
www.iSeriesTV.com
iPod your industry news instead of reading it.
Coming June 2006
Ask your friends to tune into iSeriesTV.com


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On
Behalf Of Michael_Schutte@xxxxxxxxxxxx
Sent: Thursday, June 01, 2006 1:30 PM
To: RPG programming on the AS400 / iSeries
Subject: Re: Change printer

Maybe I'm confused.  Right, the spoolfile needs to be usropn.

However, if he is using QCMDEXC.

Wouldn't all he need is ...

QCMDEXC('OVRPRTF SPOOLFILE SAVE(*YES) OUTQ(PRT1)');
Open Spoolfile;

....  Build spool file.

Close Spoolfile;

... Wait for spoolfile to enter SAV status.
QCMDEXC('CHGSPLF ....  OUTQ(PRT2)');
QCMDEXC('RLSSPLF .... ');

... Wait for spoolfile to enter SAV status again
QCMDEXC('CHGSPLF ....  OUTQ(PRT1)');

I thought he was wanting to physical print the spool file again.  Not build
the spoolfile again. Correct?  Wrong?

I prefer SYSTEM() but only because I don't have to tell how many
characters.


Michael Schutte



                                                                           
             rob@xxxxxxxxx                                                 
             Sent by:                                                      
             rpg400-l-bounces@                                          To 
             midrange.com              RPG programming on the AS400 /      
                                       iSeries <rpg400-l@xxxxxxxxxxxx>     
                                                                        cc 
             06/01/2006 02:18                                              
             PM                                                    Subject 
                                       Re: Change printer                  
                                                                           
             Please respond to                                             
              RPG programming                                              
              on the AS400 /                                               
                  iSeries                                                  
             <rpg400-l@midrang                                             
                  e.com>                                                   
                                                                           
                                                                           




USROPN, right?
     FMYPRINT   O    E             PRINTER USROPN
Then you OVRPRTF, Open it. print to it, close it, DLTOVR, OVRPRTF, open
it, print to it, close it, DLTOVR, repeat as necessary.
If you are using USROPN and are still having issues then perhaps it is
your OVRPRTF

Override scope . . . . . . . . .   *ACTGRPDFN    *ACTGRPDFN, *CALLLVL,
*JOB
is the default.

Someone here prefers system() over qcmdexc.  Claims that system() stays in
the same activation group.  Don't know if that is true or not.

Rob Berendt
--
Group Dekko Services, LLC
Dept 01.073
PO Box 2000
Dock 108
6928N 400E
Kendallville, IN 46755
http://www.dekko.com





"Don Wereschuk" <dwereschuk@xxxxxxxxxxxxxxx>
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
06/01/2006 02:06 PM
Please respond to
RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>


To
"RPG programming on the AS400 / iSeries" <rpg400-l@xxxxxxxxxxxx>
cc

Subject
Change printer






Does anyone know how to change the actual printer during program
execution? I want to print a file to PRT1 and then print the same file
to PRT2 then change back to PRT1. I tried using QCMDEXC with CHGPRTF but
I'm either using the wrong command or the wrong option ( I am changing
DEV() ). The program compiles and executes alright but all copies are
sent to the same printer. Thanks in advance for any help anyone can
provide.





******************************************

Don Wereschuk

ISD Associate - Programmer

Simcoe Parts Service Inc.

Phone:   705-435-7814          Ext.: 302

Fax:         705-435-6746

dwereschuk@xxxxxxxxxxxxxxx

******************************************



--
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.


--
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.