Can somebody please explain to me why the following procedure returns this :

when it should be

because I've changed the field to "a"

Is there something wrong with the commit command??? Please noe that I am running an older version of Alaska

Thanks

procedure p_test

close all
use policy index i_poly via foxcdx new
select policy

clear

seek 450001

qsaveiss("a")

? issued

thisref = ref
seek thisref

? issued

for qwait = 1 to 500000

? issued

qsaveiss("x") ///This is only here to reset the field for this test

return

FUNCTION qsaveiss(thisvar)
    do while .t.
        rlock()
        if rlock()
            replace issued with thisvar
            unlock
            commit
            exit
        endif
    enddo
    return .t.