AS/400 HELP    

                                      "CLOCK" 

          

 

This is  a modified version of P.J. STEELE’S (1996) clock program. I added a few things to make the clock update itself every second without having to press enter.  There is little hit on the AS/400 as the display is sent every second.

CLOCK was modified and tested at V4R5    It was compiled  and saved at V3R2

PC INSTRUCTIONS:

Download "CLOCK” to your PC.

Go to a DOS session and enter the following;

FTP SYSTEM                                        (system = your AS/400’s name or IP address)

Enter a valid user id and password

CD QGPL

LCD C:\DIRECTORY (directory= the directory on your pc where you downloaded “clock.savf”

QUOTE    SITE     NAMEFMT   1

BIN

PUT       CLOCK.SAVF

QUOTE   RCMD   RSTLIB   SAVLIB(CLOCK)   DEV(*SAVF)   SAVF(QGPL/CLOCK)

 Note:  If there is a security problem restoring all objects with the command above,  sign on to your as/400 as Qsecofr and run RSTLIB  from the command line.

   DOWNLOAD clock.savf                             

 

 

AS/400 INSTRUCTIONS:

ADDLIBLE CLOCK

CALL CLOCK

 

NOTE:    Display format CLOCKFM was compiled with   WAITRCD(1)