Validación
Tengo el siguiente código en un textbox
select alumno
set order to MAT
seek m.mat_s
if found()
wait window "ya existe" timeout 2.0
m.mat_s=0
Endif
Thisform.refresh
thisform.txtMat.setfocus
Thisform.refresh
y este otro en un boton que se llama agregar
select alumno
append blank
replace mat with m.mat_s
replace nom with m.nom
m.mat_s = 0
m.nom = " "
Thisform.refresh
thisform.txtMat.setfocus
Y me marca un error que dice no coinciden los datos en el primer replace
porque que es lo que debo de hacer para que funcione bien la validación te agradecería que me ayudaras gracias.
select alumno
set order to MAT
seek m.mat_s
if found()
wait window "ya existe" timeout 2.0
m.mat_s=0
Endif
Thisform.refresh
thisform.txtMat.setfocus
Thisform.refresh
y este otro en un boton que se llama agregar
select alumno
append blank
replace mat with m.mat_s
replace nom with m.nom
m.mat_s = 0
m.nom = " "
Thisform.refresh
thisform.txtMat.setfocus
Y me marca un error que dice no coinciden los datos en el primer replace
porque que es lo que debo de hacer para que funcione bien la validación te agradecería que me ayudaras gracias.
Respuesta de Jorge Luis Vejerano Ortiz
1
¿Sabes a que se refiere con eso no es así?
Cuando reemplazas un campo de una tabla con un valor cualquiera, éste debe ser del mismo tipo de deto que el del campo de la tabla.
Así que te pregunto:
1. Que tipo de dato tiene el campo mat, de tu tabla alumno.
2. Que tipo de dato tiene el valor m.mat_s.
--Devilzito--
Cuando reemplazas un campo de una tabla con un valor cualquiera, éste debe ser del mismo tipo de deto que el del campo de la tabla.
Así que te pregunto:
1. Que tipo de dato tiene el campo mat, de tu tabla alumno.
2. Que tipo de dato tiene el valor m.mat_s.
--Devilzito--
