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

9/1/2024 - Se corrogio unerror en clientesNuevos al guardar el cuestionario

Browse Source
This commit is contained in:
Jose Alberto Guerra Ugalde
2024-01-09 10:44:16 -06:00
parent d1cea02c44
commit 0f60c66c97
2 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
B4A/C_NuevoCliente.bas
View File

@@ -100,6 +100,8 @@ Sub B4XPage_Appear
et_email.Text = ""
sTime=DateTime.Time(DateTime.Now)
no_cliente= "NC" & sTime & no_ruta
B4XPages.MainPage.skmt.ExecNonQuery("delete from CUENTAA")
B4XPages.MainPage.skmt.ExecNonQuery2("INSERT INTO CUENTAA VALUES (?)", Array As Object(no_cliente))
Log(no_cliente)
Log($"CargarCliente: ${cargarCliente}"$)
reqManager.Initialize(Me, Starter.server)
@@ -251,8 +253,6 @@ Sub b_guardar_Click
Else
B4XPages.MainPage.skmt.ExecNonQuery2("INSERT INTO kmt_info(CAT_CL_CODIGO, CAT_CL_RUTA, CAT_CL_NOMBRE, CAT_CL_CALLE1, CAT_CL_LAT, CAT_CL_LONG, CAT_CL_FECHA_CAPTURA, CAT_CL_DIAS_VISITA, LAT_CENSADOR, LON_CENSADOR, CAT_CL_ENVIO_PENDIENTE, CAT_CL_TELEFONO, CAT_CL_ATIENDE1, CAT_CL_EMAIL, CAT_CL_GIRO) VALUES (?, ?, ?, ?, ?, ?, ?, ?, ?, ?, 1, ?, ?, ?, ?) ", Array As Object (no_cliente, no_ruta, et_nombre.Text, et_direccion.Text, B4XPages.MainPage.lat_gps, B4XPages.MainPage.lon_gps, DateNC, Starter.dia_semana, B4XPages.MainPage.lat_gps, B4XPages.MainPage.lon_gps, et_atiende.Text, et_telefono.Text, et_email.Text, cb_giro.SelectedItem))
End If
B4XPages.MainPage.skmt.ExecNonQuery("delete from CUENTAA")
B4XPages.MainPage.skmt.ExecNonQuery2("INSERT INTO CUENTAA VALUES (?)", Array As Object(no_cliente))
ALMACEN = Subs.traeAlmacen
' If fototomada <> "" And fototomada <> Null Then

2
B4A/Mariana Censos.b4a.meta
View File

@@ -49,6 +49,6 @@ ModuleClosedNodes6=
ModuleClosedNodes7=
ModuleClosedNodes8=6,9,11,12,13,14,16,17
ModuleClosedNodes9=3,5
NavigationStack=C_Principal,Btn_Ubicar_Click,1061,0,C_Principal,GPS_LocationChanged,1050,0,B4XMainPage,Class_Globals,75,0,Main,Process_Globals,21,0,C_Principal,B4XPage_Appear,380,0,Visual Designer,clienteDatos.bal,-100,6,Visual Designer,principal.bal,-100,1,C_Principal,JobDone,633,0,C_Principal,cargar_Click,511,0,Main,Globals,26,0
NavigationStack=Visual Designer,clienteDatos.bal,-100,6,Visual Designer,principal.bal,-100,1,C_Principal,JobDone,633,0,C_Principal,cargar_Click,511,0,Main,Globals,24,0,B4XMainPage,Class_Globals,74,0,B4XMainPage,Initialize,79,0,B4XMainPage,B4XPage_Created,81,0,Subs,traeCliente,681,0,C_NuevoCliente,b_guardar_Click,247,0,C_NuevoCliente,B4XPage_Appear,97,0
SelectedBuild=0
VisibleModules=2,14,6,9,4,8,5,15,7,16