Here's a CI script I wrote that waits until a file is not in use
to do something (in this case, recompile a forms file).  It's short
so I don't think it's too much of a waste of bandwidth, certainly not
as much as the "Chance Squared" thing! :-)

Jim Phillips                            Manager of Information Systems
E-Mail: [log in to unmask]      Therm-O-Link, Inc.
Phone: (330) 527-2124                   P. O. Box 285
  Fax: (330) 527-2123                   Garrettsville, Ohio  44231

---------------------------------------------------------------------------

!JOB CFORM,USER.ACCOUNT,FORMS;OUTCLASS=LP,1
!SETVAR COUNT 1
!SETVAR DONE "NO"
!WHILE DONE = "NO" DO
!   PURGE TT
!   PURGE TT,TEMP
!   PURGE TTT
!   PURGE TTT,TEMP
!   LISTF formfile.FORMS,2 > TT
!   PRINT TT;START=7;END=7;OUT=TTT
!   INPUT X < TTT
!   SHOWVAR X
!   SETVAR X1 POS('*','!X')
!   SHOWVAR X1
!   IF X1 = 0 THEN
!      RUN FORMSPEC.PUB.SYS
       FILE formfile
       COMPILE INTO fastform
       EXIT
!      SETVAR DONE "YES"
!      TELLOP CFORM: formfile RECOMPILED
!   ELSE
!      TELLOP CFORM: PASS #!COUNT
!      PAUSE 30
!      SETVAR COUNT !COUNT+1
!      IF COUNT > 100 THEN
!         SETVAR DONE "YES"
!         TELLOP CFORM: JOB ABORTED (OVER 100 ATTEMPTS)
!      ENDIF
!   ENDIF
!ENDWHILE
!EOJ