diff --git a/Ventas/Clientes.aspx.vb b/Ventas/Clientes.aspx.vb
index fbe2b19e6..eac0461d1 100644
--- a/Ventas/Clientes.aspx.vb
+++ b/Ventas/Clientes.aspx.vb
@@ -1503,7 +1503,7 @@ Partial Class Clientes
                 'End If
 
                 'Campos para Modificación
-                LtlCliente.Text = ObjClientes.Nombre
+                LtlCliente.Text = ObjClientes.NombreComercial
                 TxtNombre.Text = ObjClientes.Nombre
                 TxtRegimenSociedad.Text = ObjClientes.RegimenSociedad
                 TxtNombreComercial.Text = ObjClientes.NombreComercial
diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb
index 9a94df0f8..13e3eeff7 100644
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -5963,7 +5963,7 @@ Partial Class Ventas
             If ObjCliente.DtResultados.Rows.Count > 0 Then
                 TxtCodigo.Text = ObjCliente.Codigo
                 DdlFormaEntrega.SelectedValueExist(ObjCliente.DtResultados(0)("CveCondicionEntrega").ToString())
-                LblCliente.Text = String.Format("<a Class=""Texto"" href=""/Ventas/Clientes.aspx?CveCliente={0}"">{1}</a>", CveCliente, ObjCliente.Nombre)
+                LblCliente.Text = String.Format("<a Class=""Texto"" href=""/Ventas/Clientes.aspx?CveCliente={0}"">{1}</a>", CveCliente, ObjCliente.NombreComercial)
                 ViewState("NombreCliente") = ObjCliente.Nombre
                 LtlCliente.Text = ObjCliente.Nombre
                 ViewState("RequiereOC") = ObjCliente.RequiereOC