diff --git a/B4A/C_Principal.bas b/B4A/C_Principal.bas
index 83695de..689189e 100644
--- a/B4A/C_Principal.bas
+++ b/B4A/C_Principal.bas
@@ -3581,6 +3581,21 @@ Private Sub b_noVisita_Click
 		Starter.skmt.ExecNonQuery($"update kmt_info set gestion = '4' where gestion = '0'"$)
 		Log(Subs.traeRuta)
 		Subs.bitacora(Subs.fechanormal(DateTime.Now), usuario, Subs.traeAlmacen, Subs.traeRuta, "MOTIVO NO VENTA ACTIVO", "", Subs.fechanormal(DateTime.Now), Subs.fechanormal(DateTime.Now), Starter.lat_gps, Starter.lon_gps, 2, "", r_razonNoVisita)
+'		Private mn0v As Cursor = Starter.skmt.ExecQuery("select * from kmt_info where gestion = '4'")
+'		If mnv.RowCount > 0 Then
+'			mnv.Position = 0
+'		End If
+		Private mnv As ResultSet = Starter.skmt.ExecQuery("select * from kmt_info where gestion = '4'")
+		Private alm As String = Subs.traeAlmacen
+		Private rut As String = Subs.traeRuta
+		Private fech As String = Subs.fechanormal(DateTime.Now)
+		Do While mnv.NextRow
+			Subs.bitacora(Subs.fechanormal(DateTime.Now), usuario, alm, rut, "NO VISITADO", mnv.GetString("CAT_CL_CODIGO"), fech, fech, Starter.lat_gps, Starter.lon_gps, 2, "", r_razonNoVisita)
+			Log($"NO VISITADO - ${mnv.GetString("CAT_CL_CODIGO")}"$)
+		Loop
+		
+		
+		
 '		b_motivoNoVisita.Color = Colors.RGB(247, 94, 0)
 		Private cd1 As ColorDrawable
 		cd1.Initialize(Colors.RGB(247, 94, 0), 5dip)
diff --git a/B4A/Files/principal.bal b/B4A/Files/principal.bal
index 2f34e90..70b46b7 100644
Binary files a/B4A/Files/principal.bal and b/B4A/Files/principal.bal differ
diff --git a/B4A/KelloggsV4.b4a b/B4A/KelloggsV4.b4a
index a5efaa9..6174ca9 100644
--- a/B4A/KelloggsV4.b4a
+++ b/B4A/KelloggsV4.b4a
@@ -887,7 +887,7 @@ Version=12.8
 #Region  Project Attributes	
 	#ApplicationLabel: Kelloggs Venta
 	#VersionCode: 3000
-	#VersionName: 4.06.30
+	#VersionName: 4.07.20
 	#SupportedOrientations: portrait
 	#CanInstallToExternalStorage: False
 	#BridgeLogger:true
diff --git a/B4A/KelloggsV4.b4a.meta b/B4A/KelloggsV4.b4a.meta
index ae39867..4816276 100644
--- a/B4A/KelloggsV4.b4a.meta
+++ b/B4A/KelloggsV4.b4a.meta
@@ -91,6 +91,6 @@ ModuleClosedNodes6=
 ModuleClosedNodes7=
 ModuleClosedNodes8=
 ModuleClosedNodes9=
-NavigationStack=B4XMainPage,B4XPage_Created,129,3,Main,Process_Globals,19,0,C_Cliente,B4XPage_Appear,619,0,C_Cliente,JobDone,4072,0,B4XMainPage,B4XPage_Appear,362,0,C_Principal,cargar_Click,568,6,C_Principal,Subir_Click,560,0,Visual Designer,principal.bal,-100,2,C_Principal,B4XPage_Appear,302,0,C_Principal,B_OK_PAS_Click,2267,0,C_Principal,JobDone,1220,3
+NavigationStack=C_Principal,Subir_Click,560,0,C_Principal,B4XPage_Appear,302,0,C_Principal,B_OK_PAS_Click,2267,0,C_Principal,JobDone,1220,3,B4XMainPage,B4XPage_Appear,362,0,Visual Designer,principal.bal,-100,5,C_Principal,b_motivoNoVisita_Click,3541,0,C_Principal,b_noVisita_Click,3586,6,Subs,bitacora,1707,0,Main,Globals,24,0
 SelectedBuild=0
-VisibleModules=1,28,11,3,26,23,29,12,4,13,7
+VisibleModules=1,28,11,3,26,23,29,12,4,13