I get this error when closing my DB:
Script:OnSave line:50
topparent.Commit()
Argument is incorrect data type
This is what I have as "OnSave"
Any idea? I don't see the error.. these fields are numeric.:(
Script:OnSave line:50
topparent.Commit()
Argument is incorrect data type
This is what I have as "OnSave"
Code:
'Date Created: 15-Aug-2005 03:26:18 PM 'Last Updated: 16-Aug-2005 09:08:34 AM 'Created By : choens 'Updated By : Kevin 'Date Created: 15-Aug-2005 08:44:21 AM 'Last Updated: 15-Aug-2005 03:22:42 PM 'Created By : Kevin 'Updated By : choens t=table.get("trips") dim temptax as n topparent.Commit() If t.mstatus = "Married" select case t.trip_pay<=100 temptax=.162 case t.trip_pay>100 .and. t.trip_pay<=205 temptax=.181 case t.trip_pay>205 .and. t.trip_pay<=495 temptax=.201 case t.trip_pay>495 .and. t.trip_pay<=600 temptax=.215 case t.trip_pay>600 .and. t.trip_pay<=795 temptax=.219 case t.trip_pay>795 .and. t.trip_pay<=900 temptax=.223 case t.trip_pay>900 temptax=.225 end select else select case t.trip_pay<=100 temptax=.192 case t.trip_pay>100 .and. t.trip_pay<=205 temptax=.199 case t.trip_pay>205 .and. t.trip_pay<=495 temptax=.207 case t.trip_pay>495 .and. t.trip_pay<=600 temptax=.220 case t.trip_pay>600 .and. t.trip_pay<=795 temptax=.225 case t.trip_pay>795 .and. t.trip_pay<=900 temptax=.239 case t.trip_pay>900 temptax=.250 end select End if t.change_begin() t.trip_tax=temptax t.change_end() topparent.Commit() topparent.Resynch() topparent.Refresh_Layout()
Comment