diff --git a/B4A/C_Cliente.bas b/B4A/C_Cliente.bas
index 4eada40..8b70172 100644
--- a/B4A/C_Cliente.bas
+++ b/B4A/C_Cliente.bas
@@ -3801,7 +3801,7 @@ Sub Cuestionario
 					Loop
 					If logger Then Log("encuestaRes: " & encuestaRes)
 					If logger Then LogColor($"Guardamos tipo 3 : ${encuestaRes}"$, Colors.Green)
-					B4XPages.MainPage.skmt.ExecNonQuery2("insert into HIST_ENCUESTA(HE_CLIE, HE_RES, HE_FECHA, HE_TIPO, HE_LAT, HE_LON) VALUES (?,?,?,?,?,?)", Array As Object(la_cuenta.Text, encuestaRes, fecha, enc.GetString("CAT_EP_IDTIPOPREGUNTA"), B4XPages.MainPage.lat_gps, B4XPages.MainPage.lon_gps))
+					B4XPages.MainPage.skmt.ExecNonQuery2("insert into HIST_ENCUESTA(HE_CLIE, HE_RES, HE_FECHA, HE_TIPO, HE_LAT, HE_LON) VALUES (?,?,?,?,?,?)", Array As Object(la_cuenta.Text, encuestaRes, fecha, enc.GetString("CAT_EP_ID"), B4XPages.MainPage.lat_gps, B4XPages.MainPage.lon_gps))
 					ocultaPanelEncuesta
 				ELSE IF enc.GetString("CAT_EP_IDTIPOPREGUNTA") = 4 Then
 					If logger Then Log("Pregunta tipo 4")
@@ -3820,12 +3820,12 @@ Sub Cuestionario
 					If logger Then Log("encuestaRes: " & encuestaRes)
 					If logger Then LogColor($"Guardamos tipo 4 : ${encuestaRes}"$, Colors.Green)
 					If encuestaRes = "SI" Then
-						B4XPages.MainPage.skmt.ExecNonQuery2("insert into HIST_ENCUESTA(HE_CLIE, HE_RES, HE_FECHA, HE_TIPO, HE_LAT, HE_LON) VALUES (?,?,?,?,?,?)", Array As Object(la_cuenta.Text, "SI", fecha, enc.GetString("CAT_EP_IDTIPOPREGUNTA"), B4XPages.MainPage.lat_gps, B4XPages.MainPage.lon_gps))
+						B4XPages.MainPage.skmt.ExecNonQuery2("insert into HIST_ENCUESTA(HE_CLIE, HE_RES, HE_FECHA, HE_TIPO, HE_LAT, HE_LON) VALUES (?,?,?,?,?,?)", Array As Object(la_cuenta.Text, "SI", fecha, enc.GetString("CAT_EP_ID"), B4XPages.MainPage.lat_gps, B4XPages.MainPage.lon_gps))
 						indicePregunta = listaPreguntas.IndexOf(enc.GetString("CAT_EP_RES1_PRED")) 'Nos movemos a la posicion especificada por la respuesta, en las preguntas de tipo desicion, la respuesta nos indica a que pregunta movernos.
 						Log($"IndicePreg = ${indicePregunta}"$)
 						i = indicePregunta
 					else if encuestaRes = "NO" Then
-						B4XPages.MainPage.skmt.ExecNonQuery2("insert into HIST_ENCUESTA(HE_CLIE, HE_RES, HE_FECHA, HE_TIPO, HE_LAT, HE_LON) VALUES (?,?,?,?,?,?)", Array As Object(la_cuenta.Text, "NO", fecha, enc.GetString("CAT_EP_IDTIPOPREGUNTA"), B4XPages.MainPage.lat_gps, B4XPages.MainPage.lon_gps))
+						B4XPages.MainPage.skmt.ExecNonQuery2("insert into HIST_ENCUESTA(HE_CLIE, HE_RES, HE_FECHA, HE_TIPO, HE_LAT, HE_LON) VALUES (?,?,?,?,?,?)", Array As Object(la_cuenta.Text, "NO", fecha, enc.GetString("CAT_EP_ID"), B4XPages.MainPage.lat_gps, B4XPages.MainPage.lon_gps))
 						indicePregunta = listaPreguntas.IndexOf(enc.GetString("CAT_EP_RES2_PRED")) 'Nos movemos a la posicion especificada por la respuesta, en las preguntas de tipo desicion, la respuesta nos indica a que pregunta movernos.
 						Log($"IndicePreg = ${indicePregunta}"$)
 						i = indicePregunta
@@ -3850,7 +3850,7 @@ Sub Cuestionario
 					Loop
 					Log("encuestaRes: " & encuestaRes)
 					If logger Then LogColor($"Guardamos tipo 2 : ${encuestaRes}"$, Colors.Green)
-					B4XPages.MainPage.skmt.ExecNonQuery2("insert into HIST_ENCUESTA(HE_CLIE, HE_RES, HE_FECHA, HE_TIPO, HE_LAT, HE_LON) VALUES (?,?,?,?,?,?)", Array As Object(la_cuenta.Text, encuestaRes, fecha, enc.GetString("CAT_EP_IDTIPOPREGUNTA"), B4XPages.MainPage.lat_gps, B4XPages.MainPage.lon_gps))
+					B4XPages.MainPage.skmt.ExecNonQuery2("insert into HIST_ENCUESTA(HE_CLIE, HE_RES, HE_FECHA, HE_TIPO, HE_LAT, HE_LON) VALUES (?,?,?,?,?,?)", Array As Object(la_cuenta.Text, encuestaRes, fecha, enc.GetString("CAT_EP_ID"), B4XPages.MainPage.lat_gps, B4XPages.MainPage.lon_gps))
 					
 					indicePregunta = listaPreguntas.IndexOf(enc.GetString("CAT_EP_ID")) 'Nos movemos a la posicion especificada por la respuesta, en las preguntas de tipo desicion, la respuesta nos indica a que pregunta movernos.
 					i =  indicePregunta + 1
@@ -3893,7 +3893,7 @@ Sub Cuestionario
 					Loop
 					Log($"Respuesta: ${encuestaRes}"$)
 					If logger Then LogColor($"Guardamos tipo 1 : ${encuestaRes}"$, Colors.Green)
-					B4XPages.MainPage.skmt.ExecNonQuery2("insert into HIST_ENCUESTA(HE_CLIE, HE_RES, HE_FECHA, HE_TIPO, HE_LAT, HE_LON) VALUES (?,?,?,?,?,?)", Array As Object(la_cuenta.Text, encuestaRes, fecha, enc.GetString("CAT_EP_IDTIPOPREGUNTA"), B4XPages.MainPage.lat_gps, B4XPages.MainPage.lon_gps))
+					B4XPages.MainPage.skmt.ExecNonQuery2("insert into HIST_ENCUESTA(HE_CLIE, HE_RES, HE_FECHA, HE_TIPO, HE_LAT, HE_LON) VALUES (?,?,?,?,?,?)", Array As Object(la_cuenta.Text, encuestaRes, fecha, enc.GetString("CAT_EP_ID"), B4XPages.MainPage.lat_gps, B4XPages.MainPage.lon_gps))
 					ocultaPanelEncuesta
 				Else
 '					Starter.tipov = "VENTA"
diff --git a/B4A/Guna Vistas V3.1.b4a b/B4A/Guna Vistas V3.1.b4a
index b84b836..a19d248 100644
--- a/B4A/Guna Vistas V3.1.b4a	
+++ b/B4A/Guna Vistas V3.1.b4a	
@@ -184,12 +184,12 @@ Module9=C_NoVenta
 NumberOfFiles=62
 NumberOfLibraries=33
 NumberOfModules=23
-Version=12.5
+Version=12.8
 @EndOfDesignText@
 #Region  Project Attributes 
 	#ApplicationLabel: Guna V3.1
 	#VersionCode: 1
-	#VersionName: 4.05.04 ENC Geo
+	#VersionName: 4.05.13 ENC Geo
 	'SupportedOrientations possible values: unspecified, landscape or portrait.
 	#SupportedOrientations: portrait
 	#CanInstallToExternalStorage: False
diff --git a/B4A/Guna Vistas V3.1.b4a.meta b/B4A/Guna Vistas V3.1.b4a.meta
index 9dc96fb..fc8d4bd 100644
--- a/B4A/Guna Vistas V3.1.b4a.meta	
+++ b/B4A/Guna Vistas V3.1.b4a.meta	
@@ -70,6 +70,6 @@ ModuleClosedNodes6=
 ModuleClosedNodes7=
 ModuleClosedNodes8=
 ModuleClosedNodes9=
-NavigationStack=C_Cliente,b_encuesta_1_Click,3929,0,C_Cliente,b_encuesta_continuar_Click,3969,0,C_Principal,JobDone,960,0,C_Cliente,Class_Globals,0,0,C_Cliente,CB2_P8_M3_CheckedChange,3681,0,C_Cliente,CB3_P8_M3_CheckedChange,3693,0,C_Cliente,B4XPage_Appear,676,0,C_Cliente,GPS_LocationChanged,686,0,C_Cliente,Cuestionario,3906,0,C_Cliente,CB4_P8_M3_CheckedChange,3708,0
+NavigationStack=C_Cliente,CB4_P8_M3_CheckedChange,3708,0,C_Cliente,b_preguntag_Click,1132,0,C_Cliente,gest_Click,1015,0,C_Cliente,DATOS_Click,1657,0,C_Principal,Class_Globals,0,0,C_Principal,cargar_Click,867,0,C_Cliente,B_E_NEXT_Click,2163,0,C_Cliente,Cuestionario,3710,0,C_Principal,JobDone,1527,0,C_Principal,Subir_Click,562,0
 SelectedBuild=0
 VisibleModules=21,2,22,12,13,4,8,11,5,10