El registro esta fuera del intervalo
Publicado por Luis (11 intervenciones) el 17/10/2013 21:16:22
Hola amigos, tengo un formulario de Empleados, donde los agrego, modifico y elimino.
Y en el TextBox que uso para agregar la cédula del empleado tengo en el Valied,este código para que me diga si ya la cedula existe antes de agregarla:
Y me funciona bien, pero el problema se presenta luego de que elimino algún empleado y intento agregar otro nuevamente, me dice "El registro esta fuera del intervalo". Se que se puede solucionar usando como exclusiva la tabla empleados, pero si hago eso el GRID que uso para ver los empleados se quedara blanco. Alguna idea de como arreglarlo?
Y en el TextBox que uso para agregar la cédula del empleado tengo en el Valied,este código para que me diga si ya la cedula existe antes de agregarla:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
IF !EMPTY(THIS.VALUE)
SELECT EMPLEADOS
nREgis=REcno()
LOCATE FOR CEDULA = this.value
lcNombre=Alltrim(empleados.nombre)
lcApellido=Alltrim(empleados.Apellido)
lExiste=Found()
go top
if !eof()
go nREgis
ENDIF
if lExiste
Messagebox("La Cédula "+LTRIM(STR(this.value))+" ya está registrada por " +lcNombre +" "+ lcApellido,0,"Aviso")
this.value=0
return 0
ENDIF
ENDIF
Valora esta pregunta
0
