From: RDAPres@NoRDASpamWorldWide.com   
      
   I haven't finished the whole thread but it seems you are violating all   
   sorts of best practices. Ones I've noticed so far:   
      
   Seems you have no record object containing your fields (MRO or TF) but a   
   box instead. BAD IDEA.   
      
   You are using long names   
      
   You are using characters that should not be used in names (only use a to   
   z, A to Z and 0-9, no spaces, dashes, underlines or odd characters)   
      
   You are using cFunctions on a network.   
      
   I strongly suggest you check out my Database Basics paper (link in my   
   signature) for common pitfalls and best practices. It can save you a lot   
   of grief.   
      
   Kenneth wrote:   
   > On Fri, 15 Feb 2008 10:46:42 -0700, "Tony McGuire"   
   >  wrote:   
   >   
   >>> For the first five entries, all was well, but then, she got   
   >>> the GPF as before.   
   >> At this point, you need to show the code used on the form.   
   >> (action/arrive/depart/open/etc)   
   >>   
   >> Is the form opened/closed for each 'entry'?   
   >   
   > Hi Tony (and all),   
   >   
   > I rebuilt the form from scratch (new form, re-drew all   
   > objects, cut & pasted code from old form to new) and put the   
   > new form on our server.   
   >   
   > Just as before, when opened from all but one machine, it   
   > works fine, but when the brand new form is opened on one   
   > machine, it causes GPFs as did the old form.   
   >   
   > The new form has one page. On that page is a box that   
   > contains all the form's fields (about a dozen of 'em).   
   >   
   > Here is all the code:   
   >   
   > On the form:   
   >   
   > method close(var eventInfo Event)   
   > if eventInfo.isPreFilter() then   
   >       ;// This code executes for each object on the form   
   >    else   
   >       ;// This code executes only for the form   
   > endEdit()   
   >    endIf   
   > endMethod   
   >   
   >   
   >   
   > On the Page:   
   >   
   > method action(var eventInfo ActionEvent)   
   > var   
   >    TC TCursor   
   > endVar   
   > if eventInfo.id()=dataInsertRecord then   
   >    edit()   
   >    doDefault   
   >    tc.open(":DATA:$KSA08.DB")   
   >    Entry=tc.cmax("Entry")+1   
   > endif   
   > if eventInfo.id()=dataEndEdit then   
   > self.end()   
   > endIf   
   > endMethod   
   >   
   >   
   >   
   > On the box:   
   >   
   > method open(var eventInfo Event)   
   > self.end()   
   > endMethod   
   >   
   >   
   >   
   > On a field called Balance:   
   >   
   > sum([:MONEY:INVOICES.DUE])  + Sum([:WORK:$KSA08.Amount])   
   >   
   >   
   >   
   > On a field called Category:   
   >   
   > method newValue(var eventInfo Event)   
   > if self.value=33 then   
   >       Dep_On.moveTo()   
   > endIf   
   > EndMethod   
   >   
   >   
   >   
   > On a field called Check:   
   >   
   > method keyPhysical(var eventInfo KeyEvent)   
   >    var tc tcursor endvar   
   >    if EventInfo.isControlKeyDown() and eventInfo.vChar()="N"   
   > then   
   >    edit()   
   >    delayScreenUpdates(yes)   
   >    active.action(EditEnterFieldView)   
   >    if(self.isblank()) then   
   >    edit()   
   >    doDefault   
   >    tc.open(":DATA:$KSA08.DB")   
   >    check=tc.cmax("check")+1   
   >    else   
   >    Amount.moveto()   
   >    endif   
   >    endIf   
   > endMethod   
   >   
   >   
   >   
   > On a field called Amount:   
   >   
   > method changeValue(var eventInfo ValueEvent)   
   > var   
   >   userChoice String   
   > endVar   
   > doDefault   
   > if amount1.value < 7000 then   
   >    msgInfo("OOOOPS!","Balance Kinda Low...")   
   > endIf   
   > if self.value>0 then   
   >    userChoice = msgQuestion("Question...?", "Is this a   
   > CREDIT?")   
   > switch   
   >    case userChoice = "Yes" :   
   >      Category.moveTo()   
   >    case userChoice = "No"  :   
   >      msgInfo("OOOOPS!","Please add that MINUS SIGN!")   
   >      amount.moveTo()   
   > endSwitch   
   >    EndIf   
   > endMethod   
   >   
   >   
   >   
   > On a field called Entry:   
   >   
   > method open(var eventInfo Event)   
   > self.end()   
   > endMethod   
   >   
   > method changeValue(var eventInfo ValueEvent)   
   > doDefault   
   > action(dataPostRecord)   
   > endMethod   
   >   
   > method newValue(var eventInfo Event)   
   > amount.moveTo()   
   > endMethod   
   >   
   >   
   >   
   > Of course, I would be most appreciative of any help you   
   > could provide.   
   >   
   > All the best, and sincere thanks,   
      
   --- SoupGate-Win32 v1.05   
    * Origin: you cannot sedate... all the things you hate (1:229/2)