Replace
Hola experto tengo 3 campos en el primero guardo especialidad y el el otro su apellidos y código de los apellidos pero cuando no tengo su especialidad se guarda con N/E por ejemplo
vfp Perez 01
basic Fafan 02
pw Fano 03
N/E Villalta 04
NE Prado 05
N/E Villalta 04
Como puedo hacer para reemplazar los código N/E con su respectivos código este es mi código.
selec tabla1
set order to codigo
thisform.refresh
seek codigo
if found()then
replace all especialidades with alltrim(thisform.combo2.value)
thisform.grid1.refresh
thisform.refresh
else
if messagebox("No se encontro el registro",36,"Mensaje del Sistema")=6
thisform.combo2.value=""
thisform.text5.value=""
thisform.grid1.column3.text1.setfocus
thisform.grid1.refresh
Endif
Endif
vfp Perez 01
basic Fafan 02
pw Fano 03
N/E Villalta 04
NE Prado 05
N/E Villalta 04
Como puedo hacer para reemplazar los código N/E con su respectivos código este es mi código.
selec tabla1
set order to codigo
thisform.refresh
seek codigo
if found()then
replace all especialidades with alltrim(thisform.combo2.value)
thisform.grid1.refresh
thisform.refresh
else
if messagebox("No se encontro el registro",36,"Mensaje del Sistema")=6
thisform.combo2.value=""
thisform.text5.value=""
thisform.grid1.column3.text1.setfocus
thisform.grid1.refresh
Endif
Endif
1 respuesta
Respuesta de davsoft
1