Re: Seeking a clock program (or a really expensive digital time piece)

//--- forwarded letter -------------------------------------------------------
> X-Mailer: Microsoft Internet E-mail/MAPI - 8.0.0.4211
> Date: Wed, 25 Mar 98 08:23:05 -0600
> From: "Mike Cornwell" <mcornwell@colsoncaster.com>
> To: "'midrange-l@midrange.com'" <midrange-l@midrange.com>
> Reply-To: MIDRANGE-L@midrange.com
> Subject: Seeking a clock program

> 
> We are looking at doing some time and attendance on our AS/400 using dumb 
> terminals and bar code scanners. We want to be able to display the time 
> continually without having to press a key to update the screen. Does anyone 
> know of a program that will display the time, preferably in larger letters 
> and continually update the screen? I think I've seen something like this 
> before, but I'm not sure where.
> 
> Any help would be appreciated.
> 
> TIA,
> 
> Mike Cornwell
> mcornwell@colsoncaster.com
> Sr. Programmer/Analyst
> LAN Administrator
> Colson Caster Corporation
> Jonesboro, Arkansas
> 
 
Hello Mike,

Attached is the source for a program which will turn an AS/400 terminal into a 
giant digital 
clock.  The attachment is zipped with InfoZip which is compatible with PKWare's 
product.  Just 
unzip it to get a file called CLOCK@.  If you have trouble with this then send 
me a note and 
I'll send you the code in clear-text.

CLOCK@ is packaged as a job stream so just send the file to the AS/400, put the 
file in a 
source member, edit the source to change the &XXXXXXXXXX's to the name of the 
library in which 
you'd like to install the clock program.  Then use the SBMDBJOB command to run 
the job stream.

It will create a display file called CLOCKD and a CL program called CLOCKC.  
The CL program is 
designed to be called from the terminal which is to be the clock but it would 
be a simple 
matter to change it to acquire the terminal so it could be submitted to batch.  
Also the only 
way to end the clock is via SysReq-2.  You could add support to end via a 
function key by 
adding code to read the screen without waiting for input and test for a 
function key after the 
delay.

The clock shows the hours and minutes in 24-hour format and is as accurate as 
the system clock 
and you can easily verify this by adding the TIME keyword to the DDS to show 
the current time 
to see that the CL program rolls the minutes exactly (i.e., the seconds 
component of the TIME 
keyword is always zero).  The CL program attempts to compensate for processing 
delays.

If you want the additional support for batch and function keys and cannot do 
this yourself 
then send me a note.  I'll try to fit it in.

Regards,
Simon Coulter.

//----------------------------------------------------------
// FlyByNight Software         AS/400 Technical Specialists
// Phone: +61 3 9419 0175      Mobile: +61 3 0411 091 400
// Fax:   +61 3 9419 0175      E-mail: shc@flybynight.com.au
// 
// Windoze should not be open at Warp speed.
 

<clock@.zip>