Forums before death by AOL, social media and spammers... "We can't have nice things"
|    comp.databases.paradox    |    To crash or not to crash, asks Borland    |    9,834 messages    |
[   << oldest   |   < older   |   list   |   newer >   |   newest >>   ]
|    Message 8,901 of 9,834    |
|    Craig to All    |
|    Re: How to set up a table    |
|    09 Nov 07 17:14:57    |
   
   From: craig.futterman@nospam.comcast.net   
      
   Larry and Steven,   
   Thanks for you replies.   
      
   I took a hybrid approach. (not a Prius) It seems to work quite well.   
   See below.   
      
   Thanks for you help.   
      
   Craig   
      
   t =Time("07:00:00 AM")   
   i = 0   
   TC.edit()   
   TC.insertRecord()   
   While True   
    For j from 0 to 23 ;// # of hours in a day   
    TC.insertAfterRecord()   
    TC.MRNumber = stMR   
    TC.DateOfOperation = d   
      
    If j = 17 then   
    i = i+1 ;// increments the day after MN   
    ENDIF   
    t2 = t + (3600000*j) ;// increments the time by 1 hour (3,600,000   
   seconds/hr)   
    dt = Datetime(Strval(t2) +", "+ StrVal(d+i))   
      
    TC.DayTime = dt   
    TC.postRecord()   
    If i = 4 and j =23 then   
    quitloop   
    ENDIF   
    ENDFOR   
    If i = 4 and j =23 then   
    quitloop   
    ENDIF   
      
    ENDWHILE   
      
   --- SoupGate-Win32 v1.05   
    * Origin: you cannot sedate... all the things you hate (1:229/2)   
|
[   << oldest   |   < older   |   list   |   newer >   |   newest >>   ]
(c) 1994, bbs@darkrealms.ca