cambios en vinculacion OC
This commit is contained in:
rrene
@@ -1464,7 +1464,7 @@
|
||||
|
||||
<asp:GridView runat="server" ID="GvOC1" AutoGenerateColumns="false"
|
||||
GridLines="None" UseAccessibleHeader="true" EmptyDataText="No se encontraron registros." CssClass="table table-striped table-hover Widthall Sortable" RowStyle-HorizontalAlign="Center"
|
||||
DataKeyNames="CantidadF,FolioREQ,CveProveedorSucursal,PS,CantidadDisponible,IEPSPS,IVA,RetIVA,RetISR,Descuento,IVAPorcentaje,RetIVAPorcentaje,RetISRPorcentaje,IEPSPSPorcentaje,IEPSPSIVAPorcentaje,Cantidad,CveProveedorOC">
|
||||
DataKeyNames="CantidadF,FolioREQ,CveProveedorSucursal,PS,CantidadPendienteVincular,IEPSPS,IVA,RetIVA,RetISR,Descuento,IVAPorcentaje,RetIVAPorcentaje,RetISRPorcentaje,IEPSPSPorcentaje,IEPSPSIVAPorcentaje,Cantidad,CveProveedorOC">
|
||||
|
||||
<Columns>
|
||||
<asp:TemplateField HeaderText="Folio" ItemStyle-Width="10%" Visible="false">
|
||||
@@ -1480,7 +1480,7 @@
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="Cantidad" ItemStyle-Width="10%">
|
||||
<ItemTemplate>
|
||||
<asp:TextBox ID="TxtCantidad" Text='<%# Eval("CantidadDisponible", "{0:#,##0.00####}")%>' runat="server" Width="50px" Style="text-align: right;" />
|
||||
<asp:TextBox ID="TxtCantidad" Text='<%# Eval("CantidadPendienteVincular", "{0:#,##0.00####}")%>' runat="server" Width="50px" Style="text-align: right;" />
|
||||
<ajax:FilteredTextBoxExtender ID="FTETxtCantidad" runat="server" TargetControlID="TxtCantidad" FilterType="Custom, Numbers" ValidChars="." />
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
@@ -1518,7 +1518,7 @@
|
||||
<asp:TemplateField HeaderText="Total" ItemStyle-Width="10%">
|
||||
<ItemTemplate>
|
||||
<%--<asp:Label Text='<%# Eval("Total", "{0:N2}")%>' runat="server" ID="LbTotalOC" />--%>
|
||||
<asp:TextBox CssClass="TextBoxAsLabel" Width="85px" ID="TxtTotalOC1" Enabled="false" Text='<%# (CDbl(Eval("ImporteAjustadoDescuento").ToString) * CDbl(Eval("CantidadDisponible").ToString)).ToString("N2") %>' runat="server" />
|
||||
<asp:TextBox CssClass="TextBoxAsLabel" Width="85px" ID="TxtTotalOC1" Enabled="false" Text='<%# (CDbl(Eval("ImporteAjustadoDescuento").ToString) * CDbl(Eval("CantidadPendienteVincular").ToString)).ToString("N2") %>' runat="server" />
|
||||
<asp:HiddenField runat="server" ID="HdnOC1IVA" Value='<%# Eval("IVA")%>' />
|
||||
<asp:HiddenField runat="server" ID="HdnOC1IEPSImporte" Value='<%# Eval("IEPSPS")%>' />
|
||||
<asp:HiddenField runat="server" ID="HdnOC1IEPSIVA" Value='<%# Eval("IEPSPSIVA")%>' />
|
||||
@@ -2804,9 +2804,9 @@
|
||||
<ItemStyle HorizontalAlign="Center" Width="10%" />
|
||||
</asp:TemplateField>
|
||||
<asp:HyperLinkField HeaderText="SerieFolio" DataTextField="SerieFolio" Target="_blank" DataNavigateUrlFields="CveCompra" DataNavigateUrlFormatString="/Compras/Compras.aspx?={0}" />
|
||||
<asp:BoundField HeaderText="Original" DataField="CantidadC" DataFormatString="{0:#,##0.##}" ItemStyle-HorizontalAlign="Right" ItemStyle-Width="5%" />
|
||||
<asp:BoundField HeaderText="Surtido" DataField="CantidadS" DataFormatString="{0:#,##0.##}" ItemStyle-HorizontalAlign="Right" ItemStyle-Width="5%" />
|
||||
<asp:BoundField HeaderText="Pendiente" DataField="CantidadF" DataFormatString="{0:#,##0.##}" ItemStyle-HorizontalAlign="Right" ItemStyle-Width="5%" />
|
||||
<asp:BoundField HeaderText="Original" DataField="Cantidad" DataFormatString="{0:#,##0.##}" ItemStyle-HorizontalAlign="Right" ItemStyle-Width="5%" />
|
||||
<asp:BoundField HeaderText="Surtido" DataField="CantidadSurtidaAlmacen" DataFormatString="{0:#,##0.##}" ItemStyle-HorizontalAlign="Right" ItemStyle-Width="5%" />
|
||||
<asp:BoundField HeaderText="Pendiente" DataField="CantidadDisponibleInv" DataFormatString="{0:#,##0.##}" ItemStyle-HorizontalAlign="Right" ItemStyle-Width="5%" />
|
||||
<asp:BoundField HeaderText="Unidad" DataField="UM" ItemStyle-HorizontalAlign="Left" ItemStyle-Width="7.5%" />
|
||||
<asp:BoundField HeaderText="Producto" DataField="CodigoPS" ItemStyle-HorizontalAlign="Left" ItemStyle-Width="30%" />
|
||||
<asp:BoundField HeaderText="P.U." DataField="PU" DataFormatString="{0:#,##0.####}" ItemStyle-HorizontalAlign="Right" ItemStyle-Width="7.5%" />
|
||||
|
||||
@@ -14802,14 +14802,14 @@ Partial Class Compras_Compras
|
||||
End Sub
|
||||
Private Sub CargaVinculacionOC(Optional CargaInicial As Boolean = False)
|
||||
'FILTRAMOS SOLO PENDIENTES POR SURTIR
|
||||
DTOCGV = DTOCTemp.FiltraParametros("CantidadDisponible > 0", "CveOrdenCompra").Copy
|
||||
DTOCGV = DTOCTemp.FiltraParametros("CantidadPendienteVincular > 0", "CveOrdenCompra").Copy
|
||||
|
||||
'SI PUEDE RECIBIR POR OC Y COMPRA
|
||||
If UsuarioActual.CveEmpresa.Contiene(119) Then
|
||||
If UsuarioActual.Empresa.UsaInventarios And UsuarioActual.Empresa.Funcionalidad(131).ToEntero > 0 And Not UsuarioActual.Empresa.Funcionalidad(153).ToEntero > 0 Then
|
||||
Select Case DdlOCVinculaInv.SelectedValue.ToEntero
|
||||
Case 176
|
||||
DTOCGV = DTOCGV.FiltraParametros("((EstatusInventario IN (3,5) AND CveTipoPS = 2) OR CveTipoPS = 1) AND CantidadPorAdelantado > 0")
|
||||
DTOCGV = DTOCGV.FiltraParametros("((EstatusInventario IN (3,5) AND CveTipoPS = 2) OR CveTipoPS = 1)")
|
||||
Case 205
|
||||
DTOCGV = DTOCGV.FiltraParametros("(EstatusInventario IN (1,2) AND CveTipoPS = 2) OR CveTipoPS = 1")
|
||||
End Select
|
||||
@@ -14878,7 +14878,7 @@ Partial Class Compras_Compras
|
||||
|
||||
Dim Cont As Integer = 0
|
||||
For Each gvr As GridViewRow In GvOC1.Rows
|
||||
RegistraScript($"CalculaTotalOCEdit('{gvr.DataKey("PS").Replace("'", "")}', {gvr.DataKey("CantidadDisponible").ToString.ToDouble}, {gvr.FCTextBox("TxtCantidad").ClientID}, {gvr.FCTextBox("TxtPU").ClientID}, {gvr.FCTextBox("TxtTotalOC1").ClientID}, {gvr.DataKey("IEPSPS").ToString.ToDouble},{gvr.FCHiddenField("HdnOC1IEPSImporte").ClientID}, {gvr.DataKey("IVA").ToString.ToDouble},{gvr.FCHiddenField("HdnOC1IVA").ClientID},{gvr.DataKey("RetIVA").ToString.ToDouble},{gvr.FCHiddenField("HdnOC1RetIVA").ClientID},{gvr.DataKey("RetISR").ToString.ToDouble},{gvr.FCHiddenField("HdnOC1RetISR").ClientID},{gvr.DataKey("IEPSPS").ToString.ToDouble},{gvr.FCHiddenField("HdnOC1IEPSIVA").ClientID},{gvr.DataKey("Descuento")},{gvr.FCHiddenField("HdnOC1Descuento").ClientID},{gvr.DataKey("IVAPorcentaje").ToString.ToDouble},{gvr.DataKey("RetIVAPorcentaje").ToString.ToDouble},{gvr.DataKey("RetISRPorcentaje").ToString.ToDouble},{gvr.DataKey("IEPSPSPorcentaje").ToString.ToDouble},{gvr.DataKey("IEPSPSIVAPorcentaje").ToString.ToDouble});", $"Gv{Cont}")
|
||||
RegistraScript($"CalculaTotalOCEdit('{gvr.DataKey("PS").Replace("'", "")}', {gvr.DataKey("CantidadPendienteVincular").ToString.ToDouble}, {gvr.FCTextBox("TxtCantidad").ClientID}, {gvr.FCTextBox("TxtPU").ClientID}, {gvr.FCTextBox("TxtTotalOC1").ClientID}, {gvr.DataKey("IEPSPS").ToString.ToDouble},{gvr.FCHiddenField("HdnOC1IEPSImporte").ClientID}, {gvr.DataKey("IVA").ToString.ToDouble},{gvr.FCHiddenField("HdnOC1IVA").ClientID},{gvr.DataKey("RetIVA").ToString.ToDouble},{gvr.FCHiddenField("HdnOC1RetIVA").ClientID},{gvr.DataKey("RetISR").ToString.ToDouble},{gvr.FCHiddenField("HdnOC1RetISR").ClientID},{gvr.DataKey("IEPSPS").ToString.ToDouble},{gvr.FCHiddenField("HdnOC1IEPSIVA").ClientID},{gvr.DataKey("Descuento")},{gvr.FCHiddenField("HdnOC1Descuento").ClientID},{gvr.DataKey("IVAPorcentaje").ToString.ToDouble},{gvr.DataKey("RetIVAPorcentaje").ToString.ToDouble},{gvr.DataKey("RetISRPorcentaje").ToString.ToDouble},{gvr.DataKey("IEPSPSPorcentaje").ToString.ToDouble},{gvr.DataKey("IEPSPSIVAPorcentaje").ToString.ToDouble});", $"Gv{Cont}")
|
||||
Cont += 1
|
||||
Next
|
||||
|
||||
@@ -14894,8 +14894,8 @@ Partial Class Compras_Compras
|
||||
Protected Sub GvOC1_RowDataBound(sender As Object, e As GridViewRowEventArgs) Handles GvOC1.RowDataBound
|
||||
If e.Row.RowType = DataControlRowType.DataRow Then
|
||||
|
||||
Dim JSCambiaScript = $"CalculaTotalOCEdit('{e.Row.DBCampo("PS").Replace("'", "")}', {e.Row.DBCampo("CantidadDisponible").ToString.ToDouble}, {e.Row.FCTextBox("TxtCantidad").ClientID}, {e.Row.FCTextBox("TxtPU").ClientID}, {e.Row.FCTextBox("TxtTotalOC1").ClientID}, {e.Row.DBCampo("IEPSPS").ToString.ToDouble},{e.Row.FCHiddenField("HdnOC1IEPSImporte").ClientID}, {e.Row.DBCampo("IVA").ToString.ToDouble},{e.Row.FCHiddenField("HdnOC1IVA").ClientID},{e.Row.DBCampo("RetIVA").ToString.ToDouble},{e.Row.FCHiddenField("HdnOC1RetIVA").ClientID},{e.Row.DBCampo("RetISR").ToString.ToDouble},{e.Row.FCHiddenField("HdnOC1RetISR").ClientID},{e.Row.DBCampo("IEPSPS").ToString.ToDouble},{e.Row.FCHiddenField("HdnOC1IEPSIVA").ClientID},{e.Row.DBCampo("Descuento")},{e.Row.FCHiddenField("HdnOC1Descuento").ClientID},{e.Row.DBCampo("IVAPorcentaje").ToString.ToDouble},{e.Row.DBCampo("RetIVAPorcentaje").ToString.ToDouble},{e.Row.DBCampo("RetISRPorcentaje").ToString.ToDouble},{e.Row.DBCampo("IEPSPSPorcentaje").ToString.ToDouble},{e.Row.DBCampo("IEPSPSIVAPorcentaje").ToString.ToDouble});"
|
||||
e.Row.FCTextBox("TxtCantidad").Attributes.Add("onkeyup", $"LimitaCantidadOC({e.Row.DBCampo("CantidadDisponible")}, this);{JSCambiaScript}")
|
||||
Dim JSCambiaScript = $"CalculaTotalOCEdit('{e.Row.DBCampo("PS").Replace("'", "")}', {e.Row.DBCampo("CantidadPendienteVincular").ToString.ToDouble}, {e.Row.FCTextBox("TxtCantidad").ClientID}, {e.Row.FCTextBox("TxtPU").ClientID}, {e.Row.FCTextBox("TxtTotalOC1").ClientID}, {e.Row.DBCampo("IEPSPS").ToString.ToDouble},{e.Row.FCHiddenField("HdnOC1IEPSImporte").ClientID}, {e.Row.DBCampo("IVA").ToString.ToDouble},{e.Row.FCHiddenField("HdnOC1IVA").ClientID},{e.Row.DBCampo("RetIVA").ToString.ToDouble},{e.Row.FCHiddenField("HdnOC1RetIVA").ClientID},{e.Row.DBCampo("RetISR").ToString.ToDouble},{e.Row.FCHiddenField("HdnOC1RetISR").ClientID},{e.Row.DBCampo("IEPSPS").ToString.ToDouble},{e.Row.FCHiddenField("HdnOC1IEPSIVA").ClientID},{e.Row.DBCampo("Descuento")},{e.Row.FCHiddenField("HdnOC1Descuento").ClientID},{e.Row.DBCampo("IVAPorcentaje").ToString.ToDouble},{e.Row.DBCampo("RetIVAPorcentaje").ToString.ToDouble},{e.Row.DBCampo("RetISRPorcentaje").ToString.ToDouble},{e.Row.DBCampo("IEPSPSPorcentaje").ToString.ToDouble},{e.Row.DBCampo("IEPSPSIVAPorcentaje").ToString.ToDouble});"
|
||||
e.Row.FCTextBox("TxtCantidad").Attributes.Add("onkeyup", $"LimitaCantidadOC({e.Row.DBCampo("CantidadPendienteVincular")}, this);{JSCambiaScript}")
|
||||
e.Row.FCTextBox("TxtPU").Attributes.Add("onkeyup", JSCambiaScript)
|
||||
|
||||
e.Row.FCTextBox("TxtCantidad").Attributes.Add("onblur", $"ValidaImporteCero('{e.Row.DBCampo("PS").Replace("'", "")}',{e.Row.FCTextBox("TxtCantidad").ClientID}, {e.Row.FCTextBox("TxtPU").ClientID});")
|
||||
@@ -15207,7 +15207,7 @@ Partial Class Compras_Compras
|
||||
TmpDT.Rows(Index)("TipoAF") = 1
|
||||
End If
|
||||
'actualizo los movimientos registrados
|
||||
DTOCGV.Rows(gvr.RowIndex)("CantidadDisponible") = Cantidad
|
||||
DTOCGV.Rows(gvr.RowIndex)("CantidadPendienteVincular") = Cantidad
|
||||
DTOCGV.Rows(gvr.RowIndex)("Importe") = PU
|
||||
DTOCGV.Rows(gvr.RowIndex)("Total") = Total
|
||||
|
||||
@@ -15467,7 +15467,7 @@ Partial Class Compras_Compras
|
||||
TmpDT.Rows(IndexVinculacionOC)("TipoAF") = 1
|
||||
End If
|
||||
'actualizo los movimientos registrados
|
||||
DTOCGV.Rows(gvr.RowIndex)("CantidadDisponible") = Cantidad
|
||||
DTOCGV.Rows(gvr.RowIndex)("CantidadPendienteVincular") = Cantidad
|
||||
DTOCGV.Rows(gvr.RowIndex)("Importe") = PU
|
||||
DTOCGV.Rows(gvr.RowIndex)("Total") = Total
|
||||
End Sub
|
||||
|
||||
Reference in New Issue
Block a user