RE:logica boton modificar
OK, ESTA BIEN LA IDEA DE DALSOM,
YO LO HAGO ASI, CREO UNA BUSQUEDA CON UN TXTBOX YA SEA POR NOMBRE O IDENTIDAD, LUEGO MUESTRO TODOS LOS DATOS EN OTROS TXTBOX, ESTOS TXTBOX ESTAN DESHABILIDATOS Y AL HACER CLIC EN EL BOTON MODIFICAR ESTAN LISTOS PARA SER MODIFICADOS Y HABILITADOS,
CREO UN BOTON DE CONFIRMACION, SI EL USUARIO DESEA GUARDAR LOS DATOS MODIFICADOS O CANCELAR, SI LA CANCELO DESHABILITO TODO Y NO LE DOY EL REPLACE...
EN POCAS PALABRAS
SI QUIERES MODIFICAR Y GUARDAR HAZ EL REPLACE
SI LO CANCELAS NO HAGAS EL REPLACE, ASI NO TE GUARDARA..
POR EJEMPLO
****BOTON MODIFICAR
**habilita txt.
thisform.pagfClientes.page2.txtDomicilio.Enabled = .T.
thisform.pagfClientes.page2.cboDepartamento.Enabled = .T.
thisform.pagfClientes.page2.cboMunicipio.Enabled = .T.
thisform.pagfClientes.page2.txtTelefono_casa.Enabled = .T.
****************************************************************************************
****BOTON ACEPTAR
REPLACE clientes.Domicilio WITH cDomicilio
REPLACE clientes.Departamento WITH cDepartamento
REPLACE clientes.municipio WITH cMunicipio
REPLACE clientes.telefono_casa WITH cTelefono_casa
****deshabilita los txt.
thisform.pagfClientes.page2.txtDomicilio.Enabled = .F.
thisform.pagfClientes.page2.cboDepartamento.Enabled = .F.
thisform.pagfClientes.page2.cboMunicipio.Enabled = .F.
thisform.pagfClientes.page2.txtTelefono_casa.Enabled = .F.
***************************************************************************************
***BOTON CANCELAR***
****deshabilita los txt.
thisform.pagfClientes.page2.txtDomicilio.Enabled = .F.
thisform.pagfClientes.page2.cboDepartamento.Enabled = .F.
thisform.pagfClientes.page2.cboMunicipio.Enabled = .F.
thisform.pagfClientes.page2.txtTelefono_casa.Enabled = .F.
***regresa los valores como estaban en la tabla...
thisform.pagfClientes.page2.txtDomicilio.value= alltrim(clientes.domicilio)
thisform.pagfClientes.page2.cboDepartamento.value=alltrim(clientes.departamento)
thisform.pagfClientes.page2.cboMunicipio.value=alltrim(clientes.municipio)
thisform.pagfClientes.page2.txtTelefono_casa.value=alltr(clientes.telefono_casa)
ESPERO AYUDARTE...
HELDER MARTINEZ
DESDE HONDURAS C.A