Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Error 114 - Index Does not match
Message
 
 
To
28/01/2016 04:59:45
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Environment versions
Visual FoxPro:
VFP 8 SP1
OS:
Windows 7
Network:
Windows NT
Database:
Visual FoxPro
Application:
Desktop
Miscellaneous
Thread ID:
01630344
Message ID:
01630348
Views:
56
>>The problem is 3-4 times out of 10, when they increase or decrease the due date spinners, they get the error:
>>"Error # 114: Index does not match"
>
>Do you have code in the 'due date spinners' event methods such as .InteractiveChange() and/or .Valid()?

Thank you for your response;
Yes I do.
* Init() has:
this.dField = 'vProd.Due_Date1'
this.InitDate = DATE()
DateSpinner::Init()
this.Parent.lblDow1.Refresh()

* Gotfocus() has:
this.BackColor = p_bcs
DODEFAULT()
thisForm.lblHome.Visible = .T.
thisForm.lblHome.Refresh()

* InterActiveChange() has:
DateSpinner::InterActiveChange()
this.Parent.lblDow1.Refresh()

* LostFocus() has:
this.BackColor = p_bc
DateSpinner::LostFocus()
IF this.Parent.SpDue2.dDate < this.dDate
   this.Parent.SpDue2.dDate = this.dDate
   this.Parent.SpDue2.Refresh()
ENDIF   
DODEFAULT()
thisForm.lblHome.Visible = .F.
thisForm.lblHome.Refresh()

Valid() has:
IF DateSpinner::Valid()
   this.Parent.lblDow1.Refresh()
   IF vProd.Due_Date1 # this.dDate
      SELECT vProd
      REPLACE vProd.Due_Date1 WITH this.dDate
   ENDIF   
   RETURN .T.
ENDIF   

* Refresh() has:
this.Enabled = thisForm.lAllowEdits .OR. thisform.HotLink
DateSpinner::Refresh()
this.Parent.lblDow1.Refresh()
Thanks.
Cyrus Nima
-------------------
cyrusnima@gmail.com
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform