From 3e84c752fb05a0c06b648d55c0207f5b17e54f62 Mon Sep 17 00:00:00 2001
From: Jonathan Alexis Perez Morales <jonathan.perez@adssistemas.mx>
Date: Tue, 30 Mar 2021 10:12:17 -0700
Subject: [PATCH] =?UTF-8?q?BDH.No=20arroja=20total=20o=20cambio=20en=20pag?=
 =?UTF-8?q?o=20diferido,=20ejemplo=20si=20el=20pago=20se=20va=20hacer=2050?=
 =?UTF-8?q?%=20con=20tarjeta=20y=20el=20otro=2050%=20en=20efectiv=C3=B3.Us?=
 =?UTF-8?q?ados=20no=20se=20ordenan=20al=20momento=20de=20registrar=20una?=
 =?UTF-8?q?=20venta.?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 Ventas/PV.aspx        | 10 ++++++++--
 Ventas/Ventas.aspx    | 12 +++++++++---
 Ventas/Ventas.aspx.vb | 17 +++++++++++++++--
 3 files changed, 32 insertions(+), 7 deletions(-)

diff --git a/Ventas/PV.aspx b/Ventas/PV.aspx
index 785aa3c2f..2786cb0f2 100644
--- a/Ventas/PV.aspx
+++ b/Ventas/PV.aspx
@@ -1229,7 +1229,7 @@
                                                                     <div class="row">
                                                                         <div class="col-md-6">
                                                                         </div>
-                                                                        <label class="col-md-2">Cambio:</label>
+                                                                        <label id="lblCambio" class="col-md-2">Cambio:</label>
                                                                         <div class="col-md-4 input-icon">
                                                                             <i style="margin: 0px;">$</i>
                                                                             <asp:TextBox ID="TxtCambio" CssClass="form-control input-sm " Enabled="false" runat="server" MaxLength="12" Width="100px" ClientIDMode="Static" Style="text-align: right;"></asp:TextBox>
@@ -3483,9 +3483,15 @@
             var totalVenta = ToDouble($get('TxtTotal').value);
 
             if (total > totalVenta) {
+                lblCambio.innerHTML = "Cambio:"
                 $get("TxtCambio").value = FormatoNumero(total - totalVenta);
             } else {
-                $get("TxtCambio").value = "0.00";
+                if ('<%= UsuarioActual.Empresa.Funcionalidad(531) %>' == '1') {
+                    lblCambio.innerHTML = "Faltante:"
+                    $get("TxtCambio").value = FormatoNumero(total - totalVenta);
+                } else {
+                    $get("TxtCambio").value = "$0.00"
+                }
             }
 
             $get("TxtImporteContado").value = total;
diff --git a/Ventas/Ventas.aspx b/Ventas/Ventas.aspx
index f7efff712..c0658934e 100644
--- a/Ventas/Ventas.aspx
+++ b/Ventas/Ventas.aspx
@@ -3366,7 +3366,7 @@
                                                                     <div class="row">
                                                                         <div class="col-md-6">
                                                                         </div>
-                                                                        <label class="col-md-2">Cambio:</label>
+                                                                         <label id="lblCambio" class="col-md-2">Cambio:</label>
                                                                         <div class="col-md-4 input-icon">
                                                                             <i style="margin: 0px;">$</i>
                                                                             <asp:TextBox ID="TxtCambio" CssClass="form-control input-sm " Enabled="false" runat="server" MaxLength="12" Width="100px" ClientIDMode="Static" Style="text-align: right;"></asp:TextBox>
@@ -7827,12 +7827,18 @@
             var totalVenta = ToDouble($get('TxtTotal').value);
 
             if (total > totalVenta) {
+                lblCambio.innerHTML = "Cambio:"
                 $get("TxtCambio").value = FormatoNumero(total - totalVenta);
             } else {
-                $get("TxtCambio").value = "0.00";
+                if ('<%= UsuarioActual.Empresa.Funcionalidad(531) %>' == '1') {
+                    lblCambio.innerHTML = "Faltante:"
+                    $get("TxtCambio").value = FormatoNumero(total - totalVenta, 2);
+                } else {
+                    $get("TxtCambio").value = "$0.00"
+                }
             }
 
-            $get("TxtImporteContado").value = total - totalRNC - totalAmortizado - totalProntoPago;
+            $get("TxtImporteContado").value = FormatoNumero(total - totalRNC - totalAmortizado - totalProntoPago,2);
         }
 
         // ****************************************************************************************************************************************************************************
diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb
index 91f8bf7fb..360018adf 100644
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -16743,7 +16743,16 @@ Partial Class Ventas
             Row("SubProyecto") = SubProyecto
             Row("Serie") = Serie
             Row("TiempoEntrega") = TiempoEntrega
-            Row("Orden") = TmpDT.Rows.Count + 1
+            If Modalidad = "U" Then
+                Row("Orden") = Index
+            Else
+                Dim ConsecutivoActual As Integer = TmpDT.MAX("Consec").ToEntero()
+                If ConsecutivoActual < 0 Then
+                    ConsecutivoActual = 0
+                End If
+                Row("Orden") = ConsecutivoActual + 1
+            End If
+
             Row("Cantidad") = Cantidad
             Row("CveUM") = CveUM
             Row("UM") = UM
@@ -16823,7 +16832,11 @@ Partial Class Ventas
             If Modalidad = "U" Then
                 Row("Consec") = Index
             Else
-                Row("Consec") = TmpDT.Rows.Count + 1
+                Dim ConsecutivoActual As Integer = TmpDT.MAX("Consec").ToEntero()
+                If ConsecutivoActual < 0 Then
+                    ConsecutivoActual = 0
+                End If
+                Row("Consec") = ConsecutivoActual + 1
             End If
 
             Row("PS") = DrPS("PS")