-- editar sucursalcleinte

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"