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

- VERSION 5.09.13

Browse Source 
- Corrige que no cargaba el municipio en "Cliente", y entonces se quedaba eldato del anterior.
This commit is contained in:
Jose Alberto Guerra Ugalde
2025-09-15 12:40:50 -06:00
parent 5f2b7d6efb
commit 62ff017400
4 changed files with 11 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
B4A/C_Cliente.bas
View File

@@ -242,6 +242,7 @@ Sub B4XPage_Appear
et_telefono.Text = c.GetString("CAT_CL_TELEFONO")
et_email.Text = c.GetString("CAT_CL_EMAIL")
et_estado.Text = c.GetString("CAT_CL_EDO")
et_municipio.Text = c.GetString("CAT_CL_MUNI")
desdeBD = True
et_cp.Text = c.GetString("CAT_CL_CP")
et_calle.Text = c.GetString("CAT_CL_CALLE")

8
B4A/MAPA_RUTAS.bas
View File

@@ -220,7 +220,13 @@ Sub MapFragment1_Ready
' c3 = skmt.ExecQuery($"Select CAT_CL_CODIGO, CAT_CL_NOMBRE,CAT_CL_LONG,CAT_CL_LAT, CAT_CL_SECUENCIA from kmt_info
' where CAT_CL_CODIGO Not like 'N%' and CAT_CL_LAT is not null and CAT_CL_LONG is not null
' And CAT_CL_LAT <> 0 And CAT_CL_LONG <> 0 and CAT_CL_ESTATUS = 'Activo' and HV_MOTIVO = 'CERRADO_XXXXX'"$)
c3 = skmt.ExecQuery($"Select CAT_CL_CODIGO, CAT_CL_NOMBRE,CAT_CL_LONG,CAT_CL_LAT, CAT_CL_SECUENCIA from kmt_info where cat_cl_estatus = 'Inactivo'"$)
c3 = skmt.ExecQuery($"Select CAT_CL_CODIGO, CAT_CL_NOMBRE,CAT_CL_LONG,CAT_CL_LAT, CAT_CL_SECUENCIA from kmt_info
where cat_cl_estatus = 'Inactivo'
and date( -- Para traer la fecha del string
substr(cat_cl_fecha_captura, 7, 4) || '-' || -- año
substr(cat_cl_fecha_captura, 4, 2) || '-' || -- mes
substr(cat_cl_fecha_captura, 1, 2) -- día
) >= date('now', '-2 months')"$)
Log($"Select CAT_CL_CODIGO, CAT_CL_NOMBRE,CAT_CL_LONG,CAT_CL_LAT, CAT_CL_SECUENCIA from kmt_info where CAT_CL_CODIGO Not like 'N%' and CAT_CL_SECUENCIA = 0 and CAT_CL_LAT is not null and CAT_CL_LONG is not null And CAT_CL_LAT <> 0 And CAT_CL_LONG <> 0 and CAT_CL_ESTATUS <> 'Inactivo'"$)
Log($"============== Rojo Resultados = ${c3.RowCount}"$)
For i = 0 To c3.RowCount -1

2
B4A/Mariana Censos.b4a
View File

@@ -167,7 +167,7 @@ Version=12.8
#Region Project Attributes
#ApplicationLabel: Mariana Censos
#VersionCode: 1
#VersionName: 5.06.18
#VersionName: 5.09.13
'SupportedOrientations possible values: unspecified, landscape or portrait.
#SupportedOrientations: portrait
#CanInstallToExternalStorage: False

4
B4A/Mariana Censos.b4a.meta
View File

@@ -43,12 +43,12 @@ ModuleClosedNodes15=
ModuleClosedNodes16=4,5,6,10,13,17,18,19
ModuleClosedNodes2=
ModuleClosedNodes3=
ModuleClosedNodes4=
ModuleClosedNodes4=2,4
ModuleClosedNodes5=
ModuleClosedNodes6=
ModuleClosedNodes7=
ModuleClosedNodes8=1
ModuleClosedNodes9=1
NavigationStack=C_Principal,B4XPage_Created,240,0,C_Principal,JobDone,585,0,B4XMainPage,Class_Globals,77,0,B4XMainPage,B4XPage_Appear,235,0,Subs,traeUsarIntentBDWA,1335,0,Subs,importaBDDesdeWhatsApp,1380,6,Subs,CreateBitmapWithNumber,1394,0,MAPA_RUTAS,Activity_Create,66,0,MAPA_RUTAS,MapFragment1_Ready,237,6,B4XMainPage,B4XPage_Created,163,0
NavigationStack=C_Principal,b_subir_Click,442,0,Diseñador Visual,principal.bal,-100,3,C_Cliente,mandaPendientes,449,0,Main,Process_Globals,18,0,B4XMainPage,Class_Globals,21,0,Diseñador Visual,cliente.bal,-100,2,Diseñador Visual,clienteDatos.bal,-100,2,MAPA_RUTAS,MapFragment1_Ready,206,6,C_Principal,cargar_Click,507,0,C_Cliente,et_cp_TextChanged,518,0,C_Cliente,B4XPage_Appear,234,0
SelectedBuild=0
VisibleModules=14,2,9,4,8,15,7,16,13,5