RE: Keeping QPRINT open

The reason you loop around is due to the RPG cycle.  In this case, you need to 
explicitely tell the compiler that you wish to exit the program by using a 
RETURN opcode.  

Eric DeLong
Sally Beauty Company
MIS-Project Manager (BSG)
940-297-2863 or ext. 1863



-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx]On Behalf Of Bob O.
Sent: Tuesday, July 11, 2006 10:36 AM
To: midrange-l@xxxxxxxxxxxx
Subject: Re: Keeping QPRINT open


   I tried using an indicatior on the line of code that sets on LR and ran it
   through the interactive source debugger.  The program never exited.  It
   just kept running and printing multiple copies of the report for that
   program.  I cannot take out the  "MOVE  *ON  *INLR" line because the
   program won't compile (of course).  So, how do I exit the program forcing
   it to run only one time?

   Here's what I did...

   C*----------------------------------------------------------------
   C*-M A I N L I N E C A L C U L A T I O N S-
   C*----------------------------------------------------------------
   C                     EXSR DET90
   C                     EXSR DET91
   C                     SETON                                       50
   C  N50              MOVE *ON            *INLR

    

     ----------------------------------------------------------------------

     From:  "Michael Naughton" <michael_naughton@xxxxxxxxxxxx>
     Reply-To:  Midrange Systems Technical Discussion
     <midrange-l@xxxxxxxxxxxx>
     To:  "Midrange Systems Technical Discussion" <midrange-l@xxxxxxxxxxxx>
     Subject:  Re: Keeping QPRINT open
     Date:  Mon, 05 Jun 2006 17:01:18 -0400
     >What language are the programs in? If RPG, I think it's as simple as
     >leaving LR off until the last program. You might also have to override
     >QPRINT to share(*yes) before you start(?).
     >
     >Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxx> on
     Monday,
     >June 05, 2006 at 3:19 PM -0500 wrote:
     > >   I have a project where I need to convert spool files to PDF
     files.  I
     > >have
     > >   13 programs that use QPRINT as the output file.  Rather than
     create 13
     > >   seperate PDF files, I'd like to keep an instance of QPRINT open
     and
     > >create
     > >   one large PDF file from the single spool file.  Is there a way (or
     > >   command) to keep the print file open through the duration of the
     13
     > >   progams?
     >
     >
     >Mike Naughton
     >Senior Programmer/Analyst
     >Judd Wire, Inc.
     >124 Turnpike Road
     >Turners Falls, MA  01376
     >413-863-4357 x444
     >mnaughton@xxxxxxxxxxxx
     >
     >--
     >This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
     list
     >To post a message email: MIDRANGE-L@xxxxxxxxxxxx
     >To subscribe, unsubscribe, or change list options,
     >visit: http://lists.midrange.com/mailman/listinfo/midrange-l
     >or email: MIDRANGE-L-request@xxxxxxxxxxxx
     >Before posting, please take a moment to review the archives
     >at http://archive.midrange.com/midrange-l.
     >