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

Correcciones del atiende 4_02_15

Browse Source
This commit is contained in:
cvaldes1201
2024-02-15 18:05:35 -06:00
parent c600d9e044
commit 30f9ebcf64
3 changed files with 4 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
B4A/C_Principal.bas
View File

@@ -695,6 +695,7 @@ Sub JobDone(Job As HttpJob)
Dim CAT_CL_FOTO As String = records(RESULT.Columns.Get("HCC_FOTO")) Dim CAT_CL_FOTO As String = records(RESULT.Columns.Get("HCC_FOTO"))
Dim CAT_CL_TELEFONO As String = records(RESULT.Columns.Get("HCC_TELEFONO")) Dim CAT_CL_TELEFONO As String = records(RESULT.Columns.Get("HCC_TELEFONO"))
Dim CAT_CL_EMAIL As String = records(RESULT.Columns.Get("HCC_EMAIL")) Dim CAT_CL_EMAIL As String = records(RESULT.Columns.Get("HCC_EMAIL"))
Dim CAT_CL_ATIENDE1 As String = records(RESULT.Columns.Get("HCC_ATIENDE"))
Dim CAT_CL_DIASEMANA As String = records(RESULT.Columns.Get("DIASEMANA")).As(String).ToUpperCase Dim CAT_CL_DIASEMANA As String = records(RESULT.Columns.Get("DIASEMANA")).As(String).ToUpperCase
B4XPages.MainPage.skmt.ExecNonQuery2("INSERT INTO kmt_info(CAT_CL_CODIGO,CAT_CL_RUTA,CAT_CL_NOMBRE,CAT_CL_ATIENDE1,CAT_CL_ATIENTE2,CAT_CL_TELEFONO,CAT_CL_EMAIL,CAT_CL_CALLE,CAT_CL_NOEXT,CAT_CL_NOINT,CAT_CL_CALLE1,CAT_CL_CALLE2,CAT_CL_COLONIA,CAT_CL_MUNI,CAT_CL_EDO,CAT_CL_CP,CAT_CL_LONG,CAT_CL_LAT,CAT_CL_MTOCOMPRA,CAT_CL_NUM_SERIEFISICO, gestion, CAT_CL_DIASEMANA, CAT_CL_SECUENCIA, CAT_CL_ESTATUS, CAT_CL_ENVIO_PENDIENTE, CAT_CL_GIRO, NUEVO, CAT_CL_FECHA_CAPTURA) VALUES (?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,0,?,?,?,0,?,0,?)", Array As Object (CAT_CL_CODIGO,CAT_CL_RUTA,CAT_CL_NOMBRE,CAT_CL_ATIENDE1,CAT_CL_ATIENTE2,CAT_CL_TELEFONO,CAT_CL_EMAIL,CAT_CL_CALLE,CAT_CL_NOEXT,CAT_CL_NOINT,CAT_CL_CALLE1,CAT_CL_CALLE2,CAT_CL_COLONIA,CAT_CL_MUNI,CAT_CL_EDO,CAT_CL_CP,CAT_CL_LONG,CAT_CL_LAT,CAT_CL_MTOCOMPRA,CAT_CL_NUM_SERIEFISICO, CAT_CL_DIASEMANA, CAT_CL_SECUENCIA, CAT_CL_ESTATUS, CAT_CL_GIRO, CAT_CL_FECHA_CAPTURA)) B4XPages.MainPage.skmt.ExecNonQuery2("INSERT INTO kmt_info(CAT_CL_CODIGO,CAT_CL_RUTA,CAT_CL_NOMBRE,CAT_CL_ATIENDE1,CAT_CL_ATIENTE2,CAT_CL_TELEFONO,CAT_CL_EMAIL,CAT_CL_CALLE,CAT_CL_NOEXT,CAT_CL_NOINT,CAT_CL_CALLE1,CAT_CL_CALLE2,CAT_CL_COLONIA,CAT_CL_MUNI,CAT_CL_EDO,CAT_CL_CP,CAT_CL_LONG,CAT_CL_LAT,CAT_CL_MTOCOMPRA,CAT_CL_NUM_SERIEFISICO, gestion, CAT_CL_DIASEMANA, CAT_CL_SECUENCIA, CAT_CL_ESTATUS, CAT_CL_ENVIO_PENDIENTE, CAT_CL_GIRO, NUEVO, CAT_CL_FECHA_CAPTURA) VALUES (?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,?,0,?,?,?,0,?,0,?)", Array As Object (CAT_CL_CODIGO,CAT_CL_RUTA,CAT_CL_NOMBRE,CAT_CL_ATIENDE1,CAT_CL_ATIENTE2,CAT_CL_TELEFONO,CAT_CL_EMAIL,CAT_CL_CALLE,CAT_CL_NOEXT,CAT_CL_NOINT,CAT_CL_CALLE1,CAT_CL_CALLE2,CAT_CL_COLONIA,CAT_CL_MUNI,CAT_CL_EDO,CAT_CL_CP,CAT_CL_LONG,CAT_CL_LAT,CAT_CL_MTOCOMPRA,CAT_CL_NUM_SERIEFISICO, CAT_CL_DIASEMANA, CAT_CL_SECUENCIA, CAT_CL_ESTATUS, CAT_CL_GIRO, CAT_CL_FECHA_CAPTURA))
LogColor($"${CAT_CL_CODIGO}, ${RESULT.Columns.Get("CAT_CL_CUESTIONARIO")}"$, Colors.blue) LogColor($"${CAT_CL_CODIGO}, ${RESULT.Columns.Get("CAT_CL_CUESTIONARIO")}"$, Colors.blue)

4
B4A/Mariana Censos.b4a
View File

@@ -748,12 +748,12 @@ Module9=C_Principal
NumberOfFiles=349 NumberOfFiles=349
NumberOfLibraries=30 NumberOfLibraries=30
NumberOfModules=16 NumberOfModules=16
Version=12.8 Version=12.5
@EndOfDesignText@ @EndOfDesignText@
#Region Project Attributes #Region Project Attributes
#ApplicationLabel: Mariana Censos #ApplicationLabel: Mariana Censos
#VersionCode: 1 #VersionCode: 1
#VersionName: 4.02.14.1 #VersionName: 4.02.15
'SupportedOrientations possible values: unspecified, landscape or portrait. 'SupportedOrientations possible values: unspecified, landscape or portrait.
#SupportedOrientations: portrait #SupportedOrientations: portrait
#CanInstallToExternalStorage: False #CanInstallToExternalStorage: False

2
B4A/Mariana Censos.b4a.meta
View File

@@ -49,6 +49,6 @@ ModuleClosedNodes6=
ModuleClosedNodes7= ModuleClosedNodes7=
ModuleClosedNodes8=9,13,14,17,18 ModuleClosedNodes8=9,13,14,17,18
ModuleClosedNodes9=1 ModuleClosedNodes9=1
NavigationStack=C_NuevoCliente,Class_Globals,30,0,C_NuevoCliente,B4XPage_Appear,132,0,Visual Designer,nuevoClienteDatos.bal,-100,6,C_Clientes,Mods,0,0,C_Clientes,BUSCA_TextChanged,202,0,C_Clientes,sc_result,239,0,C_Clientes,calc_ean_checksum,254,0,C_Cliente,B4XPage_Appear,305,0,Main,Process_Globals,18,0,C_NuevoCliente,cb_giro_SelectedIndexChanged,512,0,C_Cliente,b_guardaCambios_Click,388,0 NavigationStack=C_NuevoCliente,cb_giro_SelectedIndexChanged,512,0,Diseñador Visual,nuevoClienteDatos.bal,-100,1,C_Cliente,b_guardaCambios_Click,388,0,C_Cliente,B4XPage_Appear,251,0,C_NuevoCliente,B4XPage_Appear,138,0,C_Principal,Class_Globals,0,0,C_Principal,CARGA_Click,1078,0,C_Principal,JobDone,706,4,C_Principal,connecta_Click,893,0,C_Principal,cargar_Click,462,0
SelectedBuild=0 SelectedBuild=0
VisibleModules=2,14,6,9,4,8,5,15,7,16 VisibleModules=2,14,6,9,4,8,5,15,7,16