-almacen consignación

2024-04-24 05:02:03 -07:00
parent 7bbc79102c
commit 24d05833c1
3 changed files with 62 additions and 24 deletions
--- a/Ventas/Clientes.aspx
+++ b/Ventas/Clientes.aspx
@@ -804,14 +804,21 @@
                                            </div>
                                        </div>
                                         <div class="row" id="divAlmacenAsignado" runat="server" visible="false">
-                                             <div class="col-md-6">
+                                             <div class="col-md-4">
                                                 <div class="form-group form-md-line-input input-iconright">
                                                     <asp:DropDownList ID="DdlAlmacenAsignado" runat="server" CssClass=" form-control input-sm select2me" Width="100%" DataTextField="Almacen" DataValueField="CveAlmacen">                                                      
                                                     </asp:DropDownList>
                                                     <label for="<%= DdlAlmacenAsignado.ClientID.ToString()%>">Almacen Asignado:</label>
                                                 </div>
-                                             </div>
-                                             <div class="col-md-6">
+                                             </div>                                            
+                                             <div class="col-md-4">
+                                               <div class="form-group form-md-line-input input-iconright">
+                                                   <asp:DropDownList ID="DdlAlmacenConsignacion" runat="server" CssClass=" form-control input-sm select2me" Width="100%" DataTextField="Almacen" DataValueField="CveAlmacen">                                                      
+                                                   </asp:DropDownList>
+                                                   <label for="<%= DdlAlmacenConsignacion.ClientID.ToString()%>">Almacen Consignación:</label>
+                                               </div>
+                                            </div>
+                                              <div class="col-md-4">
                                                <div class="form-group form-md-line-input input-iconright">
                                                    <asp:DropDownList ID="DdlAlmacenAlterno" runat="server" CssClass=" form-control input-sm select2me" Width="100%" DataTextField="Almacen" DataValueField="CveAlmacen">                                                      
                                                    </asp:DropDownList>
@@ -5256,12 +5263,16 @@
                                    </div>
                                </div>

-                                <div class="row" style="padding-left: 16px">
-                                     <div class="form-group form-md-line-input input-iconright col-xs-6" runat="server" id="DvAlmacenSucursal" visible="false">
+                                <div class="row" style="padding-left: 16px" id="DivAlmacenesSucursal" visible="false" runat="server">
+                                     <div class="form-group form-md-line-input input-iconright col-xs-4"  >
                                         <asp:DropDownList runat="server" ID="ddlAlmacenSucursal" DataTextField="Almacen" DataValueField="CveAlmacen" CssClass="form-control select2me" Width="100%"></asp:DropDownList>
                                         <label for="<%=ddlAlmacenSucursal.ClientID.ToString()%>">Almacén:</label>
+                                    </div>                                     
+                                     <div class="form-group form-md-line-input input-iconright col-xs-4"  >
+                                         <asp:DropDownList runat="server" ID="DdlAlmacenConsignacionSucursal" DataTextField="Almacen" DataValueField="CveAlmacen" CssClass="form-control select2me" Width="100%"></asp:DropDownList>
+                                         <label for="<%=DdlAlmacenConsignacionSucursal.ClientID.ToString()%>">Almacén Consig:</label>
                                    </div>
-                                     <div class="form-group form-md-line-input input-iconright col-xs-6" runat="server" id="DvAlmacenAlternoSucursal" visible="false">
+                                     <div class="form-group form-md-line-input input-iconright col-xs-4"  >
                                         <asp:DropDownList runat="server" ID="DdlAlmacenAlternoSucursal" DataTextField="Almacen" DataValueField="CveAlmacen" CssClass="form-control select2me" Width="100%"></asp:DropDownList>
                                         <label for="<%=DdlAlmacenAlternoSucursal.ClientID.ToString()%>">Almacén Alt:</label>
                                    </div>
--- a/Ventas/Clientes.aspx.vb
+++ b/Ventas/Clientes.aspx.vb
@@ -1579,6 +1579,7 @@ Partial Class Clientes
                ChkProductoAlterno.Checked = ObjClientes.UsaProductoAlterno
                DdlAlmacenAsignado.SelectedValueExist(ObjClientes.CveAlmacenAsignado)
                DdlAlmacenAlterno.SelectedValueExist(ObjClientes.CveAlmacenAlterno)
+                DdlAlmacenConsignacion.SelectedValueExist(ObjClientes.CveAlmacenConsignacion)

                'COMERCIO EXTERIOR
                ChkAplicaComercioExterior.Checked = ObjClientes.AplicaComercioExterior
@@ -3055,8 +3056,7 @@ Partial Class Clientes
        HDMAPOP.Value = "2"

        If UsuarioActual.Empresa.Funcionalidad(578) = "1" Then
-            DvAlmacenSucursal.Visible = True
-            DvAlmacenAlternoSucursal.Visible = True
+            DivAlmacenesSucursal.Visible = True
            ddlAlmacenSucursal.Items.Clear()
            ddlAlmacenSucursal.ClearSelection()
            ddlAlmacenSucursal.SelectedValue = Nothing
@@ -3067,12 +3067,19 @@ Partial Class Clientes
            DdlAlmacenAlternoSucursal.SelectedValue = Nothing
            DdlAlmacenAlternoSucursal.DataSource = GlobalDTAlmacen(UsuarioActual.CveEmpresa)
            DdlAlmacenAlternoSucursal.DataBind()
+            DdlAlmacenConsignacionSucursal.Items.Clear()
+            DdlAlmacenConsignacionSucursal.ClearSelection()
+            DdlAlmacenConsignacionSucursal.SelectedValue = Nothing
+            DdlAlmacenConsignacionSucursal.DataSource = GlobalDTAlmacen(UsuarioActual.CveEmpresa)
+            DdlAlmacenConsignacionSucursal.DataBind()
        End If

        ddlAlmacenSucursal.Items.Insert(0, New ListItem("Seleccione", "-1"))
        ddlAlmacenSucursal.SelectedValueExist("-1")
        DdlAlmacenAlternoSucursal.Items.Insert(0, New ListItem("Seleccione", "-1"))
        DdlAlmacenAlternoSucursal.SelectedValueExist("-1")
+        DdlAlmacenConsignacionSucursal.Items.Insert(0, New ListItem("Seleccione", "-1"))
+        DdlAlmacenConsignacionSucursal.SelectedValueExist("-1")

        UpModalDivMapa.Update()
        RegistraScript("showDivEC();")
@@ -3105,6 +3112,7 @@ Partial Class Clientes
        Dim RFC As String = If(String.IsNullOrEmpty(TxtRFCSucursal.Text), "-1", TxtRFCSucursal.Text)
        Dim CveAlmacenAgregadoSucursal As Integer = ddlAlmacenSucursal.SelectedValue.ToEntero
        Dim CveAlmacenAlternoSucursal As Integer = DdlAlmacenAlternoSucursal.SelectedValue.ToEntero
+        Dim CveAlmacenConsignacionSucursal As Integer = DdlAlmacenConsignacionSucursal.SelectedValue.ToEntero

        If CveCliente > 0 Then

@@ -3124,7 +3132,7 @@ Partial Class Clientes
                    Dim Estatus As Boolean = ChkEstatusSucursal.Checked
                    If ObjCliente.UpdateSucursal(TxtNombreSucursal.Text.Trim, Estatus, CveCliente, CveClienteSuc, TxtCiudadSucursal.Text.Trim, TxtColoniaSucursal.Text.Trim, TxtCPSucursal.Text.Trim, TxtDireccionSucursal.Text.Trim, TxtEstadoSucursal.Text.Trim, TxtLocalidadSucursal.Text.Trim, TxtPaisSucursal.Text.Trim, TxtNumExtSucursal.Text.Trim, TxtNumIntSucursal.Text.Trim,
                                                 TxtTelefonoSucursal.Text.Trim.Replace(" ", "").Replace("(", "").Replace(")", "").Replace("-", "").Replace("_", ""), TxtCorreoSucursal.Text.Trim, TxtCorreoSucursalCotizacion.Text.Trim, TxtContactoSucursal.Text.Trim, DdlVendedorSucursal.SelectedValue.ToEntero(), TxtNumeroCuenta.Text, DdlMetodoPagoSucursal.SelectedValue.ToEntero(), TxtLimiteCreditoSucursal.Text.ToDecimal(), DdlResponsableSucursal.SelectedValue.ToEntero(),
-                                                  DdlSucursalUsoCFDI.SelectedValue.ToEntero(), DdlSucursalFormaPago33.SelectedValue.ToEntero(), DdlSucursalMetodoPago33.SelectedValue.ToEntero(), LT:=LT, LG:=LG, RFC:=RFC, CveAlmacenAsignado:=CveAlmacenAgregadoSucursal, CveAlmacenAlterno:=CveAlmacenAlternoSucursal) Then
+                                                  DdlSucursalUsoCFDI.SelectedValue.ToEntero(), DdlSucursalFormaPago33.SelectedValue.ToEntero(), DdlSucursalMetodoPago33.SelectedValue.ToEntero(), LT:=LT, LG:=LG, RFC:=RFC, CveAlmacenAsignado:=CveAlmacenAgregadoSucursal, CveAlmacenConsignacion:=CveAlmacenConsignacionSucursal, CveAlmacenAlterno:=CveAlmacenAlternoSucursal) Then
                        GVSucursales.EditIndex = -1
                        ViewState("DTSucursalesCliente") = ObjCliente.DtResultados
                        Alert("Los cambios se guardaron correctamente.", TipoMensaje.MsgInformacion)
@@ -3136,7 +3144,7 @@ Partial Class Clientes
                Else
                    If ObjCliente.AddSucursal(CveCliente, TxtNombreSucursal.Text.Trim, UsuarioActual.CveUsuario, TxtCiudadSucursal.Text.Trim, TxtColoniaSucursal.Text.Trim, TxtCPSucursal.Text.Trim, TxtDireccionSucursal.Text.Trim, TxtEstadoSucursal.Text.Trim, TxtLocalidadSucursal.Text.Trim, TxtPaisSucursal.Text.Trim, TxtNumExtSucursal.Text.Trim, TxtNumIntSucursal.Text.Trim, TxtTelefonoSucursal.Text.Trim.Replace(" ", "").Replace("(", "").Replace(")", "").Replace("-", ""), TxtCorreoSucursal.Text.Trim, TxtCorreoSucursalCotizacion.Text.Trim, TxtContactoSucursal.Text.Trim,
                                              DdlVendedorSucursal.SelectedValue.ToEntero(), TxtNumeroCuenta.Text, DdlMetodoPagoSucursal.SelectedValue.ToEntero(), TxtLimiteCreditoSucursal.Text.ToDecimal(), DdlResponsableSucursal.SelectedValue.ToEntero(),
-                                               DdlSucursalUsoCFDI.SelectedValue.ToEntero(), DdlSucursalFormaPago33.SelectedValue.ToEntero(), DdlSucursalMetodoPago33.SelectedValue.ToEntero(), LT:=LT, LG:=LG, RFC:=RFC, CveAlmacenAsignado:=CveAlmacenAgregadoSucursal, CveAlmacenAlterno:=CveAlmacenAlternoSucursal) Then
+                                               DdlSucursalUsoCFDI.SelectedValue.ToEntero(), DdlSucursalFormaPago33.SelectedValue.ToEntero(), DdlSucursalMetodoPago33.SelectedValue.ToEntero(), LT:=LT, LG:=LG, RFC:=RFC, CveAlmacenAsignado:=CveAlmacenAgregadoSucursal, CveAlmacenConsignacion:=CveAlmacenConsignacionSucursal, CveAlmacenAlterno:=CveAlmacenAlternoSucursal) Then
                        TxtNombreSucursal.Text = ""
                        TxtCiudadSucursal.Text = ""
                        TxtColoniaSucursal.Text = ""
@@ -3319,7 +3327,7 @@ Partial Class Clientes
            HDMAPOP.Value = "2"

            If UsuarioActual.Empresa.Funcionalidad(578) = "1" Then
-                DvAlmacenSucursal.Visible = True
+                DivAlmacenesSucursal.Visible = True
                ddlAlmacenSucursal.Items.Clear()
                ddlAlmacenSucursal.ClearSelection()
                ddlAlmacenSucursal.SelectedValue = Nothing
@@ -3327,7 +3335,6 @@ Partial Class Clientes
                ddlAlmacenSucursal.DataBind()
                ddlAlmacenSucursal.Items.Insert(0, New ListItem("Seleccione", "-1"))
                ddlAlmacenSucursal.SelectedValueExist(ObjCliente.DtResultados.Rows(0)("CveAlmacenAsignado").ToString())
-                DvAlmacenAlternoSucursal.Visible = True
                DdlAlmacenAlternoSucursal.Items.Clear()
                DdlAlmacenAlternoSucursal.ClearSelection()
                DdlAlmacenAlternoSucursal.SelectedValue = Nothing
@@ -3335,6 +3342,13 @@ Partial Class Clientes
                DdlAlmacenAlternoSucursal.DataBind()
                DdlAlmacenAlternoSucursal.Items.Insert(0, New ListItem("Seleccione", "-1"))
                DdlAlmacenAlternoSucursal.SelectedValueExist(ObjCliente.DtResultados.Rows(0)("CveAlmacenAlterno").ToString())
+                DdlAlmacenConsignacionSucursal.Items.Clear()
+                DdlAlmacenConsignacionSucursal.ClearSelection()
+                DdlAlmacenConsignacionSucursal.SelectedValue = Nothing
+                DdlAlmacenConsignacionSucursal.DataSource = GlobalDTAlmacen(UsuarioActual.CveEmpresa)
+                DdlAlmacenConsignacionSucursal.DataBind()
+                DdlAlmacenConsignacionSucursal.Items.Insert(0, New ListItem("Seleccione", "-1"))
+                DdlAlmacenConsignacionSucursal.SelectedValueExist(ObjCliente.DtResultados.Rows(0)("CveAlmacenConsignacion").ToString())
            End If

            UpAgregarSucursal.Update()
@@ -5615,6 +5629,7 @@ Partial Class Clientes
        RowSucursal("LG") = If(txtLg.Text.ToDouble <> 0, txtLg.Text, "0")

        RowSucursal("CveAlmacenAsignado") = ddlAlmacenSucursal.SelectedValue.ToEntero
+        RowSucursal("CveAlmacenConsignacion") = DdlAlmacenConsignacionSucursal.SelectedValue.ToEntero
        RowSucursal("CveAlmacenAlterno") = DdlAlmacenAlternoSucursal.SelectedValue.ToEntero

        TempDTSucursales.Rows.Add(RowSucursal)