Kbase P115594: ADO RecordSet DECIMAL fields are not correctly assigned.
| Autor |
Progress Software Corporation - Progress |
| Acesso |
Público |
| Publicação |
19/05/2006 |
|
Status: Unverified
SYMPTOM(s):
ADO RecordSet DECIMAL fields are not correctly assigned.
Assigned ADO DECIMAL fields are multiplied by 100 and lose their decimal part.
Executing the following Visual Basic Code results in the balance field being assigned the wrong value of: 1234567 instead of the correct value of: 12345.68:
...
Dim rsSnLoc As New ADODB.Recordset
Dim sql As String, sql2 As String
sql = "SELECT * FROM pub.customer WHERE custnum = 1"
rsSnLoc.CursorType = adOpenStatic
rsSnLoc.LockType = adLockOptimistic
rsSnLoc.Open sql, conn_parts, , , adCmdText
rsSnLoc!balance = 12345.6789
rsSnLoc.Update
rsSnLoc.Close
Set rsSnLoc = Nothing
...
CAUSE:
BUG# 20060426-016
FIX:
Upgrade to OpenEdge 10.1A01 or later