-almacen consignación
This commit is contained in:
@@ -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)
|
||||
|
||||
Reference in New Issue
Block a user