fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Improved ADO_PUTVALUE()

Browse Source
This commit is contained in:
Antonio Linares
2007-05-13 07:19:34 +00:00
parent cbbcb1217f
commit 3d10e2acfc
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
harbour/contrib/adordd/adordd.prg
View File

@@ -453,7 +453,7 @@ static function ADO_PUTVALUE( nWA, nField, xValue )
local aWAData := USRRDD_AREADATA( nWA )
local oRecordSet := aWAData[ WA_RECORDSET ]
if ! aWAData[ WA_EOF ]
if ! aWAData[ WA_EOF ] .and. oRecordSet:Fields( nField - 1 ):Value != xValue
oRecordSet:Fields( nField - 1 ):Value := xValue
TRY
oRecordSet:Update()