|
Depending on the situation, you could simply use a DLYJOB (Delay Job) Command. ----- Original Message ----- From: Chris Bipes <rpg@cross-check.com> To: <RPG400-L@midrange.com> Sent: Wednesday, January 05, 2000 11:06 AM Subject: RE: obtaining system uptime > Change your startup program to put the system time stamp to data area. > Rtvsysval qdate &date > chgdtaara ipldate &date > ... repeat for qtime. > > For waking up ever xx seconds, you can wait at a data queue for xx seconds. > If no data received, do your normal processing. I like data queues because > you get more control. You can send data queue entries to end/re-start or > change the wait time to the data queue and your program wakes up instantly > and processes the data queue entries. > > Good Luck, > > > Christopher K. Bipes mailto:ChrisB@Cross-Check.com > Sr. Programmer/Analyst mailto:Chris_Bipes@Yahoo.com > CrossCheck, Inc. http://www.cross-check.com > 6119 State Farm Drive Phone: 707 586-0551 x 1102 > Rohnert Park CA 94928 Fax: 707 586-1884 > > *Note to Recruiters > Neither I, nor anyone that I know of, is interested in any new and/or > exciting positions. Please do not contact me. > > > -----Original Message----- > From: James David Rich [mailto:james@dansfoods.com] > Sent: Wednesday, January 05, 2000 2:50 AM > To: RPG400-L@midrange.com > Subject: obtaining system uptime > > > I need to get the system uptime or the time when the system was last > booted into a program. An all night review of the books at publib.ibm.com > gives me nothing useful. > > I also need something to wake up my program every 120 seconds or > so. Something like signal handlers. > > Anyone know how to do this? > > > James Rich > james@dansfoods.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 > +--- > +--- | 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 +---
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.