Re: how to let my program sleep a while

["Simon Coulter" <shc@xxxxxxxxxxxxxxxxx>]

h
Hello James,

You wrote:
>Just as a little additional note, which of the many fine decisions put forth 
>you 
>choose, make the call from your application to the method an EXSR and have the 
>SR 
>within a /COPYmember.

>If, and you never know when, some RS/400 or AS/6000 should appear on the 
>horizon, a 
>call to QCMDEXC will be labeled "old", even a call to a CL program (what's 
>that? the 
>OCL of the late 20th century?) automatically puts you into the geezer class.

>Isolate the function via /COPY and you can change the contents of the /COPY to 
>satisfy 
>the method de jour.

That's the whole point of putting such routines in a service program.  The 
external 
interface stays the same:

        sleep( some-time )

but the internal implementation can change as often as you like to "satisfy the 
method 
du jour" (or should that be methode?).  Currently DLYJOB but could be a program 
call, or 
a C function call, or whatever new function appears in the future.

Using /COPY for the "sub-routine" would require you to recompile every program 
that 
references said copy member.  A service program avoids that pain.

Regards,
Simon Coulter.

«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»
«» FlyByNight Software         AS/400 Technical Specialists       «»
«» Eclipse the competition - run your business on an IBM AS/400.  «»
«»                                                                «»
«» Phone: +61 3 9419 0175      Mobile: +61 0411 091 400           «»
«» Fax:   +61 3 9419 0175      mailto: shc@flybynight.com.au      «»
«»                                                                «»
«» Windoze should not be open at Warp speed.                      «»
«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»
+---
| 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
+---