-- nueva propiedad llamada cvealmacenalterno
This commit is contained in:
@@ -812,9 +812,14 @@
|
||||
</div>
|
||||
</div>
|
||||
<div class="col-md-6">
|
||||
|
||||
<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>
|
||||
<label for="<%= DdlAlmacenAlterno.ClientID.ToString()%>">Almacen Alterno:</label>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
@@ -5256,7 +5261,16 @@
|
||||
<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-6">
|
||||
<div class="form-group form-md-line-input input-iconright col-xs-6" runat="server" id="DvAlmacenAlternoSucursal" visible="false">
|
||||
<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>
|
||||
</div>
|
||||
<div class="row" style="padding-left: 16px">
|
||||
<div class="form-group form-md-line-input input-iconright col-xs-6" runat="server" id="Div4" visible="false">
|
||||
|
||||
</div>
|
||||
<div class="form-group form-md-line-input input-iconright col-xs-6">
|
||||
<div id="DivEstatusSucursal" visible="false" runat="server" class="form-group form-md-line-input input-iconright col-xs-12">
|
||||
<asp:CheckBox runat="server" ID="ChkEstatusSucursal" Checked="true" AutoPostBack="false" />
|
||||
<label for="<%= ChkEstatusSucursal.ClientID.ToString()%>">Estatus Sucursal</label>
|
||||
|
||||
@@ -1578,6 +1578,7 @@ Partial Class Clientes
|
||||
ChkBonificacionUsado.Checked = ObjClientes.BonificacionUsado
|
||||
ChkProductoAlterno.Checked = ObjClientes.UsaProductoAlterno
|
||||
DdlAlmacenAsignado.SelectedValueExist(ObjClientes.CveAlmacenAsignado)
|
||||
DdlAlmacenAlterno.SelectedValueExist(ObjClientes.CveAlmacenAlterno)
|
||||
|
||||
'COMERCIO EXTERIOR
|
||||
ChkAplicaComercioExterior.Checked = ObjClientes.AplicaComercioExterior
|
||||
@@ -2578,7 +2579,7 @@ Partial Class Clientes
|
||||
CvePais:=DdlPais.SelectedValue.ToEntero(), CveEstado:=DdlEstado.SelectedValue.ToEntero(), CveMunicipio:=DdlMunicipio.SelectedValue.ToEntero(), CveColonia:=DdlColonia.SelectedValue.ToEntero(), CveMotivoTraslado:=IIf(DdlMotivoTraslado.SelectedValue = "-1", "0", DdlMotivoTraslado.SelectedValue).ToString().ToEntero(), NumRegIdTrib:=IIf(TxtNumRegIdTrib.Text = "", "-1", TxtNumRegIdTrib.Text).ToString(),
|
||||
ComExtEstado:=IIf(TxtComExtEstado.Text = "", "-1", TxtComExtEstado.Text).ToString(), ComExtMunicipio:=IIf(TxtComExtMunicipio.Text = "", "-1", TxtComExtMunicipio.Text).ToString(), ComExtColonia:=IIf(TxtComExtColonia.Text = "", "-1", TxtComExtColonia.Text).ToString(), RequiereOC:=ChkRequiereOC.Checked, LT:=LT, LG:=LG, EsDistribuidor:=ChkEsDistribuidor.Checked,
|
||||
TipoCliente:=DdlTipoCliente.SelectedValue.ToEntero(), CargoUsado:=ChkCargoUsado.Checked, BonificacionUsado:=ChkBonificacionUsado.Checked, CveTipoRetencion:=DdlTipoRetencion.SelectedValue.ToEntero(), CorreoEntregaCompras:=TxtCorreoEntregaCompras.Text, CorreoEntregaAlmacen:=TxtCorreoEntregaAlmacen.Text, CveSATEstado:=DdlEstadoSAT.SelectedValue.ToEntero(), CveAdminTrayecto:=If(DdlAdminTrayecto.SelectedValue.ToEntero() <= 0, 0, DdlAdminTrayecto.SelectedValue.ToEntero()),
|
||||
CveRegimenFiscal:=DdlRegimenFiscal.SelectedValue.ToEntero, RegimenSociedad:=TxtRegimenSociedad.Text, TipoPersona:=TipoPersona, RepresentanteLegal:=TxtRepresentanteLegal.Text, ComExtCalle:=TxtComExtCalle.Text.Trim(), ComExtNumExt:=TxtComExtNumero.Text.Trim(), ComExtCP:=TxtComExtCP.Text.Trim(), FechaLimiteCredito:=FechaLimiteCredito, Genero:=GeneroCliente, CveAlmacenAsignado:=DdlAlmacenAsignado.SelectedValue.ToEntero, UsaProductoAlterno:=ChkProductoAlterno.Checked) Then
|
||||
CveRegimenFiscal:=DdlRegimenFiscal.SelectedValue.ToEntero, RegimenSociedad:=TxtRegimenSociedad.Text, TipoPersona:=TipoPersona, RepresentanteLegal:=TxtRepresentanteLegal.Text, ComExtCalle:=TxtComExtCalle.Text.Trim(), ComExtNumExt:=TxtComExtNumero.Text.Trim(), ComExtCP:=TxtComExtCP.Text.Trim(), FechaLimiteCredito:=FechaLimiteCredito, Genero:=GeneroCliente, CveAlmacenAsignado:=DdlAlmacenAsignado.SelectedValue.ToEntero, CveAlmacenAlterno:=DdlAlmacenAlterno.SelectedValue.ToEntero, UsaProductoAlterno:=ChkProductoAlterno.Checked) Then
|
||||
|
||||
CveClienteNuevo = ObjClientes.CveCliente
|
||||
|
||||
@@ -2662,7 +2663,7 @@ Partial Class Clientes
|
||||
RequiereOC:=ChkRequiereOC.Checked, LT:=LT, LG:=LG, EsDistribuidor:=ChkEsDistribuidor.Checked, TipoCliente:=DdlTipoCliente.SelectedValue.ToEntero(), CargoUsado:=ChkCargoUsado.Checked, BonificacionUsado:=ChkBonificacionUsado.Checked, CveTipoRetencion:=DdlTipoRetencion.SelectedValue.ToEntero(), CorreoEntregaCompras:=TxtCorreoEntregaCompras.Text, CorreoEntregaAlmacen:=TxtCorreoEntregaAlmacen.Text, CveSATEstado:=DdlEstadoSAT.SelectedValue.ToEntero(),
|
||||
CveAdminTrayecto:=If(DdlAdminTrayecto.SelectedValue.ToEntero() <= 0, 0, DdlAdminTrayecto.SelectedValue.ToEntero()),
|
||||
NoDesglosaIVA:=Not ChkNoDesglosaIVA.Checked, CveRegimenFiscal:=DdlRegimenFiscal.SelectedValue.ToEntero, RegimenSociedad:=TxtRegimenSociedad.Text, TipoPersona:=TipoPersona, RepresentanteLegal:=TxtRepresentanteLegal.Text, ComExtCalle:=TxtComExtCalle.Text.Trim(), ComExtNumExt:=TxtComExtNumero.Text.Trim(), ComExtCP:=TxtComExtCP.Text.Trim(), FechaLimiteCredito:=FechaLimiteCredito,
|
||||
Genero:=GeneroCliente, CveAlmacenAsignado:=DdlAlmacenAsignado.SelectedValue.ToEntero, UsaProductoAlterno:=ChkProductoAlterno.Checked) Then
|
||||
Genero:=GeneroCliente, CveAlmacenAsignado:=DdlAlmacenAsignado.SelectedValue.ToEntero, CveAlmacenAlterno:=DdlAlmacenAlterno.SelectedValue.ToEntero, UsaProductoAlterno:=ChkProductoAlterno.Checked) Then
|
||||
|
||||
If Not ObjClientes.LimpiaImpuestosLocales(Me.CveCliente) Then
|
||||
ErrorProceso = True
|
||||
@@ -3055,19 +3056,25 @@ Partial Class Clientes
|
||||
|
||||
If UsuarioActual.Empresa.Funcionalidad(578) = "1" Then
|
||||
DvAlmacenSucursal.Visible = True
|
||||
DvAlmacenAlternoSucursal.Visible = True
|
||||
ddlAlmacenSucursal.Items.Clear()
|
||||
ddlAlmacenSucursal.ClearSelection()
|
||||
ddlAlmacenSucursal.SelectedValue = Nothing
|
||||
ddlAlmacenSucursal.DataSource = GlobalDTAlmacen(UsuarioActual.CveEmpresa)
|
||||
ddlAlmacenSucursal.DataBind()
|
||||
DdlAlmacenAlternoSucursal.Items.Clear()
|
||||
DdlAlmacenAlternoSucursal.ClearSelection()
|
||||
DdlAlmacenAlternoSucursal.SelectedValue = Nothing
|
||||
DdlAlmacenAlternoSucursal.DataSource = GlobalDTAlmacen(UsuarioActual.CveEmpresa)
|
||||
DdlAlmacenAlternoSucursal.DataBind()
|
||||
End If
|
||||
|
||||
ddlAlmacenSucursal.Items.Insert(0, New ListItem("Seleccione uno", "-1"))
|
||||
ddlAlmacenSucursal.Items.Insert(0, New ListItem("Seleccione", "-1"))
|
||||
ddlAlmacenSucursal.SelectedValueExist("-1")
|
||||
DdlAlmacenAlternoSucursal.Items.Insert(0, New ListItem("Seleccione", "-1"))
|
||||
DdlAlmacenAlternoSucursal.SelectedValueExist("-1")
|
||||
|
||||
UpModalDivMapa.Update()
|
||||
|
||||
|
||||
RegistraScript("showDivEC();")
|
||||
End Sub
|
||||
Public Function CargaSucursalesCliente() As Boolean
|
||||
@@ -3097,6 +3104,7 @@ Partial Class Clientes
|
||||
Dim LG As String = If(txtLg.Text.ToDouble <> 0, txtLg.Text, "0")
|
||||
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
|
||||
|
||||
If CveCliente > 0 Then
|
||||
|
||||
@@ -3116,7 +3124,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) Then
|
||||
DdlSucursalUsoCFDI.SelectedValue.ToEntero(), DdlSucursalFormaPago33.SelectedValue.ToEntero(), DdlSucursalMetodoPago33.SelectedValue.ToEntero(), LT:=LT, LG:=LG, RFC:=RFC, CveAlmacenAsignado:=CveAlmacenAgregadoSucursal, CveAlmacenAlterno:=CveAlmacenAlternoSucursal) Then
|
||||
GVSucursales.EditIndex = -1
|
||||
ViewState("DTSucursalesCliente") = ObjCliente.DtResultados
|
||||
Alert("Los cambios se guardaron correctamente.", TipoMensaje.MsgInformacion)
|
||||
@@ -3128,7 +3136,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) Then
|
||||
DdlSucursalUsoCFDI.SelectedValue.ToEntero(), DdlSucursalFormaPago33.SelectedValue.ToEntero(), DdlSucursalMetodoPago33.SelectedValue.ToEntero(), LT:=LT, LG:=LG, RFC:=RFC, CveAlmacenAsignado:=CveAlmacenAgregadoSucursal, CveAlmacenAlterno:=CveAlmacenAlternoSucursal) Then
|
||||
TxtNombreSucursal.Text = ""
|
||||
TxtCiudadSucursal.Text = ""
|
||||
TxtColoniaSucursal.Text = ""
|
||||
@@ -3317,21 +3325,21 @@ Partial Class Clientes
|
||||
ddlAlmacenSucursal.SelectedValue = Nothing
|
||||
ddlAlmacenSucursal.DataSource = GlobalDTAlmacen(UsuarioActual.CveEmpresa)
|
||||
ddlAlmacenSucursal.DataBind()
|
||||
ddlAlmacenSucursal.Items.Add(New ListItem("Seleccione uno", "-1"))
|
||||
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
|
||||
DdlAlmacenAlternoSucursal.DataSource = GlobalDTAlmacen(UsuarioActual.CveEmpresa)
|
||||
DdlAlmacenAlternoSucursal.DataBind()
|
||||
DdlAlmacenAlternoSucursal.Items.Insert(0, New ListItem("Seleccione", "-1"))
|
||||
DdlAlmacenAlternoSucursal.SelectedValueExist(ObjCliente.DtResultados.Rows(0)("CveAlmacenAlterno").ToString())
|
||||
End If
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
UpAgregarSucursal.Update()
|
||||
UpModalDivMapa.Update()
|
||||
|
||||
'Dim scriptReg As String = $" SelTxtLat = '#{ GVSucursales.Rows(e.NewEditIndex).FCTextBox("txtLt").ClientID}'; SelTxtLon = '#{ GVSucursales.Rows(e.NewEditIndex).FCTextBox("txtLg").ClientID}''"
|
||||
'RegistraScript("$('#divAgregarSucursal').modal();" & scriptReg)
|
||||
|
||||
UpModalDivMapa.Update()
|
||||
|
||||
RegistraScript("$('#divAgregarSucursal').modal();")
|
||||
|
||||
Else
|
||||
@@ -5607,6 +5615,7 @@ Partial Class Clientes
|
||||
RowSucursal("LG") = If(txtLg.Text.ToDouble <> 0, txtLg.Text, "0")
|
||||
|
||||
RowSucursal("CveAlmacenAsignado") = ddlAlmacenSucursal.SelectedValue.ToEntero
|
||||
RowSucursal("CveAlmacenAlterno") = DdlAlmacenAlternoSucursal.SelectedValue.ToEntero
|
||||
|
||||
TempDTSucursales.Rows.Add(RowSucursal)
|
||||
|
||||
@@ -6137,18 +6146,22 @@ Partial Class Clientes
|
||||
|
||||
Private Sub CargaDdlAlmacen()
|
||||
|
||||
|
||||
|
||||
If UsuarioActual.Empresa.Funcionalidad(578) = "1" Then
|
||||
|
||||
DdlAlmacenAsignado.SelectedValue = Nothing
|
||||
DdlAlmacenAsignado.ClearSelection()
|
||||
DdlAlmacenAsignado.Items.Clear()
|
||||
DdlAlmacenAlterno.SelectedValue = Nothing
|
||||
DdlAlmacenAlterno.ClearSelection()
|
||||
DdlAlmacenAlterno.Items.Clear()
|
||||
|
||||
divAlmacenAsignado.Visible = True
|
||||
DdlAlmacenAsignado.DataSource = GlobalDTAlmacen(UsuarioActual.CveEmpresa)
|
||||
DdlAlmacenAsignado.DataBind()
|
||||
DdlAlmacenAsignado.Items.Insert(0, New ListItem("-", "-1"))
|
||||
DdlAlmacenAlterno.DataSource = GlobalDTAlmacen(UsuarioActual.CveEmpresa)
|
||||
DdlAlmacenAlterno.DataBind()
|
||||
DdlAlmacenAlterno.Items.Insert(0, New ListItem("-", "-1"))
|
||||
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Reference in New Issue
Block a user