Re: Programming philosophy WAS: Whats the best way to run a CL every 30 min

> This solution has an advantage: it's almost self-terminating.  Write a
quick
> CL program to send a message to this queue and it terminates gracefully.
> The disadvantage is that it relies on a side-effect.  If this solution is
> chosen, it should be heavily commented to note that fact.  Bruce's
> commentary would be perfect.
>
> Without any comments, which version's intent (let time elapse without
tying
> up the processor) is clearer?  The data queue or
>
> @LOOP: DlyJob Dly(&WaitSecs)
>      RtvJobA EndSts(&EndFlag)
>      If (&EndFlag *eq '1') (Goto Terminate)
>      .
>      Goto @LOOP
> Terminate:
>
Do you want to wait 30 minutes before the job ends?

+---
| 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
+---