... !eof() modifico el reg else agrego el registro endif de esa menera funciona, pero a veces el seek falla, entra por el else, a pesar de existir la combinacion coddep+artcodig+lote, y me da de alta algo que ya existe. si en lugar del seek uso locate (abro la base sin indexar incluso), no falla nunca. ...