home bbs files messages ]

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