1. Kardex. Visualización de cantidades pendientes de recibir (backorder) y visualizar como se componen la OC.

2.  permitir cancelación de partida del producto de la backorder.
3.  Filtro aseguradora en reportes de cxc y listado de clientes.
4. Rep CxC, personalizar columna de límite de crédito
This commit is contained in:
RPimienta
2024-08-30 03:53:56 -06:00
parent 473bdbced3
commit 20c1a4a374
11 changed files with 1495 additions and 1273 deletions

View File

@@ -388,6 +388,19 @@
</div>
</div>
</div>
<div class="col-md-2 col-sm-3 col-xs-6" id="DivIndicadorOC" visible="false" runat="server">
<div class="widget-thumb text-uppercase bordered">
<h4 class="widget-thumb-heading">OC</h4>
<div class="widget-thumb-wrap">
<i class="widget-thumb-icon bg-yellow fa fa-cubes"></i>
<div class="widget-thumb-body">
<span class="widget-thumb-body-stat">
<asp:LinkButton ID="LnkIndicador_OC" Text="" OnClick="LnkIndicador_OC_Click" runat="server" />
</span>
</div>
</div>
</div>
</div>
</div>
<div class="row">
<div class="col-md-12">
@@ -514,6 +527,41 @@
<asp:AsyncPostBackTrigger ControlID="btConsultar" EventName="Click" />
</Triggers>
</asp:UpdatePanel>
<div id="ModalOC" class="modal ADS fade" role="dialog">
<asp:UpdatePanel class="modal-dialog" runat="server" ID="UpModalOC" UpdateMode="Conditional" RenderMode="Inline" style="width: 50%">
<ContentTemplate>
<div class="modal-content">
<div class="modal-header ">
<h4 class="modal-title">
<asp:Literal ID="Literal3" Text="OC Pendientes X Recibir" runat="server"> </asp:Literal></h4>
</div>
<div class="modal-body">
<div class="row" style="width: 100%">
<asp:GridView ID="GvOC" Width="100%" runat="server" ShowHeader="true" EmptyDataText="No hay registros." AutoGenerateColumns="False" AllowPaging="False"
ShowFooter="True" ShowHeaderWhenEmpty="True" CssClass="table table-striped table-advance table-hover ScrollAD" GridLines="None"
DataKeyNames="CveOrdenCompra,CveOrdenCompraDetalle,Fecha,Folio,CantidadPendienteVincular">
<Columns>
<asp:BoundField HeaderText="Folio" DataField="Folio" />
<asp:BoundField HeaderText="Fecha" DataFormatString="{0:d}" ItemStyle-HorizontalAlign="Center" DataField="Fecha" />
<asp:BoundField HeaderText="Cantidad" DataField="CantidadPendienteVincular" DataFormatString="{0:#,###}" ItemStyle-HorizontalAlign="Right" />
<asp:TemplateField HeaderText="Cancelar" ItemStyle-HorizontalAlign="Center" >
<ItemTemplate>
<asp:LinkButton ID="LnkCancelarOCDetalle" OnClick="LnkCancelarOCDetalle_Click" runat="server" AlternateText="Editar" CausesValidation="False"
data-toggle="confirmation" data-popout="true" data-original-title="¿Está seguro que desea cancelar la partida?" data-btn-ok-label="si"
CssClass="btn btn-circle btn-sm red" Text="<i class='fa fa-minus'></i>" />
</ItemTemplate>
</asp:TemplateField>
</Columns>
</asp:GridView>
</div>
</div>
<div class="modal-footer">
<button type="button" class="btn btn-primary" data-dismiss="modal">Cerrar</button>
</div>
</div>
</ContentTemplate>
</asp:UpdatePanel>
</div>
<div id="ModalTiposAlmacen" class="modal ADS fade" role="dialog">
<asp:UpdatePanel ID="UpTiposAlmacen" class="modal-dialog rowpadding" tabindex="-1" runat="server" UpdateMode="Conditional">
<ContentTemplate>

View File

@@ -31,6 +31,7 @@ Partial Class Inventarios_Kardex
End Set
End Property
#End Region
Protected Sub Page_Load(sender As Object, e As EventArgs) Handles Me.Load
@@ -315,6 +316,11 @@ Partial Class Inventarios_Kardex
LtIndicador_MensajeSerie.Text = ""
End If
If UsuarioActual.Empresa.Funcionalidad(382) = "1" Then
CargarOCPendientesCompra()
DivIndicadorOC.Visible = True
End If
UpIndicadores.Update()
GvM.Attributes.Add("data-heighterror", "430")
@@ -330,6 +336,17 @@ Partial Class Inventarios_Kardex
End If
End Sub
Private Sub CargarOCPendientesCompra()
Dim ObjOC As New ClsOC
If ObjOC.PendientesCompra(ddlProducto2.SelectedValue.ToEntero, UsuarioActual.CveEmpresa) Then
GvOC.DataSource = ObjOC.DtResultados.Copy
LnkIndicador_OC.Text = ObjOC.DtResultados.Copy.SUM("CantidadPendienteVincular").ToString()
End If
ObjOC.Dispose()
GvOC.DataBind()
UpModalOC.Update()
End Sub
Private Function CargarKardex(CvePS As Integer) As DataTable
Dim dt As DataTable = Nothing
@@ -713,4 +730,29 @@ Partial Class Inventarios_Kardex
Return CvePSRespuesta
End Function
Protected Sub LnkIndicador_OC_Click(sender As Object, e As EventArgs)
UpModalOC.Update()
RegistraScript(String.Format("$('#{0}').modal('show');", "ModalOC"))
End Sub
Protected Sub LnkCancelarOCDetalle_Click(sender As Object, e As EventArgs)
Dim GvRow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).BindingContainer, GridViewRow)
Dim CveOrdenCompraDetalle As Integer = GvRow.DataKey("CveOrdenCompraDetalle").ToEntero
Dim NuevaCantidad As Decimal = GvRow.DataKey("CantidadPendienteVincular").ToDecimal
If CveOrdenCompraDetalle <= 0 Then
Exit Sub
End If
Dim ObjOC As New ClsOC
If ObjOC.CancelarPartidaPendiente(CveOrdenCompraDetalle, NuevaCantidad, UsuarioActual.CveEmpresa) Then
CargarOCPendientesCompra()
Alert("La partida se cancelo correctamente.")
End If
ObjOC.Dispose()
UpIndicadores.Update()
End Sub
End Class