diff --git a/B4A/C_Cliente.bas b/B4A/C_Cliente.bas
index 3165bac..030fcbf 100644
--- a/B4A/C_Cliente.bas
+++ b/B4A/C_Cliente.bas
@@ -613,7 +613,7 @@ Sub B4XPage_Appear
 	If Tracker.FLP.IsInitialized And Tracker.FLP.GetLastKnownLocation.IsInitialized Then 'Si tenemos "UltimaUbicaccionConocida" la usamos.
 		B4XPages.MainPage.lat_gps = Tracker.FLP.GetLastKnownLocation.Latitude
 		B4XPages.MainPage.lon_gps = Tracker.FLP.GetLastKnownLocation.Longitude
-		Log($"Tenemos UUC: ${Tracker.FLP.GetLastKnownLocation.Latitude},${Tracker.FLP.GetLastKnownLocation.Longitude}"$)
+'		Log($"Tenemos UUC: ${Tracker.FLP.GetLastKnownLocation.Latitude},${Tracker.FLP.GetLastKnownLocation.Longitude}"$)
 		GPS_LocationChanged(Tracker.FLP.GetLastKnownLocation)
 	End If
 	muestraBoleta = False
diff --git a/B4A/C_Productos.bas b/B4A/C_Productos.bas
index 2fc5f8f..cbbd2ce 100644
--- a/B4A/C_Productos.bas
+++ b/B4A/C_Productos.bas
@@ -708,7 +708,7 @@ Sub b_terminar1_Click
 	lv_prodsPedido.Clear
 	list_prodsPedido.Initialize
 	Private c_prods As Cursor=Starter.skmt.ExecQuery("select PE_PRONOMBRE,PE_COSTO_TOT, PE_COSTOU, PE_CANT, PE_FOLIO, PE_CEDIS, PE_PROID FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa) order by PE_CEDIS, PE_PRONOMBRE")
-	Log(c_prods.RowCount)
+'	Log(c_prods.RowCount)
 	If c_prods.RowCount > 0 Then
 		c_prods.Position = 0
 '		l_total2.Text = c_prods.GetString("PE_COSTO_TOT")
@@ -725,7 +725,7 @@ Sub b_terminar1_Click
 			label1.color = Colors.White
 			label1.Height = 30dip
 			Private textColor As Int = Colors.black
-			Log(c_prods.GetString("PE_CEDIS"))
+'			Log(c_prods.GetString("PE_CEDIS"))
 			If Not(IsNumber(c_prods.GetString("PE_CEDIS"))) Then textColor = Colors.RGB(210,105,30) 'Si es promo, cambiamos el color del texto.
 			If c_prods.GetString("PE_CEDIS") = "DUR" Then textColor = Colors.red 'Si es promo, cambiamos el color del texto.
 			Dim label2 As Label
@@ -733,12 +733,12 @@ Sub b_terminar1_Click
 			label2.TextSize = 10
 			label2.TextColor = Colors.Blue
 			label2.Tag = i
-			Log(c_prods.GetString("PE_PRONOMBRE"))
+'			Log(c_prods.GetString("PE_PRONOMBRE"))
 			lv_prodsPedido.AddTwoLines(cs.Color(textColor).append(c_prods.GetString("PE_PRONOMBRE")).pop,"Cantidad #"& c_prods.GetString("PE_CANT")& " SubTotal $"& c_prods.GetString("PE_COSTO_TOT")& " Folio "& c_prods.GetString("PE_FOLIO"))
 			list_prodsPedido.Add(CreateMap("prodNom":c_prods.GetString("PE_PRONOMBRE"), "cedis":c_prods.GetString("PE_CEDIS"), "prodId": c_prods.GetString("PE_PROID"), "cant": c_prods.GetString("PE_CANT")))
 			folio = 0
 			totalPedido = totalPedido + (c_prods.GetString("PE_COSTOU") * c_prods.GetString("PE_CANT"))
-			Log("|" & Subs.esPromo(c_prods.GetString("PE_PROID")) & "|")
+'			Log("|" & Subs.esPromo(c_prods.GetString("PE_PROID")) & "|")
 			If Not(Subs.esPromo(c_prods.GetString("PE_PROID"))) Then cantPedido = cantPedido + c_prods.GetString("PE_CANT")
 			If c_prods.GetString("PE_FOLIO") <> Null Then folio = c_prods.GetString("PE_FOLIO")
 		Next
diff --git a/B4A/C_Promos.bas b/B4A/C_Promos.bas
index 17cfa9f..c0d40d1 100644
--- a/B4A/C_Promos.bas
+++ b/B4A/C_Promos.bas
@@ -110,7 +110,7 @@ Sub muestraPromo(promo As String, cliente As String)
 '	Dim pf As List = mp.Get("prodsFijos")
 	Dim pv As List = mp.Get("prodsVariables")
 	Dim listaPreciosPV As List = mp.Get("prodsVariablesPrecios")
-	Logcolor(listaPreciosPV, Colors.red)
+'	Logcolor(listaPreciosPV, Colors.red)
 	If thisLog Then Log(mp)
 	tpf = 0
 	For Each pfp As Int In mp.Get("prodsFijosPiezas").As(List)
@@ -272,9 +272,9 @@ Sub b_prodMas_Click
 '		Private inv As String = Regex.Split("\|", laCant.tag)(1)
 		Private prodId As String = Regex.Split("\|", laCant.tag)(2)
 		Private tmpMap As Map = CreateMap("precio":precio, "cant":laCant.Text, "almacen":estaPromo)
-		Log(tmpMap)
+'		Log(tmpMap)
 		promosMap.Put(prodId, tmpMap)
-		LogColor(promosMap, Colors.Magenta)
+'		LogColor(promosMap, Colors.Magenta)
 	End If
 '	Log($"Total Prods: ${totalProds}, Total Compra: $$1.2{totalCompra}"$)
 '	l_total.Text = $"Total Compra: $$1.2{totalCompra}"$
@@ -316,7 +316,7 @@ Sub cuentaProds
 		Private esteTag As List = Regex.Split("\|", cant1.Tag)
 		If cant1.Text > esteTag.Get(1) Then cant1.Text = esteTag.Get(1)
 		If cant1.Text > 0 Then
-			Log(esteTag.Get(2) & "|" & cant1.Text)
+'			Log(esteTag.Get(2) & "|" & cant1.Text)
 			totalCompra = totalCompra + (esteTag.get(0) * cant1.text)
 			If thisLog Then Log($"Cant: ${cant1.Text}, Suma: ${totalCompra}"$)
 			prodsIds2.Add(esteTag.Get(2))
@@ -340,7 +340,7 @@ Sub cuentaProds
 	End If
 	If thisLog Then LogColor($"${prodsIds}${CRLF}${prodsCants}${CRLF}${prodsPrecios}"$, Colors.blue)
 	If thisLog Then LogColor($"${prodsIds2}${CRLF}${prodsCants2}${CRLF}${prodsPrecios2}"$, Colors.Magenta)
-	LogColor($"Total Prods: ${totalProds}, Total: $$1.2{totalCompra}"$, Colors.Blue)
+'	LogColor($"Total Prods: ${totalProds}, Total: $$1.2{totalCompra}"$, Colors.Blue)
 '	Log($"Termina cuentaProds - ${Starter.cp_running}"$)
 End Sub
 
@@ -377,7 +377,7 @@ End Sub
 
 Private Sub b_terminar1_Click
 	cuentaProds
-	Log("====================================================================")
+'	Log("====================================================================")
 '	Log($"${prodsIds}${CRLF}${prodsCants}${CRLF}${prodsPrecios}"$)
 	For t = 0 To prodsIds.Size - 1 'Guardamos los productos fijos de la promocion en pedido.
 		Private pn As String = Subs.traeProdNombre(prodsIds.Get(t))
diff --git a/B4A/Subs.bas b/B4A/Subs.bas
index 0de8025..e5f6f29 100644
--- a/B4A/Subs.bas
+++ b/B4A/Subs.bas
@@ -1322,7 +1322,7 @@ Sub revisaMaxPromosProdsVariablesPorInventario(pm As Map) As Int 'ignore
 		maxPromosXVariables = x
 	Next
 	'Restamos fijos.
-	LogColor("Max promos de prodsVariables POR inventario = " & maxPromosXVariables, Colors.red)
+'	LogColor("Max promos de prodsVariables POR inventario = " & maxPromosXVariables, Colors.red)
 	Return maxPromosXVariables
 End Sub