Asignar unicamente la sucusal del contratro

2019-08-23 16:04:49 -07:00
parent 2d0bf65aac
commit c3de42e793
2 changed files with 8 additions and 5 deletions
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -2781,6 +2781,9 @@ Partial Class Ventas

            If DrContrato("CveSucursalCliente").ToString.ToEntero > 0 Then
                DdlSucursalCliente.SelectedValueExist(DrContrato("CveSucursalCliente"))
+                DdlSucursalCliente_SelectedIndexChanged(DdlSucursalCliente, EventArgs.Empty)
+                DdlSucursalCliente.Enabled = False
+                DdlSucursalCliente.Attributes.Add("disabled", "")
            End If

            Dim CveAlmacenDestino As Integer = DrContrato("CveAlmacenDestino").ToString.ToEntero