diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb
index 42cc735cf..e0d111e0c 100644
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -21662,7 +21662,7 @@ Partial Class Ventas
         Dim Moneda As Integer = DdlMoneda.SelectedValue.ToEntero()
         Dim TipoCambio As Decimal = TxtTipoCambio.Text.ToDecimal
         EditoRemision = True
-        CveClienteSucursal = DdlClienteSucursal.SelectedValue.ToEntero
+        CveClienteSucursal = DdlSucursalCliente.SelectedValue.ToEntero
         Try
             'CONVERTIR REMISION - TIPO MONEDA  -DOLARES A PESOS
             If DdlMoneda.SelectedValue.ToEntero() <> 2 AndAlso ChkConvertirDolares.Checked Then
@@ -33534,7 +33534,7 @@ Partial Class Ventas
         TxtPedidoContrato.Enabled = True
         TxtObsAlmacen.Enabled = True
         RblPaqueteria.Enabled = True
-
+        DdlSucursalCliente.Enabled = True
         LnkUpdateLineaAdicional.Visible = True
         'Acciones
         BtnEditar.Text = "Guardar"