Re: how to let my program sleep a while

["James W. Kilgore" <qappdsn@xxxxxxxxxxxxx>]

Simon, Booth, all,

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 /COPY
member.

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.

so your program will have:

C            z-add    30    waitsec
C            exsr    wait

And somewhere else you would have:

C/copy xxxxxxxxxx,waitfunctn

Where waitfunctn can contain a call to QCMDEXC, a call to a CL program, a CALLP 
to your own
procedure, a CALLP to a C function or even if you're a rebel, a wait on a data 
queue that
never has content.

J Kilgore



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