RE: Do Forever Loop

["Christopher J. Devous" <cdevous@xxxxxxxxxxx>]

In ILE, try the following:

C                   ShtDn                                        90  
C                   DoW       *In90 = *Off                           

.......  many lines of really good smokin' code.....

  *  Test for operator shutdown...                                   
 C                   ShtDn                                        90 
 C                   EndDo                                           

-----------------------------------------
Christopher J. Devous
Director of Systems Development
The Antigua Group, Inc.

http://www.antigua.com
mailto:cdevous@antigua.com
-----------------------------------------




On Tuesday, January 30, 2001 10:11, Jim Langston 
[SMTP:jimlangston@conexfreight.com] wrote:
> I have written a program that is to be add to the job scheduler
> that has a do forever loop (DoW 1=1).  I remember hearing some
> discussion that there was something you were supposed to do so
> programs could close gracefully if given an ENDJOB.
> 
> Where do I even start to look for this?  This program does not
> require a graceful end, as it does a bit of processing then waits
> for a long time (usually 24 hours I would think) and there is a
> lot of idle time, so I doubt if they will hit the job with and
> end during processing, but you never know.
> 
> Any pointers to the manual or how to do this would be appreciated.
> 
> Regards,
> 
> Jim Langston
> +---
> | 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
+---