>I wish to index a table-buffered cursor as follows...
>

>SELECT MyCursor
>lnOrigBuffering = CURSORGETPROP('Buffering')
>
>IF GETNEXTMODIFIED(0)=0            && check no uncommitted changes
>   =CURSORSETPROP('Buffering',3)   && cursor must be row-buffered for indexing
>	
>   INDEX ON myField TAG myTag
>ENDIF
>
>=CURSORSETPROP('Buffering', lnOrigBuffering)   && restore original buffering

>
>
>Upon issuing CURSORGETPROP() I get the error message "Table buffer for alias MyCursor has uncommitted changes", but I thought I had already tested for no uncommitted changes using GETNEXTMODIFIED first.
>
>Can anyone tell me where I may have gone wrong?
>
>TIA,
>Alan
>
>
>PS. sorry about the double 'buffered' in the title - too trigger-happy with the keyboard and cannot edit the title once posted!

Do you use SETFLDSTAT() ?

SELECT MyCursor

IF GETNEXTMODIFIED(0)=0 AND TABLEREVERT(.T.)   && check no uncommitted changes
   lnOrigBuffering = CURSORGETPROP('Buffering')

   =CURSORSETPROP('Buffering',3)   && cursor must be row-buffered for indexing

   INDEX ON myField TAG myTag
   =CURSORSETPROP('Buffering', lnOrigBuffering)   && restore original buffering
ENDIF