--FIX facturacion de remision ayven

This commit is contained in:
JPerez
2025-05-28 11:07:18 -07:00
parent fd9762c7af
commit 205cdbcef0
2 changed files with 2 additions and 2 deletions

View File

@@ -1579,7 +1579,7 @@
let total = totalEfectivo + totalCredito + totalDebito + totalCheque + totalTransferencia;
if (<%= If(UsuarioActual.Empresa.CveEmpresa = 189, 1, 0)%> == 1) {
if (<%= If(UsuarioActual.Empresa.Funcionalidad(382) = "1", 1, 0)%> == 1) {
let totalAnticipos = $get("TxtNCDev") ? ToDouble($get("TxtNCDev").value) : 0;
TotalOtrosContado = $get("TxtImporteOtrosContado") ? ToDouble($get("TxtImporteOtrosContado").value) : 0;

View File

@@ -17006,7 +17006,7 @@ Partial Class Ventas
End If
If UsuarioActual.CveEmpresa <> 189 AndAlso UsuarioActual.Empresa.Funcionalidad(567) = "1" AndAlso factura.TipoDocto.Contiene("Rem") AndAlso DivAlmacen.Visible AndAlso GvInv.Rows.Cast(Of GridViewRow)().Count(Function(gvr) gvr.FCCheckBox("cbInv").Checked) > 0 Then
If (Not UsuarioActual.CveEmpresa.Contiene(189, 197)) AndAlso UsuarioActual.Empresa.Funcionalidad(567) = "1" AndAlso factura.TipoDocto.Contiene("Rem") AndAlso DivAlmacen.Visible AndAlso GvInv.Rows.Cast(Of GridViewRow)().Count(Function(gvr) gvr.FCCheckBox("cbInv").Checked) > 0 Then
Dim DebeGenerarMovimiento As Boolean = TmpDTDetalle.COUNT("CvePS", "CveTipoPS = 2") > 0