diff --git a/B4A/C_Cliente.bas b/B4A/C_Cliente.bas
index a0b740b..61e9f15 100644
--- a/B4A/C_Cliente.bas
+++ b/B4A/C_Cliente.bas
@@ -527,7 +527,7 @@ Sub B4XPage_Appear
 		Else
 			Guardar.Visible = True
 		End If
-		If la_cuenta.text = "0" Then Guardar.Visible = True 'Abordo
+'		If la_cuenta.text = "0" Then Guardar.Visible = True 'Abordo
 		If l_total.Text = Null Or l_total.Text = "null" Or l_total.text = "0" Then Guardar.Visible = True 'Si no hay venta entonces "Guardar" es visible.
 
 		'Promo Especial
diff --git a/B4A/C_Nota.bas b/B4A/C_Nota.bas
index cefca88..78ea076 100644
--- a/B4A/C_Nota.bas
+++ b/B4A/C_Nota.bas
@@ -97,7 +97,7 @@ Sub B4XPage_Appear
 	Else
 		borra.Visible = True
 	End If
-	If Subs.clienteActual = "0" Then borra.Visible = True 'Si el cliente actual es "abordo" entonces SIEMPRE lo dejamos modificar la venta.
+'	If Subs.clienteActual = "0" Then borra.Visible = True 'Si el cliente actual es "abordo" entonces SIEMPRE lo dejamos modificar la venta.
 	c.Close
 	L_CANT.Text =""
 	L_TOTAL.Text=""
@@ -197,7 +197,7 @@ Private Sub B4XPage_CloseRequest As ResumableSub
 End Sub
 
 Sub borra_Click
-	If folio = "0" Or Subs.clienteActual = "0" Then 'Si el folio es 0 o el cliente actual es "abordo", los deja borrar. - Mod por CHV 220512
+	If folio = "0" Then 'Si el folio es 0 o el cliente actual es "abordo", los deja borrar. - Mod por CHV 220512  'Para que el abordo borre siempre " Or Subs.clienteActual = "0""
 		result =  Msgbox2("Seguro que desea borrar el pedido?","Cancelar pedido", "Si", "", "No", LoadBitmap(File.DirAssets,"alert2.png")) 'ignore
 		If result = DialogResponse.POSITIVE Then
 			c=Starter.db.ExecQuery("select PE_PROID,PE_CANT, PE_TIPO FROM PEDIDO where pe_cliente in (Select CUENTA from cuentaa) ")
@@ -357,14 +357,14 @@ Private Sub clv_pedidos_ItemLongClick (position As Int, Value As Object)
 	c.Position = 0
 	If thisLog Then Log("lista prods="&list_prodsPedido.Get(position))
 	Private m As Map = list_prodsPedido.Get(position)
-	If c.GetString("CUANTOS") = 0 Or Subs.clienteActual = "0" Then 'Si la venta no está impresa o es abordo entonces continuamos ...
+	If c.GetString("CUANTOS") = 0 Then 'Si la venta no está impresa o es abordo entonces continuamos ...   'Para que el aborod borre siempre " Or Subs.clienteActual = "0""
 		c=Starter.db.ExecQuery2("select count(*) as CUANTOS FROM PEDIDO WHERE PE_CEDIS = ?	 AND PE_CLIENTE IN (Select CUENTA from cuentaa)", Array As String("DUR"))
 		c.Position = 0
 		CAMBIOS = c.GetString("CUANTOS")
 		c.Close
 		c=Starter.db.ExecQuery2("select PE_PRONOMBRE,PE_COSTO_TOT, PE_CANT, PE_FOLIO FROM PEDIDO WHERE PE_CLIENTE IN (Select CUENTA from cuentaa) AND PE_PRONOMBRE = ? order by PE_PRONOMBRE asc", Array As String(Value) )
 		c.Position = 0
-		If c.GetString("PE_FOLIO")  = "0" Or Subs.clienteActual = "0" Then
+		If c.GetString("PE_FOLIO")  = "0" Then   'Para que el abordo borre siempre " Or Subs.clienteActual = "0" "
 			result =  Msgbox2("Seguro que desea borrar este articulo?","Borrar Articulo", "Si", "", "No",LoadBitmap(File.DirAssets,"alert2.png")) 'ignore
 			If result = DialogResponse.POSITIVE Then
 				Private prod As Cursor=Starter.db.ExecQuery2("select PE_PROID, PE_CANT, PE_CEDIS FROM PEDIDO where pe_pronombre = ? and pe_cliente in (Select CUENTA from cuentaa) ", Array As String(Value))
diff --git a/B4A/KelloggsV4.b4a b/B4A/KelloggsV4.b4a
index b72d2fc..57cdc60 100644
--- a/B4A/KelloggsV4.b4a
+++ b/B4A/KelloggsV4.b4a
@@ -172,7 +172,7 @@ Version=12.5
 #Region  Project Attributes	
 	#ApplicationLabel: Kelloggs Venta
 	#VersionCode: 3000
-	#VersionName: 3.09.11 PRUEBA V4
+	#VersionName: 3.09.19 PRUEBA V4
 	#SupportedOrientations: portrait
 	#CanInstallToExternalStorage: False
 	#BridgeLogger:true
diff --git a/B4A/KelloggsV4.b4a.meta b/B4A/KelloggsV4.b4a.meta
index 486466f..ff2ed19 100644
--- a/B4A/KelloggsV4.b4a.meta
+++ b/B4A/KelloggsV4.b4a.meta
@@ -85,6 +85,6 @@ ModuleClosedNodes6=
 ModuleClosedNodes7=
 ModuleClosedNodes8=
 ModuleClosedNodes9=
-NavigationStack=C_Productos,Initialize,96,0,C_Historico,B_RMI_Click,111,0,C_Productos,clv_prods_ll_VisibleRangeChanged,1047,0,C_Productos,Busca_TextChanged,1068,3,C_Principal,JobDone,1123,0,C_Principal,cargar_Click,809,0,C_Principal,connecta_Click,1908,1,Visual Designer,productos.bal,-100,2,Visual Designer,cliente.bal,-100,1,C_Cliente,B4XPage_Appear,511,3
+NavigationStack=Visual Designer,productos.bal,-100,2,Visual Designer,cliente.bal,-100,1,C_Cliente,Initialize,279,0,C_Cliente,B4XPage_Created,299,0,C_Cliente,B4XPage_Appear,440,3,C_Cliente,B_IMP2_Click,1019,0,C_Cliente,B_IMP2BAK_Click,1494,0,C_Cliente,B_VENTA_Click,1919,0,C_Nota,B4XPage_Appear,93,0,C_Nota,borra_Click,193,6,C_Nota,clv_pedidos_ItemLongClick,360,6
 SelectedBuild=0
-VisibleModules=1,26,11,14,27,3,4,13,12,2
+VisibleModules=1,26,11,14,27,3,4,13,12,2,7