diff --git a/Inventarios/EntradasSalidas.aspx.vb b/Inventarios/EntradasSalidas.aspx.vb
index 3325d6163..51be4121d 100644
--- a/Inventarios/EntradasSalidas.aspx.vb
+++ b/Inventarios/EntradasSalidas.aspx.vb
@@ -295,9 +295,6 @@ Partial Class Inventarios_EntradasSalidas
If Not IsPostBack Then
-
-
-
If UsuarioActual.CveUsuario = 100 AndAlso IfNull(Request("Regenera"), "").ToString = "1" Then
RegeneraRM(Request("CveMovimiento").ToString.ToEntero, 119)
Exit Sub
@@ -337,7 +334,6 @@ Partial Class Inventarios_EntradasSalidas
divGuia.Visible = True
End Select
-
If Request("CveMovimiento") IsNot Nothing AndAlso Request("CveMovimiento").ToString.ToEntero > 0 Then
If UsuarioActual.CveRol = 1 AndAlso UsuarioActual.CveEmpresa = 140 Then
LnkGenerarVirtual.Visible = True
@@ -371,6 +367,11 @@ Partial Class Inventarios_EntradasSalidas
ActivaConsumoInterno()
End If
+ If Request("CveEntregaAlmacen") IsNot Nothing AndAlso Request("CveEntregaAlmacen").ToString.ToEntero > 0 Then
+ CargaDatosEntregaAlmacen(Request("CveEntregaAlmacen").ToString.ToEntero)
+ End If
+
+
'BLOQUEA PERMISOS
BtnGuardar.Enabled = PermiteGuardar()
BtnEliminar.Enabled = PermiteEliminar()
@@ -549,16 +550,13 @@ Partial Class Inventarios_EntradasSalidas
'Llenar el dropdownlist de almacén
- If Not IfNull(Request("CI"), -1).ToString.ToEntero > 0 Then
+ If Not IfNull(Request("CI"), -1).ToString.ToEntero > 0 AndAlso Not IfNull(Request("CveEntregaAlmacen"), -1).ToString.ToEntero > 0 Then
DdlAlmacen.DataSource = GlobalDTAlmacenUsuarios(UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1).FiltraParametros("CveTipoAlmacen NOT IN (9,11)") 'GlobalDTAlmacen(UsuarioActual.CveEmpresa)
'ElseIf UsuarioActual.CveUsuario.Contiene(1) Then
' DdlAlmacen.DataSource = GlobalDTAlmacenUsuarios(UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1).FiltraParametros("CveTipoAlmacen NOT IN (9,11) or CveAlmacen = 651e") 'GlobalDTAlmacen(UsuarioActual.CveEmpresa)
-
End If
-
-
DdlAlmacenInventarioFisico.DataSource = GlobalDTAlmacenUsuarios(UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1).FiltraParametros("CveTipoAlmacen NOT IN (9,11)") 'GlobalDTAlmacen(UsuarioActual.CveEmpresa)
DdlAlmacenCambioVigencias.DataSource = GlobalDTAlmacenUsuarios(UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1).FiltraParametros("CveTipoAlmacen NOT IN (9,11)")
@@ -574,7 +572,7 @@ Partial Class Inventarios_EntradasSalidas
DdlAlmacenInventarioFisico.DataBind()
DdlAlmacenCambioVigencias.DataBind()
- If IsNothing(Request("CveMovimiento")) Then
+ If IsNothing(Request("CveMovimiento")) And IsNothing(Request("CveEntregaAlmacen")) Then
DdlAlmacen.SelectedValueExist(UsuarioActual.CveAlmacen)
DdlAlmacen_SelectedIndexChanged(DdlAlmacen, EventArgs.Empty)
End If
@@ -660,8 +658,6 @@ Partial Class Inventarios_EntradasSalidas
GvM.Columns(8).Visible = False
End If
-
-
If Mov.GetMovimientos(tCveMovimiento, pCveConcepto, pFolio, UsuarioActual.CveEmpresa) AndAlso Mov.DtResultados.Rows.Count = 1 Then
CveMovimiento = Mov.CveMovimiento
@@ -672,7 +668,6 @@ Partial Class Inventarios_EntradasSalidas
Folio = Mov.Folio
Dim drM As DataRow = DtMov.Rows(0)
-
If DtMov.Rows(0)("CveConcepto").ToString.ToEntero = 2 Then
HplTraspaso.Visible = True
HplTraspaso.NavigateUrl = $"/Inventarios/TraspasoAlmacen.aspx?CveEntrada={DtMov.Rows(0)("CveMovimiento").ToString}"
@@ -1048,6 +1043,32 @@ Partial Class Inventarios_EntradasSalidas
End Sub
+
+ Private Sub CargaDatosEntregaAlmacen(CveEntregaAlmacen As Integer)
+ 'RECARGA ALMACENES SOLO DE recepcion de usados
+ DdlAlmacen.Items.Clear()
+ DdlAlmacen.DataBind()
+ Dim dttA As DataTable = Nothing
+ dttA = GlobalDTAlmacenUsuarios(UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1).FiltraParametros("CveTipoAlmacen IN (1,22,27)")
+
+ DdlAlmacen.DataSource = dttA
+ DdlAlmacen.Items.Insert(0, New ListItem("Seleccione", "-1"))
+ DdlAlmacen.DataBind()
+ DdlAlmacen.SelectedIndex = 1 'toma el primer renglón
+
+ Dim ObjGenerales As New ClsGenerales()
+
+ If (ObjGenerales.GetEntregaAlmacenRutaDetalle(CveEntregaAlmacen)) Then
+
+ For Each dr As DataRow In ObjGenerales.DtResultados.Rows
+ AddNew(dr("CvePS").ToString.ToEntero, dr("CodigoPS").ToString, dr("CveUnidadMedida").ToString.ToEntero, dr("Abreviatura").ToString, dr("Cantidad").ToString.ToDecimal,
+ 0, "", "", "", "", "E", "", MinFecha, 0, "")
+ Next
+ End If
+ ObjGenerales.Dispose()
+ End Sub
+
+
Private Sub BloqueaEdicionEncabezado()
@@ -1923,7 +1944,7 @@ Partial Class Inventarios_EntradasSalidas
If Not ErrorAC And Not ErrorMovInv Then
Dim Msg As New StringBuilder
- Msg.AppendFormat("
El Movimiento se registro con el Folio: {0}", ObjInventario.Folio)
+ Msg.AppendFormat("
El Movimiento se registro con el Folio: {0}", ObjInventario.Folio, ObjInventario.CveMovimiento)
Msg.AppendFormat("
Imprimir Movimiento ", Encripta(String.Format("OP=Alm&CveMovimiento={0}", CveMovimiento)))
If RetornoVirtual IsNot Nothing Then
diff --git a/Inventarios/EntregaAlmacenRuta.aspx.cs b/Inventarios/EntregaAlmacenRuta.aspx.cs
index 9a9c5cd0a..9fe1c890f 100644
--- a/Inventarios/EntregaAlmacenRuta.aspx.cs
+++ b/Inventarios/EntregaAlmacenRuta.aspx.cs
@@ -11,8 +11,7 @@ using System.Text;
public partial class Inventarios_EntregaAlmacenRuta : ClsPaginas
{
-
-
+
DataTable DTGenerarDocumentos
{
get {
@@ -837,15 +836,11 @@ public partial class Inventarios_EntregaAlmacenRuta : ClsPaginas
}
//}
}
-
}
else
{
-
ProcesoOK = ObjGenerales.UpdateInvEntregaAlmacenRuta(CveEntregaAlmacen, DdlmodalRecoleccionDireccion.SelectedValue.ToEntero(), -1, DdlChofer.SelectedValue.ToEntero(), DdlUnidadCamion.SelectedValue.ToEntero(), TxtFechaEntrega.Text.ToDate(), UsuarioActual.CveEmpresa);
-
- }
-
+ }
if (ProcesoOK)
{
@@ -877,10 +872,8 @@ public partial class Inventarios_EntregaAlmacenRuta : ClsPaginas
ObjGenerales.Dispose();
CargaDatosRecoleccion();
-
}
-
#endregion
protected void LnkModalGvModalPSRecoleccionEliminar_Click(object sender, EventArgs e)
@@ -889,8 +882,7 @@ public partial class Inventarios_EntregaAlmacenRuta : ClsPaginas
GridViewRow GvRow = (GridViewRow)LnkEliminar.NamingContainer;
if (CveEntregaAlmacen > 0)
- {
-
+ {
int CveEntregaAlmacenDetalleEliminar = GvRow.DataKey("CveEntregaAlmacenDetalle").ToEntero();
ClsGenerales ObjGenerales = new ClsGenerales();
@@ -907,8 +899,7 @@ public partial class Inventarios_EntregaAlmacenRuta : ClsPaginas
DTRecoleccion.Rows[DTIndex].Delete();
DTRecoleccion.AcceptChanges();
- }
-
+ }
CargaDatosRecoleccionDetallePS();
}
@@ -945,9 +936,7 @@ public partial class Inventarios_EntregaAlmacenRuta : ClsPaginas
LimpiarControlesPS();
CargaDatosRecoleccionDetallePS();
- }
-
-
+ }
private void LimpiarControlesPS()
{
TxtModalRecoleccionCantidad.Text = "";
@@ -1026,8 +1015,7 @@ public partial class Inventarios_EntregaAlmacenRuta : ClsPaginas
}
}
-
-
+
protected void gvR_RowDataBound(object sender, GridViewRowEventArgs e)
{
if (e.Row.RowType == DataControlRowType.DataRow)
diff --git a/Inventarios/RepEntregaAlmacenRuta.aspx b/Inventarios/RepEntregaAlmacenRuta.aspx
index 962eb485a..6b3f51c34 100644
--- a/Inventarios/RepEntregaAlmacenRuta.aspx
+++ b/Inventarios/RepEntregaAlmacenRuta.aspx
@@ -148,7 +148,8 @@
-
+
+
@@ -156,8 +157,8 @@
-
-
+
+
diff --git a/Inventarios/RepEntregaAlmacenRuta.aspx.cs b/Inventarios/RepEntregaAlmacenRuta.aspx.cs
index 97a5503f1..815d3722d 100644
--- a/Inventarios/RepEntregaAlmacenRuta.aspx.cs
+++ b/Inventarios/RepEntregaAlmacenRuta.aspx.cs
@@ -383,10 +383,7 @@ public partial class General_RepEntregaAlmacenRuta : ClsPaginas
if (GvRow.DataKey("CveCamionRemolque2").ToEntero() > 0)
{
DdlRemolque2.SelectedValueExist(GvRow.DataKey("CveCamionRemolque2"));
- }
-
-
-
+ }
CveDireccionOrigen = GvRow.DataKey("CveDireccionOrigen").ToEntero();
CveDireccionDestino = GvRow.DataKey("CveDireccionDestino").ToEntero();
@@ -617,9 +614,7 @@ public partial class General_RepEntregaAlmacenRuta : ClsPaginas
{
if (e.Row.RowType == DataControlRowType.DataRow)
{
-
e.Row.Cells[11].Text = "";
-
LinkButton LnkEditar = e.Row.FCLinkButton("LnkEditar");
LinkButton LnkTimbrar = e.Row.FCLinkButton("LnkTimbrar");
LinkButton LnkCancelaTimbre = e.Row.FCLinkButton("LnkCancelaTimbre");
@@ -634,11 +629,11 @@ public partial class General_RepEntregaAlmacenRuta : ClsPaginas
LnkTimbrar.Visible = true;
}
- //if (e.Row.DataKey("TimbreTipoDocto") == "Man")
- //{
- // e.Row.FCLinkButton("LnkEditarDirOrigen").Visible = true;
- // e.Row.FCLinkButton("LnkEditarDirDestino").Visible = true;
- //}
+ if (e.Row.DataKey("Tipo") == "R" && e.Row.DataKey("Estatus") == "1")
+ {
+ e.Row.FCHyperLink("HplR").Visible = true;
+ e.Row.FCHyperLink("HplR").NavigateUrl = "/Inventarios/EntradasSalidas.aspx?CveEntregaAlmacen=" + e.Row.DBCampo("CveEntregaAlmacen");
+ }
if (e.Row.DataKey("Estatus").ToEntero() == 1)
{
@@ -687,15 +682,10 @@ public partial class General_RepEntregaAlmacenRuta : ClsPaginas
default:
e.Row.FCLabel("LtTipo").CssClass = "label label-sm label-warning";
break;
-
}
-
}
-
}
-
-
private void CargaPersonalChofer()
{
DdlModalChofer.Items.Clear();
@@ -706,18 +696,10 @@ public partial class General_RepEntregaAlmacenRuta : ClsPaginas
{
DdlModalChofer.DataSource = ObjAcar.DtResultados;
}
-
-
-
-
ObjAcar.Dispose();
-
DdlModalChofer.DataBind();
-
DdlModalChofer.Items.Insert(0, new ListItem("Seleccione Uno", "-1"));
-
-
UpModalEditarentrega.Update();
}
@@ -744,7 +726,6 @@ public partial class General_RepEntregaAlmacenRuta : ClsPaginas
}
}
}
-
UpModalEditarentrega.Update();
}
@@ -779,15 +760,11 @@ public partial class General_RepEntregaAlmacenRuta : ClsPaginas
}
}
-
-
protected void DdlConfigAuto_SelectedIndexChanged(object sender, EventArgs e)
{
ValidaConfiguracionVeiculo();
}
-
-
- private void ValidaConfiguracionVeiculo()
+ private void ValidaConfiguracionVeiculo()
{
DvRemolque1.Visible = false;
DvRemolque2.Visible = false;
@@ -803,7 +780,6 @@ public partial class General_RepEntregaAlmacenRuta : ClsPaginas
{
string Remolque = ObjGrales.DtResultados.FiltroPrimeroValor("Remolque", $" CveConfigAutoTransporte ='{DdlConfigAuto.SelectedValue.ToEntero()}'");
-
if (Remolque == "1")
{
RequiereRemolque = true;
@@ -830,9 +806,6 @@ public partial class General_RepEntregaAlmacenRuta : ClsPaginas
MostrarRemolques = false;
}
-
-
-
if (RequiereRemolque | MostrarRemolques)
DvRemolque1.Visible = true;
@@ -841,7 +814,6 @@ public partial class General_RepEntregaAlmacenRuta : ClsPaginas
else
DvConfiguracionVeiculo.Visible = true;
-
UpModalEditarentrega.Update();
}
@@ -858,13 +830,11 @@ public partial class General_RepEntregaAlmacenRuta : ClsPaginas
if (ObjInv.GetCamiones(-1, UsuarioActual.CveEmpresa, 2))
DdlRemolque2.DataSource = ObjInv.DtResultados.FiltraParametros($"CveCamion <> {DdlRemolque1.SelectedValue.ToEntero()}");
}
-
try
{
DdlRemolque2.DataBind();
}
catch { }
-
}
else
DvRemolque2.Visible = false;
@@ -885,7 +855,6 @@ public partial class General_RepEntregaAlmacenRuta : ClsPaginas
if (RequiereRemolque & DdlRemolque1.SelectedValue.ToEntero() > 0)
Respuesta = true;
-
return Respuesta;
}
@@ -900,7 +869,6 @@ public partial class General_RepEntregaAlmacenRuta : ClsPaginas
if (ObjInv.GetCamiones(-1, UsuarioActual.CveEmpresa, 1))
DdlModalCamion.DataSource = ObjInv.DtResultados;
-
if (ObjInv.GetCamiones(-1, UsuarioActual.CveEmpresa, 2))
DdlRemolque1.DataSource = ObjInv.DtResultados;
}
@@ -988,7 +956,6 @@ public partial class General_RepEntregaAlmacenRuta : ClsPaginas
CargaDirClienteColonia();
CargaDirClienteLocalidad();
}
-
protected void DdlDirClienteEstado_SelectedIndexChanged(object sender, EventArgs e)
{
CargaDirClienteMunicipio();
@@ -1002,13 +969,11 @@ public partial class General_RepEntregaAlmacenRuta : ClsPaginas
CargaDirClienteLocalidad();
}
-
protected void BtnDirClienteValidar_Click(object sender, EventArgs e)
{
DirClientevalidaCodigoPostal();
}
-
protected void DdlDirClienteColonia_SelectedIndexChanged(object sender, EventArgs e)
{
DirClientevalidaCodigoPostal();
@@ -1111,10 +1076,8 @@ public partial class General_RepEntregaAlmacenRuta : ClsPaginas
CargaDatos();
}
-
ModalActualizaDirecciones(CveTimbre);
-
}
private void LnkAgregarDireccion_Click(object sender, EventArgs e)
@@ -1127,8 +1090,6 @@ public partial class General_RepEntregaAlmacenRuta : ClsPaginas
CargaCombosDirecionesClientesSAT();
TxtFechaLlegada.Text = "";
-
-
UpModalDVDireccionEnvio.Update();
RegistraScript("$('#divAddDireccionEnvio').modal('show');");
}