>> >>* MFS_TRAN.TRANS_ID - Contains the last DATETIME() value from the previous call. >> >>ngCount = 0 >>timeStamp = DATETIME() >>IF timeStamp > MFS_TRAN.TRANS_ID >> * we're home! >>ELSE >> * This case should only happen if last call was less than a seconds ago. >> DO WHILE timeStamp <= MFS_TRAN.TRANS_ID >> ngCount = ngCount + 1 >> WAIT '' TIMEOUT 1 >> timeStamp = DATETIME() && By this 1 second delay, we MUST get a fresh Time Stamp >> * but lets check it anyway. >> IF timeSTamp <= MFS_TRAN.TRANS_ID .AND. ngCount > 10 && we have looped 10 times with 1 second delay. >> >> WAIT '-- The system Clock seems to be stuck....' + CR + ; >> ' (press any key to continue)' WINDOW TIMEOUT 5 >> >> EXIT && Send your best time stamp. >> ENDIF >> ENDDO >>ENDIF >>REPLACE MFS_TRAN.TRANS_ID WITH timeStamp >>RETURN timeSTamp >> >>>