cheveguerra/Mariana_Censos
1
0
Fork 0
mirror of https://github.com/KeymonSoft/Mariana_Censos.git synced 2026-04-21 06:39:14 +00:00
Code Issues Packages Projects Releases Wiki Activity

Correcion de et_atiendce = cat_cl_atiende

Browse Source
This commit is contained in:
Jose Alberto Guerra Ugalde
2024-02-15 09:18:55 -06:00
parent 835bdf8346
commit c600d9e044
4 changed files with 9 additions and 9 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
B4A/C_NuevoCliente.bas
View File

@@ -136,7 +136,7 @@ Sub B4XPage_Appear
elOtroCliente = cc.GetString("CAT_CL_CODIGO")
et_nombre.Text = cc.GetString("CAT_CL_NOMBRE")
et_direccion.Text = cc.GetString("CAT_CL_CALLE1")
et_atiende.Text = cc.GetString("CAT_CL_NOMBRE")
et_atiende.Text = cc.GetString("CAT_CL_ATIENDE1")
et_telefono.Text = cc.GetString("CAT_CL_TELEFONO")
et_email.Text = cc.GetString("CAT_CL_EMAIL")
Log($"${losGiros.IndexOf(cc.GetString("CAT_CL_GIRO"))}, ${losGiros}, ${cc.GetString("CAT_CL_GIRO")}"$)
@@ -494,13 +494,13 @@ Sub mandaPendientesNuevosClientes
' Log($"${Dirp&Dir&Dir2},${c.GetString("NOM_FOTO")}"$)
fotox = Null
' Log($"${Dirp}${Dir}${Dir2},${c.GetString("NOM_FOTO")}"$)
If c.GetString("NOM_FOTO")<> Null And c.GetString("NOM_FOTO")<> "null" And File.Exists(Dirp&Dir&Dir2,c.GetString("NOM_FOTO")) Then fotox = Bit.InputStreamToBytes(File.OpenInput(Dirp&Dir&Dir2,c.GetString("NOM_FOTO")))
If c.GetString("NOM_FOTO") <> Null And c.GetString("NOM_FOTO") <> "null" And File.Exists(Dirp&Dir&Dir2,c.GetString("NOM_FOTO")) Then fotox = Bit.InputStreamToBytes(File.OpenInput(Dirp&Dir&Dir2,c.GetString("NOM_FOTO")))
Dim cmd As DBCommand
cmd.Initialize
cmd.Name = "guardaClienteNuevo2_MARDS"
' Log(">>>>>>> TMP_CLIENTES_CENSOS")
' TMP_ALMACENID, TMP_RUTA, TMP_USUARIO, TMP_ID_CLIENTE, TMP_NOMBRE, TMP_DOMICILIO, TMP_FECHA_CAPTURA_MOVIL, TMP_FECHA_SINCRONIZACION, TMP_LATITUD, TMP_LONGITUD
cmd.Parameters = Array As Object(Subs.traeAlmacen, c.GetString("CAT_CL_RUTA"), Subs.traeUsuarioDeBD, c.GetString("CAT_CL_CODIGO"), c.GetString("CAT_CL_NOMBRE"), c.GetString("CAT_CL_CALLE1"), c.GetString("CAT_CL_FECHA_CAPTURA"), sDateP, c.GetString("CAT_CL_LAT"), c.GetString("CAT_CL_LONG"), fotox, elGiro, Starter.dia_semana, c.GetString("CAT_CL_TELEFONO"), c.GetString("CAT_CL_EMAIL"), cuestionarioTexto, c.GetString("CAT_CL_ATIENDE1"))
cmd.Parameters = Array As Object(Subs.traeAlmacen, c.GetString("CAT_CL_RUTA"), Subs.traeUsuarioDeBD, c.GetString("CAT_CL_CODIGO"), c.GetString("CAT_CL_NOMBRE"), c.GetString("CAT_CL_CALLE1"), c.GetString("CAT_CL_FECHA_CAPTURA"), sDateP, c.GetString("CAT_CL_LAT"), c.GetString("CAT_CL_LONG"), fotox, c.GetString("CAT_CL_GIRO"), Starter.dia_semana, c.GetString("CAT_CL_TELEFONO"), c.GetString("CAT_CL_EMAIL"), cuestionarioTexto, c.GetString("CAT_CL_ATIENDE1"))
Log($"${c.GetString("CAT_CL_CODIGO")}, ${Subs.traeAlmacen}, ${c.GetString("CAT_CL_LAT")}, ${c.GetString("CAT_CL_LONG")}, ${c.GetString("CAT_CL_SECUENCIA")}, ${c.GetString("CAT_CL_RUTA")}, ${c.GetString("CAT_CL_DIASEMANA")}, ${c.GetString("CAT_CL_GIRO")}, ${c.GetString("CAT_CL_NOMBRE")}, ${c.GetString("CAT_CL_ATIENDE1")}, ${c.GetString("CAT_CL_CALLE")}, ${c.GetString("CAT_CL_NOINT")}, ${c.GetString("CAT_CL_NOEXT")}, ${c.GetString("CAT_CL_CALLE1")}, ${c.GetString("CAT_CL_CRUCE1")}, ${c.GetString("CAT_CL_CALLE2")}, ${c.GetString("CAT_CL_CP")}, ${c.GetString("CAT_CL_COLONIA")}, ${c.GetString("CAT_CL_MUNI")}, ${c.GetString("CAT_CL_EDO")}, ${c.GetString("CAT_CL_ESTATUS")}, ${c.GetString("CAT_CL_FECHA_CAPTURA")}, ${sDate}, ${Subs.traeUsuarioDeBD}"$)
LogColor(c.GetString("CAT_CL_CODIGO"),Colors.DarkGray)
reqManager.ExecuteCommand(cmd , $"guardaClienteNuevo_${c.GetString("CAT_CL_CODIGO")}"$)