What is the constraint on the fields? I ask this because the error might not be related to field constraints. Check in what line the code is raising the error.

Another thing I notice is that you should have a static or keyset cursor for batch updates, as explained in the help for the UpdateBatch method. The way you have your code you are opening a forward only cursor.

I tested some of your code and after adding the appropriate cursor type setting before opening the RS the status field does return the corresponding constant.

>>>In further inspection, the Status property does get populated in this circumstance. This property should return 11 (adFieldSchemaViolation) for the offending field object.
>>>
>>>Can you post more details as to how you are checking the status field?
>>
>>I mean status property.
>
>
>Hi Again,
>
>Here is some sample code. The problem lies in the HandleConstraint Function and is highlighted in red bold :
>
>Thanks for your help.
>
>Regards,
>
>Gerry
>
>

>#DEFINE adfilterconflictingrecords 5
>
>* Create the Connection
>ON ERROR erroradohandler(orecordset)
>
>oconnection = CREATEOBJECT("ADODB.Connection")
>oconnection.errors.CLEAR
>orecordset = CREATEOBJECT("ADODB.Recordset")
>oconnection.OPEN("Provider=SQLOLEDB;Server=GerryDeskTop;Database=FocusTest;User Id=SA;Password=;")
>
>*Example 1 - Create Database Constraint Error
>WITH orecordset
>   .activeconnection = oconnection
>   && Optimisitic Locking
>   .locktype = 4 							
>   .OPEN("customer")
>   .addnew
>   && Record Not Allowed. Error should be raised here
>   .FIELDS(0).VALUE=1111
>   .FIELDS(1).VALUE=" "
>   && Effect All      				
>   .updatebatch(3)							
>ENDWITH
>
>FUNCTION erroradohandler(lorecordset)
>   LOCAL lnerrornumber
>   * Have We Got Errors in the Errors Collection of The Connection Object
>   WITH lorecordset.activeconnection.errors
>      IF .COUNT > 0
>         FOR lcnt = 1 TO .COUNT
>            lnerrornumber = .ITEM(lcnt).NUMBER
>            DO CASE
>               &&& Constraint Error. This Line executes OK
>               CASE  lnerrornumber = -2147217873				
>                  IF handleconstraint(lorecordset)
>                     RETURN .T.
>                  ELSE
>                     RETURN .F.
>                  ENDIF
>               OTHERWISE
>                  WAIT WINDOW "Unknown Error"
>            ENDCASE
>         ENDFOR
>      ENDIF
>   ENDWITH
>ENDFUNC
>
>
>FUNCTION handleconstraint(lorecordset)
>   LOCAL lnrecordcount lcoldfilter lorecord
>&& We Should have Records in the ADO Record Sets Filter
>
>   WITH lorecordset
>       &&& Hold old Filter
>      lcoldfilter = .FILTER
>	  &&& Set Filter
>      .FILTER = adfilterconflictingrecords						
>      lnrecordcount = .recordcount
>      &&& If we Have Records in Filter .......
>      IF lnrecordcount > 0										
>       &&& Ensure we at 1st Record
>         IF !.BOF								    .movefirst
>         ENDIF
>         &&& Scan Records in Filter
>         DO WHILE !.EOF	
>         &&& Examine status code in each field										
>            FOR lncnt = 1 TO .FIELDS.COUNT	
>
>                &&& HERE IS THE PROBLEM.  STATUS PROPERTY IS ALWAYS ZERO
>
>
>	               lnstatuscode = .FIELDS(lncnt-1).STATUS  
>            ENDFOR
>            .movenext
>         ENDDO
>      ENDIF
>   ENDWITH
>ENDFUNC
>
>