AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

FERRETERA. --fix de porcentaje de utilidad

Browse Source
This commit is contained in:
Jonathan Alexis Perez Morales
2024-02-26 11:29:41 -07:00
parent 2b77ab846c
commit d27e2ee520
2 changed files with 32 additions and 21 deletions
Download Patch File Download Diff File Expand all files Collapse all files

45
Ventas/Ventas.aspx
View File

@@ -604,7 +604,7 @@
<b>Fecha de Cirugia:</b>
</td>
<td runat="server" id="TdFechaOS2" visible="true">
<asp:TextBox ID="TxtFechaOS" type="datetime-local" runat="server" CausesValidation="true" CssClass="fechahora" style="width: 130px; line-height: 22px;"></asp:TextBox>
<asp:TextBox ID="TxtFechaOS" type="datetime-local" runat="server" CausesValidation="true" CssClass="fechahora" Style="width: 130px; line-height: 22px;"></asp:TextBox>
</td>
</tr>
<tr runat="server" id="TrVentasMedicas3" visible="false">
@@ -9795,44 +9795,55 @@
function CalculaDescPS() {
if ($get("TxtPorPS").value != "") {
var PorcentajeDescuento = parseFloat($get("TxtPorPS").value);
let PorcentajeDescuento = parseFloat($get("TxtPorPS").value);
if (PorcentajeDescuento < 0 || PorcentajeDescuento > 99) {
alert("No se puede aplicar ese porcentaje de descuento");
$get("TxtPorPS").value = "0";
recalcularUtilidad(0);
return;
}
var ivaPor = parseFloat($get("HdnIVADescPS").value) ;
let ivaPor = parseFloat($get("HdnIVADescPS").value) ;
var subTotal = parseFloat($get("LblSubtotalDescPS").innerText.replace(",", "").replace(",", ""));
let subTotal = parseFloat($get("LblSubtotalDescPS").innerText.replace(",", "").replace(",", ""));
$get("LblDescPS").innerText = formato_numero(((subTotal * PorcentajeDescuento) / 100), 2, '.', ',');
var descuento = parseFloat($get("LblDescPS").innerText.replace(",", "").replace(",", ""));
let descuento = parseFloat($get("LblDescPS").innerText.replace(",", "").replace(",", ""));
$get("LblIVADescPS").innerText = formato_numero(((subTotal - descuento) * ivaPor), 2, '.', ',');
var importeIVA =parseFloat($get("LblIVADescPS").innerText.replace(",", "").replace(",", ""));
let importeIVA =parseFloat($get("LblIVADescPS").innerText.replace(",", "").replace(",", ""));
var Total = (subTotal - descuento) + importeIVA;
let Total = (subTotal - descuento) + importeIVA;
$get("LblTotalFinalDescPS").innerText = formato_numero(Total, 2, '.', ',');
$get("HdnDescPS").value = descuento;
var totalCompra = parseFloat($get("HdnTotalCompra").value);
if (totalCompra > 0) {
var totalRedondeado = parseFloat($get("LblTotalFinalDescPS").innerText.replace(",", "").replace(",", ""));
var utilidad = ((totalRedondeado - totalCompra) / totalRedondeado) * 100;
recalcularUtilidad(descuento)
} else {
let subTotal = parseFloat($get("LblSubtotalDescPS").innerText.replace(",", "").replace(",", ""));
$get("LblIVADescPS").innerText = formato_numero((subTotal * ivaPor), 2, '.', ',');
let importeIVA =parseFloat($get("LblIVADescPS").innerText.replace(",", "").replace(",", ""));
let Total = (subTotal) + importeIVA;
$get("LblUtilidadPorcentaje").innerText = formato_numero(utilidad, 2, '.', ',');
}
}
else {
$get("LblTotalFinalDescPS").innerText = "0.00";
$get("LblTotalFinalDescPS").innerText = formato_numero(Total, 2, '.', ',');
$get("LblDescPS").innerText = "0.00";
$get("LblIVADescPS").innerText = "0.00";
$get("LblUtilidadPorcentaje").innerText = "0.00";
$get("HdnDescPS").innerText = "0.00";
recalcularUtilidad(0);
}
}
function recalcularUtilidad(descuento){
let totalCompra = parseFloat($get("HdnTotalCompra").value);
if (totalCompra > 0) {
let subTotal = parseFloat($get("LblSubtotalDescPS").innerText.replace(",", "").replace(",", ""));
let subTotal2 = subTotal - descuento;
let utilidad = ((subTotal2 - totalCompra) / subTotal2) * 100;
$get("LblUtilidadPorcentaje").innerText = formato_numero(utilidad, 2, '.', ',');
}
}

8
Ventas/Ventas.aspx.vb
View File

@@ -24047,13 +24047,13 @@ Partial Class Ventas
Using ObjPS As New ClsProductosServicios
Dim PrecioCompra = ObjPS.GetUltimoPrecioCompra(UsuarioActual.CveEmpresa, GvRow.DataKey("CvePS").ToEntero())
If PrecioCompra > 0 Then
Dim TotalCompra = (PrecioCompra * GvRow.DataKey("Cantidad").ToDouble() * (1 + GvRow.DataKey("IVA").ToDecimal()))
HdnTotalCompra.Value = TotalCompra.ToString()
Dim SubTotalCompra = (PrecioCompra * GvRow.DataKey("Cantidad").ToDouble())
HdnTotalCompra.Value = SubTotalCompra.ToString()
LblPrecioCompra.Text = $"PU Compra: {(PrecioCompra).FormatoNumero(2)}"
Dim TotalRedondeado = GvRow.DataKey("Total").ToDecimal() + GvRow.DataKey("ImporteIVA").ToDecimal()
Dim SubTotal = GvRow.DataKey("Total").ToDecimal()
Dim PorUtilidad = ((TotalRedondeado - TotalCompra) / TotalRedondeado) * 100D
Dim PorUtilidad = ((SubTotal - SubTotalCompra) / SubTotal) * 100D
LblUtilidadPorcentaje.Text = PorUtilidad.FormatoNumero(2)
End If
End Using