The following sample prints 102 (in Clipper also):
FUNCTION MAIN()
SET DELETED ON
DBCREATE( "BUGTEST", { { "CODICE", "N", 3, 0 } } )
USE BUGTEST
APPEND BLANK
REPLACE FIELD -> codice WITH 101
DELETE
APPEND BLANK
REPLACE FIELD -> codice WITH 101
APPEND BLANK
REPLACE FIELD -> codice WITH 102
INDEX ON FIELD -> codice TO BUGTEST UNIQUE
GO TOP
WHILE !EOF()
? FIELD -> codice
SKIP
ENDDO
CLOSE
INKEY( 0 )
RETURN NIL
I wonder if it should print 101 and 102.
EMG
--
EMAG Software Homepage: http://www.emagsoftware.it
The EMG's ZX-Spectrum Page: http://www.emagsoftware.it/spectrum
The Best of Spectrum Games: http://www.emagsoftware.it/tbosg
The EMG Music page: http://www.emagsoftware.it/emgmusic
------------------------------------------------------------------------------
Come build with us! The BlackBerry® Developer Conference in SF, CA
is the only developer event you need to attend this year. Jumpstart your
developing skills, take BlackBerry mobile applications to market and stay
ahead of the curve. Join us from November 9-12, 2009. Register now!
http://p.sf.net/sfu/devconf
_______________________________________________
xHarbour-developers mailing list
xHarbour-developers@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/xharbour-developers
