From d18a4d9d1d92658ec0b0d7fa24087eab51739325 Mon Sep 17 00:00:00 2001
From: janeth arvizu <janeth.arvizu@adssistemas.mx>
Date: Thu, 31 Oct 2019 14:00:57 -0700
Subject: [PATCH 1/2] Cambios de BDH

---
 Empresas/Grales/Formatos/Ajuste.rdlc | 66 +++++++++++++++++++++++++---
 Ventas/PV.aspx                       |  5 ++-
 Ventas/PV.aspx.vb                    |  3 +-
 3 files changed, 65 insertions(+), 9 deletions(-)

diff --git a/Empresas/Grales/Formatos/Ajuste.rdlc b/Empresas/Grales/Formatos/Ajuste.rdlc
index 15c7410b4..8ffdfc413 100644
--- a/Empresas/Grales/Formatos/Ajuste.rdlc
+++ b/Empresas/Grales/Formatos/Ajuste.rdlc
@@ -419,7 +419,7 @@
                 <Style />
               </TextRun>
               <TextRun>
-                <Value>=Year(Parameters!Fecha.Value)</Value>
+                <Value>=Year(Parameters!FechaInst.Value)</Value>
                 <Style />
               </TextRun>
             </TextRuns>
@@ -463,7 +463,7 @@
                 <Style />
               </TextRun>
               <TextRun>
-                <Value>=Day(Parameters!Fecha.Value)</Value>
+                <Value>=Day(Parameters!FechaInst.Value)</Value>
                 <Style />
               </TextRun>
             </TextRuns>
@@ -502,7 +502,7 @@
                 <Style />
               </TextRun>
               <TextRun>
-                <Value>= MonthName(Month(Parameters!Fecha.Value))</Value>
+                <Value>= MonthName(Month(Parameters!FechaInst.Value))</Value>
                 <Style />
               </TextRun>
             </TextRuns>
@@ -577,7 +577,11 @@
           <Paragraph>
             <TextRuns>
               <TextRun>
-                <Value>Año:</Value>
+                <Value>Año: </Value>
+                <Style />
+              </TextRun>
+              <TextRun>
+                <Value>= Year(Parameters!Fecha.Value)</Value>
                 <Style />
               </TextRun>
             </TextRuns>
@@ -617,7 +621,11 @@
           <Paragraph>
             <TextRuns>
               <TextRun>
-                <Value>Día:</Value>
+                <Value>Día: </Value>
+                <Style />
+              </TextRun>
+              <TextRun>
+                <Value>=Day(Parameters!Fecha.Value)</Value>
                 <Style />
               </TextRun>
             </TextRuns>
@@ -652,7 +660,11 @@
           <Paragraph>
             <TextRuns>
               <TextRun>
-                <Value>Mes:</Value>
+                <Value>Mes: </Value>
+                <Style />
+              </TextRun>
+              <TextRun>
+                <Value>= MonthName(Month(Parameters!Fecha.Value))</Value>
                 <Style />
               </TextRun>
             </TextRuns>
@@ -1725,6 +1737,40 @@
           <PaddingBottom>2pt</PaddingBottom>
         </Style>
       </Textbox>
+      <Textbox Name="Textbox48">
+        <CanGrow>true</CanGrow>
+        <KeepTogether>true</KeepTogether>
+        <Paragraphs>
+          <Paragraph>
+            <TextRuns>
+              <TextRun>
+                <Value>=Parameters!Fecha.Value</Value>
+                <Style>
+                  <Format>d' de 'MMMM' de 'yyyy</Format>
+                </Style>
+              </TextRun>
+            </TextRuns>
+            <Style>
+              <TextAlign>Center</TextAlign>
+            </Style>
+          </Paragraph>
+        </Paragraphs>
+        <rd:DefaultName>Textbox46</rd:DefaultName>
+        <Top>5.70014in</Top>
+        <Left>0.70708in</Left>
+        <Height>0.25in</Height>
+        <Width>3.03125in</Width>
+        <ZIndex>46</ZIndex>
+        <Style>
+          <Border>
+            <Style>None</Style>
+          </Border>
+          <PaddingLeft>2pt</PaddingLeft>
+          <PaddingRight>2pt</PaddingRight>
+          <PaddingTop>2pt</PaddingTop>
+          <PaddingBottom>2pt</PaddingBottom>
+        </Style>
+      </Textbox>
     </ReportItems>
     <Height>6.57167in</Height>
     <Style />
@@ -1769,7 +1815,7 @@
       <AllowBlank>true</AllowBlank>
       <Prompt>ReportParameter1</Prompt>
     </ReportParameter>
-    <ReportParameter Name="Fecha">
+    <ReportParameter Name="FechaInst">
       <DataType>DateTime</DataType>
       <Nullable>true</Nullable>
       <Prompt>ReportParameter1</Prompt>
@@ -1816,7 +1862,13 @@
       <AllowBlank>true</AllowBlank>
       <Prompt>ReportParameter1</Prompt>
     </ReportParameter>
+    <ReportParameter Name="Fecha">
+      <DataType>DateTime</DataType>
+      <Nullable>true</Nullable>
+      <Prompt>ReportParameter1</Prompt>
+    </ReportParameter>
   </ReportParameters>
+  <Language>Es-MX</Language>
   <rd:ReportUnitType>Inch</rd:ReportUnitType>
   <rd:ReportID>32a58a02-ed5a-499c-85e0-a4eefc333287</rd:ReportID>
 </Report>
\ No newline at end of file
diff --git a/Ventas/PV.aspx b/Ventas/PV.aspx
index 4c2765223..1656bb36f 100644
--- a/Ventas/PV.aspx
+++ b/Ventas/PV.aspx
@@ -2821,7 +2821,9 @@
                                                         <div class="col-md-6">
                                                             <div class="form-group form-md-line-input input-iconright">
                                                                 <asp:TextBox ID="TxtCodEnsamble" CssClass="form-control" runat="server" MaxLength="50"></asp:TextBox>
-                                                                <%--<asp:RequiredFieldValidator ID="RFVCodEnsamble" runat="server" ControlToValidate="TxtCodEnsamble" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Folio''</b> es necesario, por favor ingréselo." ValidationGroup="VGMAjuste"></asp:RequiredFieldValidator>--%>
+                                                                <asp:RegularExpressionValidator ID="REVCodEnsamble" runat="server" ControlToValidate="TxtCodEnsamble" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Cod.Ensamble''</b> es incorrecto, por favor ingréselo correctamente." ValidationGroup="GrpAddVenta" ValidationExpression="^[0-9][A-HJ-M]([[0-2][1-9]|3[0-1])$"></asp:RegularExpressionValidator>
+                                                                <ajax:FilteredTextBoxExtender ID="FilteredTextBoxExtender2" TargetControlID="TxtCodEnsamble" FilterType="UppercaseLetters, Numbers,LowercaseLetters, Custom" runat="server" ValidChars="&Ñ" InvalidChars="-" />
+                                                                <%--<asp:RequiredFieldValidator ID="RFVCodEnsamble" runat="server" ControlToValidate="TxtCodEnsamble" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Folio''</b> es necesario, por favor ingréselo." ValidationGroup="VGMAjuste"></asp:RequiredFieldValidator>--%
                                                                 <%--<ajax:ValidatorCalloutExtender ID="VCECodEnsamble" runat="server" HighlightCssClass="vco" TargetControlID="RFVCodEnsamble"></ajax:ValidatorCalloutExtender>--%>
                                                                 <label for="<%= TxtCodEnsamble.ClientID.ToString()%>">Cod.Ensamble:</label>
                                                             </div>
@@ -2868,6 +2870,7 @@
                                                         <div class="col-md-6">
                                                             <div class="form-group form-md-line-input input-iconright">
                                                                 <asp:TextBox ID="TxtCodInspeccion" CssClass="form-control" runat="server" MaxLength="50"></asp:TextBox>
+                                                                <ajax:MaskedEditExtender TargetControlID="TxtCodInspeccion" ID="MEECodInspeccion" runat="server" Mask="L9?L" AutoComplete="True" AutoCompleteValue="0" />
                                                                 <%--<asp:RequiredFieldValidator ID="RFVCodInspeccion" runat="server" ControlToValidate="TxtCodInspeccion" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Cod. Inspeccion''</b> es necesario, por favor ingréselo." ValidationGroup="VGMAjuste"></asp:RequiredFieldValidator>--%>
                                                                 <%--<ajax:ValidatorCalloutExtender ID="VCECodInspeccion" runat="server" HighlightCssClass="vco" TargetControlID="RFVCodInspeccion"></ajax:ValidatorCalloutExtender>--%>
                                                                 <label for="<%= TxtCodInspeccion.ClientID.ToString()%>">Cod. Inspección:</label>
diff --git a/Ventas/PV.aspx.vb b/Ventas/PV.aspx.vb
index 9091c4b61..842f54ca4 100644
--- a/Ventas/PV.aspx.vb
+++ b/Ventas/PV.aspx.vb
@@ -5660,7 +5660,8 @@ Partial Class PV
         params.Add(New ReportParameter("FolioAcuse", If(DdlFolioGarantia.SelectedValue.ToEntero = -1, "", DdlFolioGarantia.SelectedItem.Text)))
 
         'Informacion de Garantia o ajuste
-        params.Add(New ReportParameter("Fecha", TxtFechaAjuste.Text.Trim))
+        params.Add(New ReportParameter("FechaInst", TxtFechaAjuste.Text.Trim))
+        params.Add(New ReportParameter("Fecha", Now.ToShortDateString))
         params.Add(New ReportParameter("Defecto", If(DdlTipoDefecto.SelectedValue.ToEntero = -1, "", DdlTipoDefecto.SelectedItem.Text)))
         params.Add(New ReportParameter("MesesUso", TxtMesesUso.Text.Trim))
         params.Add(New ReportParameter("PorcentajeAjuste", TxtPorcentajeAjuste.Text.Trim))

From ec13d9d1e6262eff1dcab11ec812caeda0a1758e Mon Sep 17 00:00:00 2001
From: Rakcsle Supertramp <rakcsle@outlook.com>
Date: Thu, 31 Oct 2019 16:03:22 -0700
Subject: [PATCH 2/2] empresa 145  IVA  excepcion, Repnotas de credito

---
 App_Code/ClsContPAQi.vb         | 2 +-
 Compras/RepNotasCredito.aspx.vb | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/App_Code/ClsContPAQi.vb b/App_Code/ClsContPAQi.vb
index 57b8483c9..e5cd3194c 100644
--- a/App_Code/ClsContPAQi.vb
+++ b/App_Code/ClsContPAQi.vb
@@ -443,7 +443,7 @@ Public Class ClsContPAQi
         End If
 
         ' no puede ser menor el subtotal al IVA, para evitar numeros negativos, excepto VSH
-        If Not CveEmpresa.Contiene(4, 7, 11, 12, 122) Then
+        If Not CveEmpresa.Contiene(4, 7, 11, 12, 122, 145) Then
             If Math.Abs(SubTotal) < Math.Abs(IVA) Then
                 Return False
             End If
diff --git a/Compras/RepNotasCredito.aspx.vb b/Compras/RepNotasCredito.aspx.vb
index cd955ec5c..126a82d29 100644
--- a/Compras/RepNotasCredito.aspx.vb
+++ b/Compras/RepNotasCredito.aspx.vb
@@ -169,7 +169,7 @@ Partial Class Compras_RepNotasCredito
                     MsgError = "Ocurrio un Error al saldar el movimiento"
                 End If
 
-                If TC <> TCCompra AndAlso CveMoneda > 1 AndAlso UsaComplementaria Then
+                If TC <> TCCompra AndAlso CveMoneda > 1 Then
                     Dim difFluctuacion As Decimal = TC - TCCompra
                     Dim CveConceptoFluctua As Integer = 64 '64.ganacia, 65.perdida
                     Dim TipoMovtoFluctua As Boolean = True