<html><body style="word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space; "><pre><i>
</i>><i> However I seem to be having problems with adding new records since I upgraded
</i>><i> from 3.4 to 4.3
</i>><i>
</i>><i> The following code executes with no error....and adds the new record using
</i>><i> 3.4..
</i>><i>
</i>><i> It executes without error on 4.3 but it does not actually add the record to
</i>><i> the database...I have checked it with Studio..
</i>><i>
</i>><i> DateString =
</i>><i> Format(pd.year,"00")+Format(pd.month,"00")+Format(pd.day,"00")+"."+FORMAT(pd.h
</i>><i> our,"00")+FORMAT(pd.minute,"00")+FORMAT(pd.second,"00")
</i>><i> mDb.mEq.SetBlank
</i>><i> mDb.mEq.dbDescript.SetString(trim(Uppercase(mainwindow.ed(0).text))+" -
</i>><i> "+trim(mainwindow.ed(1).text))
</i>><i> mDb.mEq.dbHigh.SetString(CheckEquity(0))
</i>><i> mDb.mEq.dbLow.SetString(CheckEquity(1))
</i>><i> mDb.mEq.dbDivd.SetString(trim(mainwindow.ed(2).text))
</i>><i> if Mainwindow.targCB.Value and val(trim(mainwindow.ed(4).text)) <> 0 and
</i>><i> trim(mainwindow.ed(4).text) <> "" then
</i>><i> mDb.mEq.dbTarg.SetString(trim(mainwindow.ed(4).text)+"y")
</i>><i> else
</i>><i> mDb.mEq.dbTarg.SetString(trim(mainwindow.ed(4).text))
</i>><i> end if
</i>><i> mDb.mEq.dbBuy.SetString(trim(mainwindow.ed(3).text))
</i>><i> saveIndustry
</i>><i>
</i>><i> mDb.mEq.dbPerf.SetString(CheckEquity(3)+mainwindow.editCB(1).text+str(mainwind
</i>><i> ow.editCB(0).ListIndex))
</i>><i> mDb.mEq.dbequityID.value = DateString
</i>><i> call mDb.mEq.Addrecord()
</i>><i> mDb.mEq.Flush()
</i>><i>
</i>><i> I have tried flushing the whole database..ie: mDb.flush(),,,to no avail...
</i>><i>
</i>><i> What am I doing incorrectly?
</i>
>>Quick guess.
>>You was on 3.4? Quite old.
>>May be you have now problem with date/time strings conversion.</pre><pre>Not using a date field in my database..only stringfields and varchars fields.....</pre><pre>so....the datestring 20091021.100000 should just be stored as a string....</pre><pre>
>>At some point in the past we have made VERY strict this.
>>Even extra space will cause error.
>>So check what exactly string you get by above code.</pre><pre>>>Check may be exception is thrown but you do not see this,</pre><pre>Placed an Exception in the method adding records...it does not get used...</pre><pre>>>Check V4RB log file also</pre><pre>No log files created by this action...</pre><pre>Other happenings..</pre><pre>If I delete the database and run the application....it errs by not recognizing the preference table that I use when app.open code is executed...</pre><pre>rsOpen = Nil</pre><pre>rsOpen = mDb.SQLSelect("select * from Choices","EVCursorLocation.kClentside)</pre><pre>vException is...on the SQLSelect</pre><pre>it should have created an empty database...but throws the log error</pre><pre>Table ( or view) is not found: sys_Diagrams</pre><pre>Get View: No view with the name Equity.</pre><pre><span class="Apple-style-span" style="font-family: Helvetica; white-space: normal; "><pre>The tables should have been made...the .vdb file exists but nothing in it.</pre></span></pre><pre>Thanks</pre><pre><span class="Apple-style-span" style="font-family: Helvetica; white-space: normal; font-size: 13px; ">Harry & Chuck</span></pre><div apple-content-edited="true"><span class="Apple-style-span" style="font-size: 13px; "><div style="word-wrap: break-word; -webkit-nbsp-mode: space; -webkit-line-break: after-white-space; "><div><br></div></div></span><br class="Apple-interchange-newline"> </div><br></body></html>