se consideran los nuevos campos serie,lote y fecha caducidad en el inventario fisico
This commit is contained in:
@@ -92,7 +92,7 @@
|
|||||||
<asp:UpdatePanel ID="UpAcciones" runat="server" UpdateMode="Conditional">
|
<asp:UpdatePanel ID="UpAcciones" runat="server" UpdateMode="Conditional">
|
||||||
<ContentTemplate>
|
<ContentTemplate>
|
||||||
<li>
|
<li>
|
||||||
<asp:LinkButton ID="btnFin" runat="server" Text="Finalizar" data-toggle="confirmation" data-popout="true" data-original-title="Finalizar el inventario" data-btn-ok-label="si" />
|
<asp:LinkButton ID="btnFin" runat="server" Text="<i class='fa fa-stop' style='color:#cb5a5e'></i>Finalizar" data-toggle="confirmation" data-popout="true" data-original-title="Finalizar el inventario" data-btn-ok-label="si" />
|
||||||
</li>
|
</li>
|
||||||
<li>
|
<li>
|
||||||
<asp:LinkButton ID="LBAvance" OnClick="LBAvance_Click" runat="server" Text="Ver Avance" Visible="false" />
|
<asp:LinkButton ID="LBAvance" OnClick="LBAvance_Click" runat="server" Text="Ver Avance" Visible="false" />
|
||||||
@@ -232,7 +232,7 @@
|
|||||||
<asp:TextBox runat="server" ID="TxtCodigoBarras" OnTextChanged="TxtCodigoBarras_Change" AutoPostBack="true"></asp:TextBox>
|
<asp:TextBox runat="server" ID="TxtCodigoBarras" OnTextChanged="TxtCodigoBarras_Change" AutoPostBack="true"></asp:TextBox>
|
||||||
</div>
|
</div>
|
||||||
</div>
|
</div>
|
||||||
<div class="row" style="margin-top: 5px;">
|
<div class="row" style="margin-top: 5px;" runat="server" id="divSerie" visible="false">
|
||||||
<label class="col-md-4">Serie</label>
|
<label class="col-md-4">Serie</label>
|
||||||
<div class="col-md-8">
|
<div class="col-md-8">
|
||||||
<asp:TextBox runat="server" ID="TxtCodigoSerie"></asp:TextBox>
|
<asp:TextBox runat="server" ID="TxtCodigoSerie"></asp:TextBox>
|
||||||
@@ -323,7 +323,7 @@
|
|||||||
<asp:BoundField HeaderText="Código" DataField="Codigo" ItemStyle-HorizontalAlign="Left"></asp:BoundField>
|
<asp:BoundField HeaderText="Código" DataField="Codigo" ItemStyle-HorizontalAlign="Left"></asp:BoundField>
|
||||||
<asp:BoundField HeaderText="Producto" DataField="PS" ItemStyle-HorizontalAlign="Left"></asp:BoundField>
|
<asp:BoundField HeaderText="Producto" DataField="PS" ItemStyle-HorizontalAlign="Left"></asp:BoundField>
|
||||||
<asp:BoundField HeaderText="Sección Almacén" DataField="SeccionAlmacen" ItemStyle-HorizontalAlign="Left" Visible="false"></asp:BoundField>
|
<asp:BoundField HeaderText="Sección Almacén" DataField="SeccionAlmacen" ItemStyle-HorizontalAlign="Left" Visible="false"></asp:BoundField>
|
||||||
<asp:BoundField HeaderText="Serie/Lote" DataField="SerieLote" ItemStyle-HorizontalAlign="Left"></asp:BoundField>
|
<asp:BoundField HeaderText="Serie" DataField="SerieLote" ItemStyle-HorizontalAlign="Left"></asp:BoundField>
|
||||||
<asp:BoundField HeaderText="Lote" DataField="Lote" ItemStyle-HorizontalAlign="Left" Visible="false"></asp:BoundField>
|
<asp:BoundField HeaderText="Lote" DataField="Lote" ItemStyle-HorizontalAlign="Left" Visible="false"></asp:BoundField>
|
||||||
<asp:BoundField HeaderText="Fecha Caducidad" DataField="FechaCaducidad" ItemStyle-HorizontalAlign="Left" Visible="false"></asp:BoundField>
|
<asp:BoundField HeaderText="Fecha Caducidad" DataField="FechaCaducidad" ItemStyle-HorizontalAlign="Left" Visible="false"></asp:BoundField>
|
||||||
<asp:BoundField HeaderText="Cantidad" DataField="Cantidad" DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right"></asp:BoundField>
|
<asp:BoundField HeaderText="Cantidad" DataField="Cantidad" DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right"></asp:BoundField>
|
||||||
|
|||||||
@@ -103,7 +103,7 @@ Partial Class Inventarios_InventarioFisicoDetalle
|
|||||||
lbEstatus.Text = ObjInventario.Estatus
|
lbEstatus.Text = ObjInventario.Estatus
|
||||||
|
|
||||||
lbFechaF.Text = ObjInventario.FechaF
|
lbFechaF.Text = ObjInventario.FechaF
|
||||||
btnFin.Text = "Iniciar"
|
btnFin.Text = "<i style='color:#26a69a' class='fa fa-play'></i>Iniciar"
|
||||||
BtnGuardar.Enabled = False
|
BtnGuardar.Enabled = False
|
||||||
btnFin.ToolTip = "Inicia el Inventario Físico"
|
btnFin.ToolTip = "Inicia el Inventario Físico"
|
||||||
Case "3" 'FINALIZADO
|
Case "3" 'FINALIZADO
|
||||||
@@ -128,7 +128,7 @@ Partial Class Inventarios_InventarioFisicoDetalle
|
|||||||
lbFechaI.Text = ObjInventario.FechaI
|
lbFechaI.Text = ObjInventario.FechaI
|
||||||
lbFechaF.Text = ObjInventario.FechaF
|
lbFechaF.Text = ObjInventario.FechaF
|
||||||
BtnGuardar.Enabled = True
|
BtnGuardar.Enabled = True
|
||||||
btnFin.Text = "Finalizar"
|
btnFin.Text = "<i class='fa fa-stop' style='color:#cb5a5e'></i>Finalizar"
|
||||||
LBAvance.Visible = UsuarioActual.TienePermisoProceso(178) ' si tiene permiso de ver el avance, se activa
|
LBAvance.Visible = UsuarioActual.TienePermisoProceso(178) ' si tiene permiso de ver el avance, se activa
|
||||||
End Select
|
End Select
|
||||||
GvIFD.Visible = False
|
GvIFD.Visible = False
|
||||||
@@ -293,16 +293,18 @@ Partial Class Inventarios_InventarioFisicoDetalle
|
|||||||
Exit Sub
|
Exit Sub
|
||||||
End If
|
End If
|
||||||
|
|
||||||
|
|
||||||
Dim Consulto As Boolean = False
|
Dim Consulto As Boolean = False
|
||||||
Using Inventarios As New ClsInventarios
|
Using Inventarios As New ClsInventarios
|
||||||
|
|
||||||
If Inventarios.AddInventarioFisicoDetalle(CveInventarioFisico, CveProducto, CveUnidadMedida, If(CveMetodoInv = 5, 1, Cantidad), SerieLote, UsuarioActual.CveUsuario,
|
If Inventarios.AddInventarioFisicoDetalle(CveInventarioFisico, CveProducto, CveUnidadMedida, If(CveMetodoInv = 5, 1, Cantidad), SerieLote, UsuarioActual.CveUsuario,
|
||||||
CveSeccionAlmacen:=CveSeccionAlmacen, Lote:=Lote, FechaCaducidad:=FechaCaducidad.ToDate) Then
|
CveSeccionAlmacen:=CveSeccionAlmacen, Lote:=Lote, FechaCaducidad:=FechaCaducidad.ToDate) Then
|
||||||
|
|
||||||
|
GvIFDUltimoRegistrado.Columns(4).Visible = CveSeccionAlmacen > 0
|
||||||
|
GvIFDUltimoRegistrado.Columns(5).Visible = SerieLote <> "-1"
|
||||||
|
GvIFDUltimoRegistrado.Columns(6).Visible = Lote <> "-1"
|
||||||
|
GvIFDUltimoRegistrado.Columns(7).Visible = FechaCaducidad <> "01/01/1900"
|
||||||
|
|
||||||
If GvIFDUltimoRegistrado.Rows.Count > 0 Then
|
If GvIFDUltimoRegistrado.Rows.Count > 0 Then
|
||||||
GvIFDUltimoRegistrado.Columns(4).Visible = CveSeccionAlmacen > 0
|
|
||||||
GvIFDUltimoRegistrado.Columns(6).Visible = Lote <> "-1"
|
|
||||||
GvIFDUltimoRegistrado.Columns(7).Visible = FechaCaducidad <> "01/01/1900"
|
|
||||||
|
|
||||||
GvIFDUltimoRegistrado.Rows(0).Cells(0).Text = Now
|
GvIFDUltimoRegistrado.Rows(0).Cells(0).Text = Now
|
||||||
GvIFDUltimoRegistrado.Rows(0).Cells(1).Text = dr("CodigoBarras").ToString
|
GvIFDUltimoRegistrado.Rows(0).Cells(1).Text = dr("CodigoBarras").ToString
|
||||||
@@ -390,7 +392,7 @@ Partial Class Inventarios_InventarioFisicoDetalle
|
|||||||
|
|
||||||
#Region " FINALIZAR "
|
#Region " FINALIZAR "
|
||||||
Protected Sub btnFin_Click(sender As Object, e As EventArgs) Handles btnFin.Click
|
Protected Sub btnFin_Click(sender As Object, e As EventArgs) Handles btnFin.Click
|
||||||
If btnFin.Text = "Iniciar" Then
|
If btnFin.Text.Contains("Iniciar") Then
|
||||||
Dim Inventarios As New ClsInventarios
|
Dim Inventarios As New ClsInventarios
|
||||||
|
|
||||||
Inventarios.UpdateInventarioFisicoEstatus(CveInventarioFisico, 1, UsuarioActual.CveEmpresa)
|
Inventarios.UpdateInventarioFisicoEstatus(CveInventarioFisico, 1, UsuarioActual.CveEmpresa)
|
||||||
@@ -526,10 +528,12 @@ Partial Class Inventarios_InventarioFisicoDetalle
|
|||||||
Dim AplicaSeccion As Boolean = Producto("AplicaSeccion") = "1"
|
Dim AplicaSeccion As Boolean = Producto("AplicaSeccion") = "1"
|
||||||
Dim AplicaCaducidad As Boolean = Producto("AplicaCaducidad") = "1"
|
Dim AplicaCaducidad As Boolean = Producto("AplicaCaducidad") = "1"
|
||||||
Dim AplicaLote As Boolean = Producto("AplicaLote") = "1"
|
Dim AplicaLote As Boolean = Producto("AplicaLote") = "1"
|
||||||
|
Dim AplicaSerie As Boolean = Producto("AplicaSerie") = "1"
|
||||||
|
|
||||||
divSeccionAlmacen.Visible = AplicaSeccion
|
divSeccionAlmacen.Visible = AplicaSeccion
|
||||||
divLote.Visible = AplicaLote
|
divLote.Visible = AplicaLote
|
||||||
divFechaCaducidad.Visible = AplicaCaducidad
|
divFechaCaducidad.Visible = AplicaCaducidad
|
||||||
|
divSerie.Visible = AplicaSerie
|
||||||
UPAgregarPro.Update()
|
UPAgregarPro.Update()
|
||||||
End Sub
|
End Sub
|
||||||
End Class
|
End Class
|
||||||
|
|||||||
@@ -198,7 +198,9 @@
|
|||||||
<asp:BoundField HeaderText="Código Barras" DataField="CodigoBarras" ItemStyle-HorizontalAlign="Left" />
|
<asp:BoundField HeaderText="Código Barras" DataField="CodigoBarras" ItemStyle-HorizontalAlign="Left" />
|
||||||
<asp:BoundField HeaderText="Código" DataField="Codigo" ItemStyle-HorizontalAlign="Left" />
|
<asp:BoundField HeaderText="Código" DataField="Codigo" ItemStyle-HorizontalAlign="Left" />
|
||||||
<asp:BoundField HeaderText="Producto" DataField="PS" ItemStyle-HorizontalAlign="Left" />
|
<asp:BoundField HeaderText="Producto" DataField="PS" ItemStyle-HorizontalAlign="Left" />
|
||||||
<asp:BoundField HeaderText="SerieLote" DataField="SerieLote" ItemStyle-HorizontalAlign="Left" />
|
<asp:BoundField HeaderText="Serie" DataField="Serie" ItemStyle-HorizontalAlign="Left" />
|
||||||
|
<asp:BoundField HeaderText="Lote" DataField="Lote" ItemStyle-HorizontalAlign="Left" />
|
||||||
|
<asp:BoundField HeaderText="FechaCaducidad" DataField="FechaCaducidad" ItemStyle-HorizontalAlign="Left" />
|
||||||
<asp:BoundField HeaderText="Existencia" DataField="CantidadAlmacen" DataFormatString="{0:#,###.##}" ItemStyle-HorizontalAlign="Right" />
|
<asp:BoundField HeaderText="Existencia" DataField="CantidadAlmacen" DataFormatString="{0:#,###.##}" ItemStyle-HorizontalAlign="Right" />
|
||||||
<asp:BoundField HeaderText="Inv. Físico" DataField="CantidadInventarioFisico" DataFormatString="{0:#,###.##}" ItemStyle-HorizontalAlign="Right" />
|
<asp:BoundField HeaderText="Inv. Físico" DataField="CantidadInventarioFisico" DataFormatString="{0:#,###.##}" ItemStyle-HorizontalAlign="Right" />
|
||||||
<asp:BoundField HeaderText="Diferencia" DataField="Diferencia" DataFormatString="{0:#,###.##}" ItemStyle-Font-Bold="true" />
|
<asp:BoundField HeaderText="Diferencia" DataField="Diferencia" DataFormatString="{0:#,###.##}" ItemStyle-Font-Bold="true" />
|
||||||
@@ -230,7 +232,9 @@
|
|||||||
<asp:BoundField HeaderText="Código Barras" DataField="CodigoBarras" ItemStyle-HorizontalAlign="Left" />
|
<asp:BoundField HeaderText="Código Barras" DataField="CodigoBarras" ItemStyle-HorizontalAlign="Left" />
|
||||||
<asp:BoundField HeaderText="Código" DataField="Codigo" ItemStyle-HorizontalAlign="Left" />
|
<asp:BoundField HeaderText="Código" DataField="Codigo" ItemStyle-HorizontalAlign="Left" />
|
||||||
<asp:BoundField HeaderText="Producto" DataField="PS" ItemStyle-HorizontalAlign="Left" />
|
<asp:BoundField HeaderText="Producto" DataField="PS" ItemStyle-HorizontalAlign="Left" />
|
||||||
<asp:BoundField HeaderText="SerieLote" DataField="SerieLote" ItemStyle-HorizontalAlign="Left" />
|
<asp:BoundField HeaderText="Serie" DataField="Serie" ItemStyle-HorizontalAlign="Left" />
|
||||||
|
<asp:BoundField HeaderText="Lote" DataField="Lote" ItemStyle-HorizontalAlign="Left" />
|
||||||
|
<asp:BoundField HeaderText="FechaCaducidad" DataField="FechaCaducidad" ItemStyle-HorizontalAlign="Left" />
|
||||||
<asp:BoundField HeaderText="Existencia" DataField="CantidadAlmacen" ItemStyle-HorizontalAlign="Right" />
|
<asp:BoundField HeaderText="Existencia" DataField="CantidadAlmacen" ItemStyle-HorizontalAlign="Right" />
|
||||||
<asp:BoundField HeaderText="Inv. Físico" DataField="CantidadInventarioFisico" ItemStyle-HorizontalAlign="Right" />
|
<asp:BoundField HeaderText="Inv. Físico" DataField="CantidadInventarioFisico" ItemStyle-HorizontalAlign="Right" />
|
||||||
<asp:BoundField HeaderText="Diferencia" DataField="Diferencia" DataFormatString="{0:#,###.##}" ItemStyle-Font-Bold="true" />
|
<asp:BoundField HeaderText="Diferencia" DataField="Diferencia" DataFormatString="{0:#,###.##}" ItemStyle-Font-Bold="true" />
|
||||||
|
|||||||
@@ -136,9 +136,14 @@ Partial Class Inventarios_RepAnomalias
|
|||||||
Inventario.Dispose()
|
Inventario.Dispose()
|
||||||
|
|
||||||
GvS.DataSource = dt.FiltraParametros("Diferencia < 0")
|
GvS.DataSource = dt.FiltraParametros("Diferencia < 0")
|
||||||
|
Dim DtS As DataTable = dt.FiltraParametros("Diferencia < 0")
|
||||||
GvS.DataBind()
|
GvS.DataBind()
|
||||||
|
BanderaSerieLoteCad(GvS, DtS)
|
||||||
|
|
||||||
GvF.DataSource = dt.FiltraParametros("Diferencia > 0")
|
GvF.DataSource = dt.FiltraParametros("Diferencia > 0")
|
||||||
|
Dim DtF As DataTable = dt.FiltraParametros("Diferencia > 0")
|
||||||
GvF.DataBind()
|
GvF.DataBind()
|
||||||
|
BanderaSerieLoteCad(GvF, DtF)
|
||||||
|
|
||||||
Dim Script = ""
|
Dim Script = ""
|
||||||
If (GvF.Rows.Count > 0) Then
|
If (GvF.Rows.Count > 0) Then
|
||||||
@@ -267,6 +272,10 @@ Partial Class Inventarios_RepAnomalias
|
|||||||
End Sub
|
End Sub
|
||||||
#End Region
|
#End Region
|
||||||
|
|
||||||
|
Private Sub BanderaSerieLoteCad(Gv As GridView, resultado As DataTable)
|
||||||
|
Gv.Columns(4).Visible = resultado.MAX("Serie") <> ""
|
||||||
|
Gv.Columns(5).Visible = resultado.MAX("Lote") <> ""
|
||||||
|
Gv.Columns(6).Visible = resultado.MAX("FechaCaducidad") <> ""
|
||||||
|
End Sub
|
||||||
|
|
||||||
End Class
|
End Class
|
||||||
|
|||||||
Reference in New Issue
Block a user