From a4bdac27c52c2f977fee06492e0ab766654dd401 Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Thu, 15 Apr 2021 18:51:46 -0700
Subject: [PATCH 01/22] - limpi sobrente/faltante

---
 Bancos/DepositosCaja.aspx.vb | 1 +
 1 file changed, 1 insertion(+)

diff --git a/Bancos/DepositosCaja.aspx.vb b/Bancos/DepositosCaja.aspx.vb
index d04585cfc..ee5338040 100644
--- a/Bancos/DepositosCaja.aspx.vb
+++ b/Bancos/DepositosCaja.aspx.vb
@@ -63,6 +63,7 @@ Partial Class Bancos_DepositosCaja
         UpGvFacturas.Update()
         GvFacturas.DataBind()
         lblValorTotal.Text = "0.00"
+        TxtComision.text = ""
         divLabelTotal.Visible = True
         DivComision.Visible = True
     End Sub

From 6de28dea8da52b535c14d871ae90d260f1eb9b02 Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Thu, 15 Apr 2021 18:52:25 -0700
Subject: [PATCH 02/22] -- columnad e oc

---
 OC/OC.aspx | 12 ++++++++----
 1 file changed, 8 insertions(+), 4 deletions(-)

diff --git a/OC/OC.aspx b/OC/OC.aspx
index 777adee39..a6f180aa3 100644
--- a/OC/OC.aspx
+++ b/OC/OC.aspx
@@ -2757,19 +2757,23 @@
 
                                         <asp:TemplateField HeaderText="Producto">
                                             <ItemTemplate>
-                                                <asp:Label ID="LblPS" runat="server" CssClass="Texto" Text='<%# Eval("PS")%>' Width="250px"></asp:Label>
+                                                <asp:Label ID="LblPS" runat="server" CssClass="Texto" Text='<%# Eval("PS")%>'></asp:Label>
+                                            </ItemTemplate>
+                                        </asp:TemplateField>
+                                         <asp:TemplateField HeaderText="Cant. Max" ItemStyle-HorizontalAlign="Right">
+                                            <ItemTemplate>
+                                                <span><%# Eval("CantidadMax", "{0:N2}")%></span>
                                             </ItemTemplate>
                                         </asp:TemplateField>
-
                                         <asp:TemplateField HeaderText="Cantidad">
                                             <ItemTemplate>
                                                 <asp:TextBox ID="TxtCantidad" Text="" CssClass="txtcant" onkeyup="ValidateCant(this)" type="number" step="any"
                                                     data-cantidad='<%# Eval("CantidadMax")%>' data-pu='<%# Eval("PU")%>' data-cve='<%# Eval("CveContratoDetalle") %>'
-                                                    Width="90" runat="server"></asp:TextBox>
+                                                    Width="70" runat="server"></asp:TextBox>
                                             </ItemTemplate>
                                         </asp:TemplateField>
 
-                                        <asp:TemplateField HeaderText="PU">
+                                        <asp:TemplateField HeaderText="PU" ItemStyle-HorizontalAlign="Right">
                                             <ItemTemplate>
                                                 <span><%# Eval("PU", "{0:N2}")%></span>
                                             </ItemTemplate>

From 4965da86a4b0083a36681cceb1b25579c5db404c Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Thu, 15 Apr 2021 18:53:29 -0700
Subject: [PATCH 03/22] - trim

---
 General/SaldosIniciales.aspx.vb | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/General/SaldosIniciales.aspx.vb b/General/SaldosIniciales.aspx.vb
index d82644c75..bd11fdf29 100644
--- a/General/SaldosIniciales.aspx.vb
+++ b/General/SaldosIniciales.aspx.vb
@@ -2002,7 +2002,7 @@ Partial Class General_SaldosIniciales
                             CveSubProyecto = DataTemp.FiltroPrimeroValor("CveSubProyecto", "").ToEntero
                         End If
                         Cuenta = Cuenta.Replace(" ", "")
-                        If ObjConta.GetCuentas(-1, Cuenta.Replace("-", ""), 1, UsuarioActual.CveEmpresa) Then
+                        If ObjConta.GetCuentas(-1, Cuenta.Replace("-", "").Trim, 1, UsuarioActual.CveEmpresa) Then
                             If ObjConta.DtResultados.Rows.Count > 0 Then
                                 IdCuenta = ObjConta.DtResultados().FiltroPrimeroValor("CveCuenta").ToEntero
                                 'TipoCuenta = ObjConta.DtResultados().FiltroPrimeroValor("Tipo")

From cc8543d795ae076b9e3be50d1ea5bf3653db8b46 Mon Sep 17 00:00:00 2001
From: HECTOR RODRIGUEZ <hecttor201@gmail.com>
Date: Fri, 16 Apr 2021 17:51:03 -0700
Subject: [PATCH 04/22] Permitir comision positivas mayores

---
 Bancos/DepositosCaja.aspx | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Bancos/DepositosCaja.aspx b/Bancos/DepositosCaja.aspx
index 2619da69f..a343d0e94 100644
--- a/Bancos/DepositosCaja.aspx
+++ b/Bancos/DepositosCaja.aspx
@@ -247,7 +247,7 @@
             if (comision2 < 0) {
                 comisionNegativa = comision2 * -1
             }
-            if (comision2 > ValorTotalSeleccionado || comisionNegativa > ValorTotalSeleccionado) {
+            if (comisionNegativa > ValorTotalSeleccionado) {
                 $('#C_TxtComision').val(comision)
                 alert("No es posible poner una comision superior a lo seleccionado")
             } else {

From bc7d49260019ef39ccc31abbc576794be40875f4 Mon Sep 17 00:00:00 2001
From: HECTOR RODRIGUEZ <hecttor201@gmail.com>
Date: Fri, 16 Apr 2021 17:51:25 -0700
Subject: [PATCH 05/22] Fecha Documento no menor a 4 meses

---
 Bancos/ProveedoresAbonar.aspx    | 2 ++
 Bancos/ProveedoresAbonar.aspx.vb | 3 ++-
 2 files changed, 4 insertions(+), 1 deletion(-)

diff --git a/Bancos/ProveedoresAbonar.aspx b/Bancos/ProveedoresAbonar.aspx
index 768463a0b..01b768cda 100644
--- a/Bancos/ProveedoresAbonar.aspx
+++ b/Bancos/ProveedoresAbonar.aspx
@@ -122,6 +122,8 @@
                                 <ajax:ValidatorCalloutExtender ID="ValidatorCalloutExtender1" runat="server" HighlightCssClass="vco" TargetControlID="MEVCalendario" Width="350px"></ajax:ValidatorCalloutExtender>
                                 <asp:RangeValidator ID="RVTxtFechaDocumento" runat="server" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b> <br/> La fecha del documento no puede ser superior a la fecha actual" ControlToValidate="TxtFechaDocumento" MinimumValue="01/01/1900" Type="Date" ValidationGroup="GrpGuardar"></asp:RangeValidator>
                                 <ajax:ValidatorCalloutExtender ID="VCOFechaDocumento3" runat="server" HighlightCssClass="vco" TargetControlID="RVTxtFechaDocumento" Width="350px"></ajax:ValidatorCalloutExtender>
+                                <asp:RangeValidator ID="RVTxtFechaDocumentoMenor" runat="server" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b> <br/> La fecha del documento no puede ser superior a la fecha actual" ControlToValidate="TxtFechaDocumento" MinimumValue="01/01/1900" Type="Date" ValidationGroup="GrpGuardar"></asp:RangeValidator>
+                                <ajax:ValidatorCalloutExtender ID="VCOFechaDocumento4" runat="server" HighlightCssClass="vco" TargetControlID="RVTxtFechaDocumentoMenor" Width="350px"></ajax:ValidatorCalloutExtender>
 
                             </div>
                         </div>
diff --git a/Bancos/ProveedoresAbonar.aspx.vb b/Bancos/ProveedoresAbonar.aspx.vb
index 3dd2dfad1..c11b25731 100644
--- a/Bancos/ProveedoresAbonar.aspx.vb
+++ b/Bancos/ProveedoresAbonar.aspx.vb
@@ -389,7 +389,7 @@ Partial Class Bancos_ProveedoresAbonar
                 If UsuarioActual.TienePermisoProceso(98) Then
                     PermiteModificarImporte = False
                 End If
-                Calendario.StartDate = Now.AddMonths(-2)
+                Calendario.StartDate = Now.AddMonths(-4)
                 'proceso que restringue solo el pago de apartir del dia de hoy y como limite fin de mes
                 If UsuarioActual.TienePermisoProceso(105) Then
                     Calendario.StartDate = Now
@@ -3391,6 +3391,7 @@ Partial Class Bancos_ProveedoresAbonar
 
     Private Sub RVTxtFechaDocumento_Init(sender As Object, e As EventArgs) Handles RVTxtFechaDocumento.Init
         RVTxtFechaDocumento.MaximumValue = DateTime.Now.ToShortDateString
+        RVTxtFechaDocumentoMenor.MinimumValue = DateTime.Now.AddMonths(-4).ToShortDateString
         Calendario.EndDate = DateTime.Now
 
     End Sub

From 47b1413610a0ab1aac60113e98fe6723223ada71 Mon Sep 17 00:00:00 2001
From: HECTOR RODRIGUEZ <hecttor201@gmail.com>
Date: Fri, 16 Apr 2021 17:51:41 -0700
Subject: [PATCH 06/22] Nueva columna: Fecha

---
 .../Grales/Formatos/RepTraspasoAlmacen.rdlc   | 158 ++++++++++++++----
 1 file changed, 125 insertions(+), 33 deletions(-)

diff --git a/Empresas/Grales/Formatos/RepTraspasoAlmacen.rdlc b/Empresas/Grales/Formatos/RepTraspasoAlmacen.rdlc
index 90d52fea7..8ff03877a 100644
--- a/Empresas/Grales/Formatos/RepTraspasoAlmacen.rdlc
+++ b/Empresas/Grales/Formatos/RepTraspasoAlmacen.rdlc
@@ -80,31 +80,34 @@
             <TablixBody>
               <TablixColumns>
                 <TablixColumn>
-                  <Width>1.23101cm</Width>
+                  <Width>0.96643cm</Width>
                 </TablixColumn>
                 <TablixColumn>
-                  <Width>1.98488cm</Width>
+                  <Width>1.69333cm</Width>
+                </TablixColumn>
+                <TablixColumn>
+                  <Width>1.74675cm</Width>
                 </TablixColumn>
                 <TablixColumn>
                   <Width>1.51446cm</Width>
                 </TablixColumn>
                 <TablixColumn>
-                  <Width>3.83319cm</Width>
+                  <Width>3.74919cm</Width>
                 </TablixColumn>
                 <TablixColumn>
-                  <Width>6.041cm</Width>
+                  <Width>6.22158cm</Width>
                 </TablixColumn>
                 <TablixColumn>
-                  <Width>2.20896cm</Width>
+                  <Width>1.57859cm</Width>
                 </TablixColumn>
                 <TablixColumn>
-                  <Width>2.31165cm</Width>
+                  <Width>2.32298cm</Width>
                 </TablixColumn>
                 <TablixColumn>
-                  <Width>2.50891cm</Width>
+                  <Width>2.21787cm</Width>
                 </TablixColumn>
                 <TablixColumn>
-                  <Width>2.5778cm</Width>
+                  <Width>2.36613cm</Width>
                 </TablixColumn>
               </TablixColumns>
               <TablixRows>
@@ -122,7 +125,7 @@
                                 <TextRun>
                                   <Value>Folio</Value>
                                   <Style>
-                                    <FontSize>9pt</FontSize>
+                                    <FontSize>8pt</FontSize>
                                     <FontWeight>Bold</FontWeight>
                                   </Style>
                                 </TextRun>
@@ -167,6 +170,62 @@
                         </Textbox>
                       </CellContents>
                     </TablixCell>
+                    <TablixCell>
+                      <CellContents>
+                        <Textbox Name="Textbox6">
+                          <CanGrow>true</CanGrow>
+                          <KeepTogether>true</KeepTogether>
+                          <Paragraphs>
+                            <Paragraph>
+                              <TextRuns>
+                                <TextRun>
+                                  <Value>Fecha Mov</Value>
+                                  <Style>
+                                    <FontSize>8pt</FontSize>
+                                    <FontWeight>Bold</FontWeight>
+                                  </Style>
+                                </TextRun>
+                              </TextRuns>
+                              <Style>
+                                <TextAlign>Center</TextAlign>
+                              </Style>
+                            </Paragraph>
+                          </Paragraphs>
+                          <rd:DefaultName>Textbox6</rd:DefaultName>
+                          <Style>
+                            <Border>
+                              <Color>LightGrey</Color>
+                              <Style>Solid</Style>
+                            </Border>
+                            <TopBorder>
+                              <Color>Black</Color>
+                              <Style>Solid</Style>
+                              <Width>1pt</Width>
+                            </TopBorder>
+                            <BottomBorder>
+                              <Color>Black</Color>
+                              <Style>Solid</Style>
+                              <Width>1pt</Width>
+                            </BottomBorder>
+                            <LeftBorder>
+                              <Color>Black</Color>
+                              <Style>Solid</Style>
+                              <Width>1pt</Width>
+                            </LeftBorder>
+                            <RightBorder>
+                              <Color>Black</Color>
+                              <Style>Solid</Style>
+                              <Width>1pt</Width>
+                            </RightBorder>
+                            <BackgroundColor>Silver</BackgroundColor>
+                            <PaddingLeft>2pt</PaddingLeft>
+                            <PaddingRight>2pt</PaddingRight>
+                            <PaddingTop>2pt</PaddingTop>
+                            <PaddingBottom>2pt</PaddingBottom>
+                          </Style>
+                        </Textbox>
+                      </CellContents>
+                    </TablixCell>
                     <TablixCell>
                       <CellContents>
                         <Textbox Name="Textbox3">
@@ -178,7 +237,7 @@
                                 <TextRun>
                                   <Value>Disponible</Value>
                                   <Style>
-                                    <FontSize>9pt</FontSize>
+                                    <FontSize>8pt</FontSize>
                                     <FontWeight>Bold</FontWeight>
                                   </Style>
                                 </TextRun>
@@ -234,7 +293,7 @@
                                 <TextRun>
                                   <Value>Unidad</Value>
                                   <Style>
-                                    <FontSize>9pt</FontSize>
+                                    <FontSize>8pt</FontSize>
                                     <FontWeight>Bold</FontWeight>
                                   </Style>
                                 </TextRun>
@@ -290,7 +349,7 @@
                                 <TextRun>
                                   <Value>Código</Value>
                                   <Style>
-                                    <FontSize>9pt</FontSize>
+                                    <FontSize>8pt</FontSize>
                                     <FontWeight>Bold</FontWeight>
                                   </Style>
                                 </TextRun>
@@ -346,7 +405,7 @@
                                 <TextRun>
                                   <Value>Producto</Value>
                                   <Style>
-                                    <FontSize>9pt</FontSize>
+                                    <FontSize>8pt</FontSize>
                                     <FontWeight>Bold</FontWeight>
                                   </Style>
                                 </TextRun>
@@ -402,7 +461,7 @@
                                 <TextRun>
                                   <Value>Valor</Value>
                                   <Style>
-                                    <FontSize>9pt</FontSize>
+                                    <FontSize>8pt</FontSize>
                                     <FontWeight>Bold</FontWeight>
                                   </Style>
                                 </TextRun>
@@ -458,7 +517,7 @@
                                 <TextRun>
                                   <Value>Alm. Origen</Value>
                                   <Style>
-                                    <FontSize>9pt</FontSize>
+                                    <FontSize>8pt</FontSize>
                                     <FontWeight>Bold</FontWeight>
                                   </Style>
                                 </TextRun>
@@ -514,7 +573,7 @@
                                 <TextRun>
                                   <Value>Alm. Destino</Value>
                                   <Style>
-                                    <FontSize>9pt</FontSize>
+                                    <FontSize>8pt</FontSize>
                                     <FontWeight>Bold</FontWeight>
                                   </Style>
                                 </TextRun>
@@ -570,7 +629,7 @@
                                 <TextRun>
                                   <Value>Responsable</Value>
                                   <Style>
-                                    <FontSize>9pt</FontSize>
+                                    <FontSize>8pt</FontSize>
                                     <FontWeight>Bold</FontWeight>
                                   </Style>
                                 </TextRun>
@@ -654,6 +713,43 @@
                         </Textbox>
                       </CellContents>
                     </TablixCell>
+                    <TablixCell>
+                      <CellContents>
+                        <Textbox Name="FechaMovto">
+                          <CanGrow>true</CanGrow>
+                          <KeepTogether>true</KeepTogether>
+                          <Paragraphs>
+                            <Paragraph>
+                              <TextRuns>
+                                <TextRun>
+                                  <Value>=IIf(CStr(Fields!FechaMovto.Value) = "" , "", FormatDateTime(CDate(Fields!FechaMovto.Value), DateFormat.ShortDate))</Value>
+                                  <Style>
+                                    <FontSize>7pt</FontSize>
+                                    <FontWeight>=IIf(Fields!PS.Value = "", "Bold", "Default")</FontWeight>
+                                    <Color>=IIf(Fields!PS.Value = "", "White", "Black")</Color>
+                                  </Style>
+                                </TextRun>
+                              </TextRuns>
+                              <Style>
+                                <TextAlign>Center</TextAlign>
+                              </Style>
+                            </Paragraph>
+                          </Paragraphs>
+                          <rd:DefaultName>FechaMovto</rd:DefaultName>
+                          <Style>
+                            <Border>
+                              <Style>None</Style>
+                            </Border>
+                            <BackgroundColor>=IIf(Fields!PS.Value = "", "#9cacc1", "NoColor")</BackgroundColor>
+                            <PaddingLeft>2pt</PaddingLeft>
+                            <PaddingRight>2pt</PaddingRight>
+                            <PaddingTop>2pt</PaddingTop>
+                            <PaddingBottom>2pt</PaddingBottom>
+                          </Style>
+                        </Textbox>
+                        <rd:Selected>true</rd:Selected>
+                      </CellContents>
+                    </TablixCell>
                     <TablixCell>
                       <CellContents>
                         <Textbox Name="Cantidad">
@@ -953,6 +1049,7 @@
                 <TablixMember />
                 <TablixMember />
                 <TablixMember />
+                <TablixMember />
               </TablixMembers>
             </TablixColumnHierarchy>
             <TablixRowHierarchy>
@@ -971,9 +1068,8 @@
             <FixedRowHeaders>true</FixedRowHeaders>
             <DataSetName>DataSet1</DataSetName>
             <Top>0.17639cm</Top>
-            <Left>0.24474cm</Left>
             <Height>1.0148cm</Height>
-            <Width>24.21186cm</Width>
+            <Width>24.37731cm</Width>
             <Style>
               <Border>
                 <Style>None</Style>
@@ -984,7 +1080,7 @@
         <Height>0.67394in</Height>
         <Style />
       </Body>
-      <Width>9.62858in</Width>
+      <Width>9.69372in</Width>
       <Page>
         <PageHeader>
           <Height>3.48078cm</Height>
@@ -1012,7 +1108,7 @@
               <rd:DefaultName>Textbox1</rd:DefaultName>
               <Top>0.47625cm</Top>
               <Height>0.6cm</Height>
-              <Width>24.4566cm</Width>
+              <Width>24.62205cm</Width>
               <Style>
                 <Border>
                   <Style>None</Style>
@@ -1059,7 +1155,7 @@
               <rd:DefaultName>Textbox2</rd:DefaultName>
               <Top>1.07625cm</Top>
               <Height>0.52945cm</Height>
-              <Width>24.4566cm</Width>
+              <Width>24.62205cm</Width>
               <ZIndex>1</ZIndex>
               <Style>
                 <Border>
@@ -1076,9 +1172,8 @@
               <Value>=Parameters!LogoPath.Value</Value>
               <Sizing>FitProportional</Sizing>
               <Top>0.11458in</Top>
-              <Left>0.24474cm</Left>
               <Height>2.09585cm</Height>
-              <Width>24.21186cm</Width>
+              <Width>24.37731cm</Width>
               <ZIndex>2</ZIndex>
               <Style>
                 <Border>
@@ -1105,9 +1200,8 @@
               </Paragraphs>
               <rd:DefaultName>Filtros</rd:DefaultName>
               <Top>2.56328cm</Top>
-              <Left>0.24474cm</Left>
               <Height>0.6cm</Height>
-              <Width>24.21186cm</Width>
+              <Width>24.37731cm</Width>
               <ZIndex>3</ZIndex>
               <Style>
                 <Border>
@@ -1121,9 +1215,8 @@
             </Textbox>
             <Line Name="Line1">
               <Top>3.30439cm</Top>
-              <Left>0.24474cm</Left>
               <Height>0cm</Height>
-              <Width>24.21186cm</Width>
+              <Width>24.37731cm</Width>
               <ZIndex>4</ZIndex>
               <Style>
                 <Border>
@@ -1163,8 +1256,8 @@
                 </Paragraph>
               </Paragraphs>
               <rd:DefaultName>Textbox3</rd:DefaultName>
-              <Top>0.26458cm</Top>
-              <Left>19.41703cm</Left>
+              <Top>0.29986cm</Top>
+              <Left>19.97266cm</Left>
               <Height>0.38981cm</Height>
               <Width>3.13456cm</Width>
               <Style>
@@ -1281,9 +1374,8 @@
             </Textbox>
             <Line Name="Line2">
               <Top>0.15875cm</Top>
-              <Left>0.24474cm</Left>
               <Height>0cm</Height>
-              <Width>24.21186cm</Width>
+              <Width>24.37731cm</Width>
               <ZIndex>4</ZIndex>
               <Style>
                 <Border>
@@ -1312,7 +1404,7 @@
               </Paragraphs>
               <rd:DefaultName>Textbox11</rd:DefaultName>
               <Top>0.27341cm</Top>
-              <Left>12.77526cm</Left>
+              <Left>13.19859cm</Left>
               <Height>0.38981cm</Height>
               <Width>5.41606cm</Width>
               <ZIndex>5</ZIndex>

From e589219ab90ed7b22f2f8060255ddcd773456099 Mon Sep 17 00:00:00 2001
From: HECTOR RODRIGUEZ <hecttor201@gmail.com>
Date: Fri, 16 Apr 2021 17:52:15 -0700
Subject: [PATCH 07/22] Cambios visuales

---
 RH/Personal.aspx    |  39 +++++++++++-----
 RH/Personal.aspx.vb | 110 +++++++++++++++++++++++---------------------
 2 files changed, 85 insertions(+), 64 deletions(-)

diff --git a/RH/Personal.aspx b/RH/Personal.aspx
index 0bb63c1e6..e4a1a2589 100644
--- a/RH/Personal.aspx
+++ b/RH/Personal.aspx
@@ -35,7 +35,7 @@
         <asp:LinkButton ID="ImgImprimirExpediente" Visible="false" runat="server"> <i class="fa fa-file-pdf-o" style="font-weight:bold;"></i> Expediente de personal</asp:LinkButton>
     </li>
     <li>
-        <asp:LinkButton ID="LbGafete" runat="server" CssClass="" Text="Gafete" />
+        <asp:LinkButton ID="LbGafete" runat="server" CssClass=""><i class="fa fa-list-alt"></i> Gafete</asp:LinkButton>
 
     </li>
     <li>
@@ -85,10 +85,10 @@
             </li>
 
             <li>
-                <asp:LinkButton ID="LnkCalcularFactor" OnClick="LnkCalcularFactor_Click" runat="server"><i class="fa fa-list-alt"></i> Calcular factor de integracion</asp:LinkButton>
+                <asp:LinkButton ID="LnkCalcularFactor" OnClick="LnkCalcularFactor_Click" runat="server"><i class="fa fa-list-alt"></i> Calcular factor de integración</asp:LinkButton>
             </li>
             <li>
-                <asp:LinkButton ID="LnkModsalario" OnClick="LnkModsalario_Click" runat="server"><i class="fa fa-pencil"></i>Modificar salario </asp:LinkButton>
+                <asp:LinkButton ID="LnkModsalario" OnClick="LnkModsalario_Click" runat="server"><i class="fa fa-pencil"></i> Modificar salario </asp:LinkButton>
             </li>
         </ContentTemplate>
     </asp:UpdatePanel>
@@ -453,9 +453,10 @@
                                                 </div>
                                                 <div class="portlet-body form">
                                                     <div class="form-group form-md-line-input input-iconright">
-                                                        <label for="<%= TxtFechaInicioContrato.ClientID.ToString()%>">Fecha Inicio Contrato: </label>
                                                         <div class="input-group input-sm date date-picker" data-date-format="dd/mm/yyyy" style="padding: 5px 0px;">
                                                             <asp:TextBox ID="TxtFechaInicioContrato" runat="server" CausesValidation="True" CssClass="form-control input-sm"></asp:TextBox>
+                                                            <label for="<%= TxtFechaInicioContrato.ClientID.ToString()%>"  style="margin-top: -10px;">Fecha Inicio Contrato: </label>
+
                                                             <span class="input-group-btn ">
                                                                 <asp:LinkButton ID="ImgFechaInicioContrato" class="btn default " Text="<i class='fa fa-calendar'></i>" runat="server"></asp:LinkButton>
                                                             </span>
@@ -467,9 +468,10 @@
 
                                                     </div>
                                                     <div class="form-group form-md-line-input input-iconright">
-                                                        <label for="<%= TxtFechaFinContrato.ClientID.ToString()%>">Fecha Fin Contrato: </label>
                                                         <div class="input-group input-sm date date-picker" data-date-format="dd/mm/yyyy" style="padding: 5px 0px;">
                                                             <asp:TextBox ID="TxtFechaFinContrato" runat="server" CausesValidation="True" CssClass="form-control input-sm"></asp:TextBox>
+                                                            <label for="<%= TxtFechaFinContrato.ClientID.ToString()%>" style="margin-top: -10px;">Fecha Fin Contrato: </label>
+
                                                             <span class="input-group-btn ">
                                                                 <asp:LinkButton ID="ImgFechaFinContrato" class="btn default " Text="<i class='fa fa-calendar'></i>" runat="server"></asp:LinkButton>
                                                             </span>
@@ -568,13 +570,13 @@
                                                 </div>
                                                 <div class="portlet-body form">
                                                     <div class="form-group form-md-line-input input-iconright">
-
+                                                        <label class="col-md-1 truncate" style ="width: 100px; margin-top: -10px; margin-left: -15px; margin-bottom: 4px; color: #888888; font-size: 13px">Cliente:  </label>
                                                         <ADS:Dropdownlost CssClassDdl="form-control input-sm select2me" ID="DdlClienteAsignado" Width="100%" data-metodo="getcliente" runat="server" DataTextField="Nombre" DataValueField="CveCliente" CssStyle="width: 100%;"></ADS:Dropdownlost>
                                                         <%--<asp:DropDownList  Width ="100%" ID="DdlClienteAsignado" runat="server" AppendDataBoundItems="True" DataTextField="Nombre" DataValueField="CveCliente" CssClass="form-control input-sm select2me" ValidationGroup="GrpGuardar">
                                                             <asp:ListItem Selected="True" Text="Sin Cliente asignado" Value="-1"></asp:ListItem>
                                                         </asp:DropDownList>--%>
 
-                                                        <label for="<%= DdlClienteAsignado.ClientID.ToString()%>">Cliente:  </label>
+                                                        <%--<label for="<%= DdlClienteAsignado.ClientID.ToString()%>">Cliente:  </label>--%>
                                                         <i></i>
                                                     </div>
                                                     <div class="form-group form-md-line-input input-iconright" runat="server" id="DivProyectosAsignado">
@@ -640,6 +642,7 @@
 
                                                         <div class="input-group input-sm date date-picker" data-date-format="dd/mm/yyyy" style="padding: 5px 0px;">
                                                             <asp:TextBox ID="TxtFechaActivo" runat="server" CausesValidation="True" CssClass="form-control input-sm"></asp:TextBox>
+                                                            <label for="<%= TxtFechaActivo.ClientID.ToString()%>" style=" margin-top: -10px;">Fecha Activo:  </label>
                                                             <span class="input-group-btn ">
                                                                 <asp:LinkButton ID="ImgFechaActivo" class="btn default " Text="<i class='fa fa-calendar'></i>" runat="server"></asp:LinkButton>
                                                             </span>
@@ -649,6 +652,7 @@
                                                         <asp:CompareValidator ID="CVFTxtFechaActivo" runat="server" ControlToValidate="TxtFechaActivo" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Fecha Activo''</b> no tiene el formato correcto, por favor intente de nuevo con el siguiente formato: (dd/mm/yyyy)." Operator="DataTypeCheck" Type="Date" ValidationGroup="GrpGuardar" Visible="False"></asp:CompareValidator>
 
                                                         <asp:RequiredFieldValidator ID="RfvTxtFechaActivo" runat="server" ControlToValidate="TxtFechaActivo" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Fecha de Activo''</b> es necesario " ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
+
                                                         <i></i>
 
                                                     </div>
@@ -657,6 +661,8 @@
 
                                                         <div class="input-group input-sm date date-picker" data-date-format="dd/mm/yyyy" style="padding: 5px 0px;">
                                                             <asp:TextBox ID="TxtFechaBaja" runat="server" CausesValidation="True" CssClass="form-control input-sm"></asp:TextBox>
+                                                            <label style=" margin-top: -10px;" for="<%= TxtFechaBaja.ClientID.ToString()%>">Fecha Baja:  </label>
+
                                                             <span class="input-group-btn ">
                                                                 <asp:LinkButton ID="ImgFechaBaja" class="btn default " Text="<i class='fa fa-calendar'></i>" runat="server"></asp:LinkButton>
                                                             </span>
@@ -667,12 +673,15 @@
 
                                                         <asp:RequiredFieldValidator ID="RfvTxtFechaBaja" runat="server" ControlToValidate="TxtFechaBaja" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Fecha de Baja''</b> es necesario " ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
                                                         <i></i>
+
                                                     </div>
 
                                                     <div runat="server" id="DivFechaReingreso" visible="true" class="form-group form-md-line-input input-iconright">
 
                                                         <div class="input-group input-sm date date-picker" data-date-format="dd/mm/yyyy" style="padding: 5px 0px;">
                                                             <asp:TextBox ID="TxtFechaReingreso" runat="server" CausesValidation="True" CssClass="form-control input-sm"></asp:TextBox>
+                                                            <label for="<%= TxtFechaReingreso.ClientID.ToString()%>" style=" margin-top: -10px;">Fecha Reingreso:  </label>
+
                                                             <span class="input-group-btn ">
                                                                 <asp:LinkButton ID="ImgFechaReingreso" class="btn default " Text="<i class='fa fa-calendar'></i>" runat="server"></asp:LinkButton>
                                                             </span>
@@ -1735,11 +1744,13 @@
                                         <div class="portlet-body portlet-filter">
                                             <div class="row">
                                                 <div class="form-group form-md-line-input  input-iconright col-md-2">
-                                                    <ADS:Dropdownlost CssClassDdl="form-control input-sm select2me" ID="DdlClienteAsistenciaC" Width="100%" data-metodo="getcliente" runat="server" DataTextField="Nombre" DataValueField="CveCliente" CssStyle="width: 100%;"></ADS:Dropdownlost>
+                                                    <label class="col-md-1 truncate" style ="width: 100px; margin-top: -10px; margin-left: -15px; margin-bottom: 2px; font-size: 13px">Cliente:  </label>
+                                                    <ADS:Dropdownlost CssClassDdl="form-control input-sm select2me" ID="DdlClienteAsistenciaC" Width="100%" data-metodo="getcliente" runat="server" DataTextField="Nombre" DataValueField="CveCliente"  CssStyle="width: 100%;"></ADS:Dropdownlost>
                                                     <%--<asp:DropDownList Width="100%" ID="DdlClienteAsistenciaC" runat="server" AppendDataBoundItems="true" DataTextField="Nombre" DataValueField="CveCliente" CssClass=" form-control  select2me ">
                                                         <asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem>
                                                     </asp:DropDownList>--%>
-                                                    <label for="<%= DdlClienteAsistenciaC.ClientID.ToString()%>">Cliente:  </label>
+                                                    
+
                                                 </div>
                                                 <div class="form-group form-md-line-input  input-iconright col-md-2">
                                                     <asp:DropDownList Width="100%" ID="DdlProyectoAsistenciaC" runat="server" AppendDataBoundItems="true" AutoPostBack="true" DataTextField="Proyecto" DataValueField="CveProyecto" CssClass=" form-control  select2me ">
@@ -1967,8 +1978,13 @@
                                                 <AlternatingRowStyle CssClass="TextoAlterno" />
                                                 <HeaderStyle CssClass="Titulos" />
                                             </asp:GridView>
+                                            <div  class="col-md-12">
+                                                <div class="col-md-9"></div>
+                                                <div class="col-md-3">
+                                                    <asp:Button ID="BtnGuardarAsistenciaCambios" runat="server" Text="Guardar Cambios" class="btn btn-success pull-right" /><br />
+                                                </div>
 
-                                            <asp:Button ID="BtnGuardarAsistenciaCambios" runat="server" Text="Guardar Cambios" class="btn btn-success pull-right" /><br />
+                                            </div>
                                             <br />
                                             <br />
                                         </div>
@@ -4253,11 +4269,12 @@
                                     </td>
                                     <td style="width: 33%!important; vertical-align: top!important">
                                         <div class="form-group form-md-line-input input-iconright">
+                                            <label class="col-md-1 truncate" style ="width: 100px; margin-top: -10px; margin-left: -15px; margin-bottom: 2px; font-size: 13px">Cliente:  </label>
                                             <ADS:Dropdownlost CssClassDdl="form-control input-sm select2me" ID="DdlClienteBuzon" Width="100%" data-metodo="getcliente" runat="server" DataTextField="Nombre" DataValueField="CveCliente" CssStyle="width: 100%;"></ADS:Dropdownlost>
                                             <%--<asp:DropDownList ID="DdlClienteBuzon" AutoPostBack="true" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="Nombre" DataValueField="CveCliente" Class="table-group-action-input form-control input-inline input-small input-sm" ValidationGroup="GrpAgragarBuzonCalidad" Width="200px">
                                                 <asp:ListItem Selected="True" Text="Seleccione uno" Value="-1"></asp:ListItem>
                                             </asp:DropDownList>--%>
-                                            <label for="<%= DdlClienteBuzon.ClientID.ToString()%>">Cliente: </label>
+                                            <%--<label for="<%= DdlClienteBuzon.ClientID.ToString()%>">Cliente: </label>--%>
                                             <%--  <asp:RequiredFieldValidator ID="rfvDdlSucursal" runat="server" ControlToValidate="DdlClienteBuzon" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Cliente''</b> es necesario, por favor seleccione uno." InitialValue="-1" ValidationGroup="GrpAgragarBuzonCalidad"></asp:RequiredFieldValidator>--%>
                                             <i></i>
                                         </div>
diff --git a/RH/Personal.aspx.vb b/RH/Personal.aspx.vb
index 4617e3a44..dc1fcee99 100644
--- a/RH/Personal.aspx.vb
+++ b/RH/Personal.aspx.vb
@@ -1062,8 +1062,10 @@ Partial Class RH_Personal
     End Sub
 
     Private Sub CargaUsuariosNomina()
-
-        DDLUsuarioNomina.DataSource = GlobalDTUsuarios(-1, UsuarioActual.CveEmpresa)
+        Dim dttemp As DataTable
+        Dim FiltroAD() As String = {"CveUsuario", "Usuario", "Nombre", "Contraseña", "CveEmpresa", "Rol", "Correo", "Empresa", "CveRol"}
+        dttemp = GlobalDTUsuarios(-1, UsuarioActual.CveEmpresa)
+        DDLUsuarioNomina.DataSource = dttemp.FiltraParametros(String.Format("CveEmpresa = {0} AND Estatus =1 and CveRol <> 1", UsuarioActual.CveEmpresa), "Rol ASC", FiltroAD)
         DDLUsuarioNomina.DataBind()
 
         DDLUsuarioNomina.Items.Insert(0, New ListItem("Seleccione uno", "-1"))
@@ -3498,69 +3500,71 @@ Partial Class RH_Personal
         ObjPersonal.Dispose()
     End Sub
     Private Sub GenerarPDFGastosXComp(Optional Formato As String = "PDF")
+        If CvePersonal > 0 Then
+            If RBLTipoGastos.SelectedValue = "1" Then
 
-        If RBLTipoGastos.SelectedValue = "1" Then
+                If DTGastosSinComp.Rows.Count > 0 Then
 
-            If DTGastosSinComp.Rows.Count > 0 Then
+                    Dim params As New List(Of ReportParameter)
+                    params.Add(New ReportParameter("Empresa", UsuarioActual.Empresa.Empresa))
+                    params.Add(New ReportParameter("Empleado", LtlPersonal.Text.ToString()))
+                    params.Add(New ReportParameter("Saldo", LblSaldoGxC.Text.ToString()))
+                    params.Add(New ReportParameter("UsuarioImprimio", UsuarioActual.Nombre))
 
-                Dim params As New List(Of ReportParameter)
-                params.Add(New ReportParameter("Empresa", UsuarioActual.Empresa.Empresa))
-                params.Add(New ReportParameter("Empleado", LtlPersonal.Text.ToString()))
-                params.Add(New ReportParameter("Saldo", LblSaldoGxC.Text.ToString()))
-                params.Add(New ReportParameter("UsuarioImprimio", UsuarioActual.Nombre))
+                    Dim Imagen As New System.IO.FileInfo(String.Format("{0}/Logo.png", UsuarioActual.Empresa.Ruta))
+                    Dim logouri = String.Format("{0}://{1}:{2}/Empresas/{3}/Logo.png", Request.Url.Scheme, Request.Url.Host, Request.Url.Port, UsuarioActual.CveEmpresa)
 
-                Dim Imagen As New System.IO.FileInfo(String.Format("{0}/Logo.png", UsuarioActual.Empresa.Ruta))
-                Dim logouri = String.Format("{0}://{1}:{2}/Empresas/{3}/Logo.png", Request.Url.Scheme, Request.Url.Host, Request.Url.Port, UsuarioActual.CveEmpresa)
-
-                If Imagen.Exists Then
-                    params.Add(New ReportParameter("pImg", logouri))
-                Else
-                    params.Add(New ReportParameter("pImg", ""))
-                End If
-
-                ImprimirPDF("Empresas/Grales/Formatos/GastosXComprobarGral.rdlc", DTGastosSinComp, params, "GastosSinComprobarGral", Formato)
-            Else
-                Alert("No hay datos consultados", TipoMensaje.MsgAdvertencia)
-            End If
-
-        ElseIf RBLTipoGastos.SelectedValue = "2" Then
-
-            If DTGastosPorCheque.Rows.Count > 0 Then
-
-                For Each Row As DataRow In DTGastosPorCheque.Rows
-                    Dim FolioPago As String = Row("FolioPago").ToString()
-                    Row("FolioPago") = ""
-                    If Row("CveCompra").ToString() = "" And Row("CveIE").ToString() <> "" Then
-                        Row("FechaVencimiento") = Row("FechaDocumento")
-                        Row("FolioPago") = FolioPago
+                    If Imagen.Exists Then
+                        params.Add(New ReportParameter("pImg", logouri))
+                    Else
+                        params.Add(New ReportParameter("pImg", ""))
                     End If
 
-                    If Row("FolioPago").ToString() <> "" Then
-                        Row("SerieFolio") = ""
-                    End If
-                Next
-
-                Dim params As New List(Of ReportParameter)
-                params.Add(New ReportParameter("Empresa", UsuarioActual.Empresa.Empresa))
-                params.Add(New ReportParameter("Empleado", LtlPersonal.Text.ToString()))
-                params.Add(New ReportParameter("UsuarioImprimio", UsuarioActual.Nombre))
-
-                Dim Imagen As New System.IO.FileInfo(String.Format("{0}/Logo.png", UsuarioActual.Empresa.Ruta))
-                Dim logouri = String.Format("{0}://{1}:{2}/Empresas/{3}/Logo.png", Request.Url.Scheme, Request.Url.Host, Request.Url.Port, UsuarioActual.CveEmpresa)
-
-                If Imagen.Exists Then
-                    params.Add(New ReportParameter("pImg", logouri))
+                    ImprimirPDF("Empresas/Grales/Formatos/GastosXComprobarGral.rdlc", DTGastosSinComp, params, "GastosSinComprobarGral", Formato)
                 Else
-                    params.Add(New ReportParameter("pImg", ""))
+                    Alert("No hay datos consultados", TipoMensaje.MsgAdvertencia)
                 End If
 
-                ImprimirPDF("Empresas/Grales/Formatos/GastosXComprobarCheque.rdlc", DTGastosPorCheque, params, "GastosPorCheque", Formato)
-            Else
-                Alert("No hay datos consultados", TipoMensaje.MsgAdvertencia)
+            ElseIf RBLTipoGastos.SelectedValue = "2" Then
+
+                If DTGastosPorCheque.Rows.Count > 0 Then
+
+                    For Each Row As DataRow In DTGastosPorCheque.Rows
+                        Dim FolioPago As String = Row("FolioPago").ToString()
+                        Row("FolioPago") = ""
+                        If Row("CveCompra").ToString() = "" And Row("CveIE").ToString() <> "" Then
+                            Row("FechaVencimiento") = Row("FechaDocumento")
+                            Row("FolioPago") = FolioPago
+                        End If
+
+                        If Row("FolioPago").ToString() <> "" Then
+                            Row("SerieFolio") = ""
+                        End If
+                    Next
+
+                    Dim params As New List(Of ReportParameter)
+                    params.Add(New ReportParameter("Empresa", UsuarioActual.Empresa.Empresa))
+                    params.Add(New ReportParameter("Empleado", LtlPersonal.Text.ToString()))
+                    params.Add(New ReportParameter("UsuarioImprimio", UsuarioActual.Nombre))
+
+                    Dim Imagen As New System.IO.FileInfo(String.Format("{0}/Logo.png", UsuarioActual.Empresa.Ruta))
+                    Dim logouri = String.Format("{0}://{1}:{2}/Empresas/{3}/Logo.png", Request.Url.Scheme, Request.Url.Host, Request.Url.Port, UsuarioActual.CveEmpresa)
+
+                    If Imagen.Exists Then
+                        params.Add(New ReportParameter("pImg", logouri))
+                    Else
+                        params.Add(New ReportParameter("pImg", ""))
+                    End If
+
+                    ImprimirPDF("Empresas/Grales/Formatos/GastosXComprobarCheque.rdlc", DTGastosPorCheque, params, "GastosPorCheque", Formato)
+                Else
+                    Alert("No hay datos consultados", TipoMensaje.MsgAdvertencia)
+                End If
             End If
+        Else
+            Alert("No hay datos consultados", TipoMensaje.MsgAdvertencia)
         End If
 
-
     End Sub
 
 

From 4bee3a82b6f0e4c087fbec2f01e6ed81fbdcce0e Mon Sep 17 00:00:00 2001
From: HECTOR RODRIGUEZ <hecttor201@gmail.com>
Date: Fri, 16 Apr 2021 17:52:35 -0700
Subject: [PATCH 08/22] Cambios para mostrar y filtrar usuarios correctamente

---
 UserControl/TareaNueva.ascx    | 38 +++++++++++++++++++++++++++++-----
 UserControl/TareaNueva.ascx.cs |  3 ++-
 2 files changed, 35 insertions(+), 6 deletions(-)

diff --git a/UserControl/TareaNueva.ascx b/UserControl/TareaNueva.ascx
index 74e689f22..6f5cced3f 100644
--- a/UserControl/TareaNueva.ascx
+++ b/UserControl/TareaNueva.ascx
@@ -68,7 +68,7 @@
                                 </div>
                                 <asp:Panel runat="server" CssClass="actions">
                                     <div class="btn-group">
-                                        <asp:LinkButton ID="LnkAgregarTarea" OnClick="BtnGuardarTarea_Click" ValidationGroup="GrpTarea" CssClass="btn btn-default" runat="server">Agregar</asp:LinkButton>
+                                        <%--<asp:LinkButton ID="LnkAgregarTarea" OnClick="BtnGuardarTarea_Click" ValidationGroup="GrpTarea" CssClass="btn btn-default" runat="server">Agregar</asp:LinkButton>--%>
                                     </div>
                                 </asp:Panel>
                             </div>
@@ -146,10 +146,27 @@
                                         <div class="fileTarea">
                                             <asp:TextBox ID="TxtArchivo" CssClass="ADSdropzone hidden"  data-maxFile="1" runat="server"></asp:TextBox>
                                         </div>
-                                        <div class="text-right" style="">
-                                            <asp:TextBox ID="TxtUsuarioB" runat="server" CssClass="form-control input-sm TxtUsuarioB" Style="display: inline-block; margin-right: -20px; width: 150px;" CausesValidation="true"></asp:TextBox>
-                                            <a href="javascript:;" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
-                                        </div>
+                                        <asp:Panel runat="server" ID="portletMiembros" class="portlet light smmallpadding bordered">
+                                            <div class="portlet-title">
+                                                <div class="caption font-green">
+                                                    <i class="fa fa-user-plus font-green"></i>
+                                                    <span class="caption-subject bold uppercase">Miembros</span>
+                                                </div>
+
+                                                <div class="tools">
+                                                    <a href="javascript:;" class="collapse" data-original-title="" title=""></a>
+                                                </div>
+                                                <div class="actions">
+                                                    <div class="btn-group">
+
+                                                        <div class="text-right" style="">
+                                                            <input type="text" id="TxtBusqueda" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GVUsuarios_TareaNueva.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" />
+                                                            <a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GVUsuarios_TareaNueva.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
+                                                        </div>
+                                                    </div>
+                                                </div>
+                                            </div>
+                                            <div class="portlet-body rowpadding">
                                         <asp:GridView ID="GVUsuarios_TareaNueva" runat="server" AutoGenerateColumns="false" DataKeyNames="CveUsuario,Nombre,Correo,Empresa,CveRol,CveSubProyecto"
                                             CssClass="table table-striped table-advance table-hover Widthall ScrollAD GVUsuarios_TareaNueva" GridLines="None" data-height="200"
                                             OnRowDataBound="GVUsuarios_TareaNueva_RowDataBound">
@@ -180,6 +197,8 @@
                                                 </asp:TemplateField>
                                             </Columns>
                                         </asp:GridView>
+                                                </div>
+                                            </asp:Panel>
                                     </div>
                                 </div>
                             </div>
@@ -240,7 +259,11 @@
         </div>
     </ContentTemplate>
 </asp:UpdatePanel>
+
+
 <script>
+
+  
     function OpenModalNewTareaUserControl(CveTipoEvento, CveEventoPadre, obji/*, CveActivoFijo, CveIE, CveProspecto, CveCliente, CveOS,
         CveOC, CvePersonal, CveProveedor, CveCompra, CveVenta, CveContrato, CveSubProyecto, CveMovimientoAlmacen*/) {
         $('.TxtCveTipoEvento').val(CveTipoEvento);
@@ -324,4 +347,9 @@
         CargaPickerstareanueva();
         loadTxtAsunto();
     });
+
+
+
 </script>
+
+
diff --git a/UserControl/TareaNueva.ascx.cs b/UserControl/TareaNueva.ascx.cs
index 09fc26433..b9640b9cc 100644
--- a/UserControl/TareaNueva.ascx.cs
+++ b/UserControl/TareaNueva.ascx.cs
@@ -74,7 +74,8 @@ public partial class UserControl_TareaNueva : System.Web.UI.UserControl
                 CveEventoPadre = -1;
                 txtCveEventoPadre.Text = "-1";
             }
-            GVUsuarios_TareaNueva.DataSource = get_GlobalDTUsuarios(CveEmpresa: UsuarioActual.CveEmpresa).FiltraParametros("Estatus =1 ", "Rol ASC");
+            string[] FiltroAD = { "CveUsuario", "Usuario", "Nombre", "Contraseña", "CveEmpresa", "Rol", "Correo", "Empresa", "CveRol", "CveSubProyecto" };
+            GVUsuarios_TareaNueva.DataSource = get_GlobalDTUsuarios().FiltraParametros(String.Format("CveEmpresa = {0} AND Estatus =1", UsuarioActual.CveEmpresa), "Rol ASC", FiltroAD);
 
             DdlPara.DataSource = GVUsuarios_TareaNueva.DataSource;
             DdlPara.DataBind();

From 521ae247e99bc698bcda67c952fd1b6f927d5dbf Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Fri, 16 Apr 2021 18:02:44 -0700
Subject: [PATCH 09/22] - cambio de tipomovto

---
 Bancos/DepositosCaja.aspx.vb | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/Bancos/DepositosCaja.aspx.vb b/Bancos/DepositosCaja.aspx.vb
index ee5338040..631e84212 100644
--- a/Bancos/DepositosCaja.aspx.vb
+++ b/Bancos/DepositosCaja.aspx.vb
@@ -86,7 +86,7 @@ Partial Class Bancos_DepositosCaja
         TotalImportePrePoliza = TotalImporte
         If Comision <> 0 Then
             TotalImporte = TotalImporte + Comision
-            Comision = -(Comision) ' se inverte el valor, va cargada
+            'Comision = -(Comision) ' se inverte el valor, va cargada
             If DdlSubProyectoDeposito.SelectedValue.ToEntero = -1 Or DdlClasificacion.SelectedValue.ToEntero = -1 Then
                 Alert("Debes Seleccionar un Subproyecto y una Clasificación", TipoMensaje.MsgAdvertencia)
                 Exit Sub
@@ -144,7 +144,7 @@ Partial Class Bancos_DepositosCaja
                 CveSubProyecto = DdlSubProyectoDeposito.SelectedValue.ToEntero
                 CveClasificacion = DdlClasificacion.SelectedValue.ToEntero
 
-                If Not ObjContabilidad.AddPrePolizasDetalle(NuevaCvePrePoliza, False, Comision, "Comisión", 51, "Depósito Bancario ", Fecha, IdCuentaBancariaOrigen, -1, CveClasificacion:=CveClasificacion, CveSubProyecto:=CveSubProyecto, ImporteMX:=Comision * TipoCambio, CveCuenta:=CveCuentaBancariaOrigen) Then
+                If Not ObjContabilidad.AddPrePolizasDetalle(NuevaCvePrePoliza, True, Comision, "Comisión", 51, "Depósito Bancario ", Fecha, IdCuentaBancariaOrigen, -1, CveClasificacion:=CveClasificacion, CveSubProyecto:=CveSubProyecto, ImporteMX:=Comision * TipoCambio, CveCuenta:=CveCuentaBancariaOrigen) Then
                     OcurrioError = True
                 End If
             End If

From 06cf284ee2c8db588896b0ac876c05dc8956cfd2 Mon Sep 17 00:00:00 2001
From: HECTOR RODRIGUEZ <hecttor201@gmail.com>
Date: Fri, 16 Apr 2021 18:25:44 -0700
Subject: [PATCH 10/22] Ajuste

---
 Bancos/DepositosCaja.aspx | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/Bancos/DepositosCaja.aspx b/Bancos/DepositosCaja.aspx
index a343d0e94..ab57d8fba 100644
--- a/Bancos/DepositosCaja.aspx
+++ b/Bancos/DepositosCaja.aspx
@@ -227,7 +227,6 @@
 
         var ValorTotalSeleccionado = 0
         var comision = 0;
-        var comisionNegativa = 0;
 
         function FnSuma(chk, cantidad) {
             var saldo = ToDouble($('#C_lblValorTotal').text());
@@ -244,6 +243,7 @@
         function txtSuma(txt) {
             var saldo = ToDouble($('#C_lblValorTotal').text());
             var comision2 = ToDouble($('#C_TxtComision').val());
+            var comisionNegativa = 0;
             if (comision2 < 0) {
                 comisionNegativa = comision2 * -1
             }
@@ -251,8 +251,7 @@
                 $('#C_TxtComision').val(comision)
                 alert("No es posible poner una comision superior a lo seleccionado")
             } else {
-                comision2 = comision2 - comision
-                saldo = saldo + comision2;
+                saldo = ValorTotalSeleccionado + comision2;
                 $('#C_lblValorTotal').text(FormatoNumero(saldo, 2));
                 comision = ToDouble($('#C_TxtComision').val())
             }

From f1ba48c0613ab722a057c6c5dc0f4cb9b6043cef Mon Sep 17 00:00:00 2001
From: HECTOR RODRIGUEZ <hecttor201@gmail.com>
Date: Fri, 16 Apr 2021 18:26:30 -0700
Subject: [PATCH 11/22] Agregar a el filtro medio de captacion el valor de
 todos

---
 CRM/CatEmpresasCRM.aspx.cs | 1 +
 1 file changed, 1 insertion(+)

diff --git a/CRM/CatEmpresasCRM.aspx.cs b/CRM/CatEmpresasCRM.aspx.cs
index 61451a357..3f91131e8 100644
--- a/CRM/CatEmpresasCRM.aspx.cs
+++ b/CRM/CatEmpresasCRM.aspx.cs
@@ -64,6 +64,7 @@ public partial class CRM_CatEmpresasCRM : ClsPaginas
         {
             DdlMedioCaptacion.DataSource = ObjCRM.DtResultados.FiltraParametros(String.Format("CveTipoProceso = {0}",DdlTipoProceso.SelectedValue));
             DdlMedioCaptacion.DataBind();
+            DdlMedioCaptacion.Items.Insert(0, new ListItem("Todos", "-1"));
         }
         ObjCRM.Dispose();
     }

From 8fbd82bf9e32d04fc841c9776a67a760a8ff2455 Mon Sep 17 00:00:00 2001
From: HECTOR RODRIGUEZ <hecttor201@gmail.com>
Date: Mon, 19 Apr 2021 01:00:27 -0700
Subject: [PATCH 12/22] Descuento

---
 Bancos/DepositosCaja.aspx    | 47 ++++++++++++++++++++++++++++++++----
 Bancos/DepositosCaja.aspx.vb | 34 ++++++++++++++++++++------
 2 files changed, 69 insertions(+), 12 deletions(-)

diff --git a/Bancos/DepositosCaja.aspx b/Bancos/DepositosCaja.aspx
index ab57d8fba..dbbec3d15 100644
--- a/Bancos/DepositosCaja.aspx
+++ b/Bancos/DepositosCaja.aspx
@@ -137,13 +137,15 @@
                 </div>
             </div>
             <div class="row">
-
-                 <div class="col-md-3" runat="server" Id="DivComision" Visible="false">
+                <div class="col-md-2" runat="server" id="DivFaltante">
+                    <asp:CheckBox ID="ChkFaltante" runat="server" Text="Faltante/Sobrante"/>
+                </div>
+                 <div class="col-md-3" id="DivComision" style="display: none">
                     <label style="width: 105px; ">Faltante/Sobrante:</label>
                     <asp:TextBox runat="server" ID="TxtComision" Class=" input-sm "  Width="75px"></asp:TextBox>
                 </div>
 
-                    <label class="col-md-1 truncate" style="width: 120px; font-size:1.2em; display: none" id="LblSubproyecto" >SubProyecto:</label>
+                    <label class="col-md-1 truncate" style="width: 120px; display: none" id="LblSubproyecto" >SubProyecto:</label>
                     <div class="col-md-2"  style="display: none" id="divSubProyecto">
                     <asp:DropDownList ID="DdlSubProyectoDeposito" runat="server" AppendDataBoundItems="true" DataTextField="SubProyecto" DataValueField="CveSubProyecto" Class="table-group-action-input form-control input-inline input-small input-sm select2me">                                   
                     </asp:DropDownList>
@@ -155,6 +157,23 @@
                     </asp:DropDownList>
                 </div>
             </div>
+            <br />
+              <div class="row">
+                <div class="col-md-2" runat="server" id="Div1">
+                    <asp:CheckBox ID="ChkDescuento" runat="server" Text="Descuento"/>
+                </div>
+                 <div class="col-md-3" id="DivDescuento" style="display: none">
+                    <label style="width: 105px; ">Descuento:</label>
+                    <asp:TextBox runat="server" ID="TxtDescuento" Class=" input-sm "  Width="75px"></asp:TextBox>
+                </div>
+
+                <label class="col-md-1 truncate" style="width: 120px; display: none" id="LblClasificacionDescuento">Clasificación:</label>
+                <div class="col-md-2" style="display: none" id="divClasificacionDescuento">
+                    <asp:DropDownList  ID="DdlClasificacionDescuento" AutoPostBack="false" CssClass=" form-control input-sm select2me" runat="server"  Width="100%" AppendDataBoundItems="true" DataTextField="Clasificacion" DataValueField="CveClasificacion">
+                    </asp:DropDownList>
+                </div>
+            </div>
+
             <br />
             <div style="height:550px;overflow-x:scroll">
                 <asp:GridView ID="GvFacturas" runat="server" AutoGenerateColumns="False" DataKeyNames="CveVenta, CvePrePoliza, CveIE, TipoCambio, CveMoneda, CveCliente, IdCtaContableBancos, IdCtaContClientes, Importe, SerieFolio" CssClass="table table-striped table-advance table-hover" Style="text-align: center; float: right; width: 100%; " GridLines="None">
@@ -255,8 +274,12 @@
                 $('#C_lblValorTotal').text(FormatoNumero(saldo, 2));
                 comision = ToDouble($('#C_TxtComision').val())
             }
+                
+        }
 
-            if (comision != 0) {
+        function CheckFaltante(chk) {
+            if (chk.checked == true) {
+                $('#DivComision').css("display", "block");
                 $('#LblSubproyecto').css("display", "block");
                 $('#divSubProyecto').css("display", "block");
                 $('#LblClasificacion').css("display", "block");
@@ -265,16 +288,30 @@
                 debugger;
 
             } else {
+                $('#DivComision').css("display", "none");
                 $('#LblSubproyecto').css("display", "none");
                 $('#divSubProyecto').css("display", "none");
                 $('#LblClasificacion').css("display", "none");
                 $('#divClasificacion').css("display", "none");
                 debugger;
             }
-                
         }
 
+        function CheckDescuento(chk) {
+            if (chk.checked == true) {
+                $('#DivDescuento').css("display", "block");
+                $('#LblClasificacionDescuento').css("display", "block");
+                $('#divClasificacionDescuento').css("display", "block");
 
+                debugger;
+
+            } else {
+                $('#DivDescuento').css("display", "none");
+                $('#LblClasificacionDescuento').css("display", "none");
+                $('#divClasificacionDescuento').css("display", "none");
+                debugger;
+            }
+        }
     </script>
 
 
diff --git a/Bancos/DepositosCaja.aspx.vb b/Bancos/DepositosCaja.aspx.vb
index d04585cfc..675996c41 100644
--- a/Bancos/DepositosCaja.aspx.vb
+++ b/Bancos/DepositosCaja.aspx.vb
@@ -24,6 +24,9 @@ Partial Class Bancos_DepositosCaja
             TxtComision.Attributes.Add("onKeyUp", "txtSuma(event);")
 
             CargaCuentas()
+            ChkFaltante.Attributes.Add("onclick", "CheckFaltante(this);")
+            ChkDescuento.Attributes.Add("onclick", "CheckDescuento(this);")
+
         End If
     End Sub
 
@@ -40,9 +43,13 @@ Partial Class Bancos_DepositosCaja
 
         DdlSubProyectoDeposito.DataSource = GlobalDTSubProyectosUsuarios(UsuarioActual.CveUsuario, -1, UsuarioActual.CveEmpresa)
         DdlSubProyectoDeposito.DataBind()
+        DdlSubProyectos.Items.Insert(0, New ListItem("Seleccione", "-1"))
+
 
         DdlClasificacion.DataSource = GlobalDTClasificaciones(UsuarioActual.CveEmpresa, UsoClasificacion:=2)
         DdlClasificacion.DataBind()
+        DdlSubProyectos.Items.Insert(0, New ListItem("Seleccione", "-1"))
+
     End Sub
 
     Private Sub BtnConsultar_Click(sender As Object, e As EventArgs) Handles BtnConsultar.Click
@@ -64,14 +71,15 @@ Partial Class Bancos_DepositosCaja
         GvFacturas.DataBind()
         lblValorTotal.Text = "0.00"
         divLabelTotal.Visible = True
-        DivComision.Visible = True
     End Sub
 
     Private Sub BtnDepositar_Click(sender As Object, e As EventArgs) Handles BtnDepositar.Click
 
         Dim TotalImporte As Decimal = 0
         Dim TotalImportePrePoliza As Decimal
-        Dim Comision As Decimal = TxtComision.Text.Todecimal
+        Dim Comision As Decimal = TxtComision.Text.ToDecimal
+        Dim Descuento As Decimal = TxtDescuento.Text.ToDecimal
+
 
         For Each Gvr As GridViewRow In GvFacturas.Rows
             If Gvr.FCCheckBox("ChkFactura").Checked Then TotalImporte += Gvr.DataKey("Importe").ToDecimal
@@ -84,8 +92,9 @@ Partial Class Bancos_DepositosCaja
 
         TotalImportePrePoliza = TotalImporte
         If Comision <> 0 Then
-            TotalImporte = TotalImporte + Comision
+            TotalImporte = TotalImporte + Comision + Descuento
             Comision = -(Comision) ' se inverte el valor, va cargada
+            Descuento = -(Descuento) ' se inverte el valor, va cargada
             If DdlSubProyectoDeposito.SelectedValue.ToEntero = -1 Or DdlClasificacion.SelectedValue.ToEntero = -1 Then
                 Alert("Debes Seleccionar un Subproyecto y una Clasificación", TipoMensaje.MsgAdvertencia)
                 Exit Sub
@@ -111,6 +120,8 @@ Partial Class Bancos_DepositosCaja
         Dim drDestino As DataRow = GlobalDTBancosCuentas(UsuarioActual.CveUsuario, CveCuenta:=DdlCuentaDeposito.SelectedValue.ToEntero, CveEmpresa:=UsuarioActual.CveEmpresa).FiltroPrimero("")
         Dim CveSubProyecto As Integer = 0
         Dim CveClasificacion As Integer = 0
+        Dim CveClasificacionDescuento As Integer = 0
+
         Dim documentos As String = "Los Depósitos se realizaron exitósamente<br/><br/>"
         Dim imprimirFolios As String = ""
         If drOrigen IsNot Nothing Then
@@ -137,13 +148,22 @@ Partial Class Bancos_DepositosCaja
         documentos += String.Format("<a href='/Bancos/IE.aspx?CveIE={0}' target='_blank' class='Texto'>Depósito: {1}</a>  &nbsp &nbsp <br/> ", CveIEOrigen, FolioIE)
 
 
-        If ObjContabilidad.AddPrePolizasDetalle(NuevaCvePrePoliza, False, TotalImporte, "Depósito Bancario", 30, "Depósito Bancario", Fecha, IdCuentaBancariaOrigen, -1, CveIE:=CveIEOrigen, ImporteMX:=TotalImporte * TipoCambio, CveCuenta:=CveCuentaBancariaOrigen) Then
+        If ObjContabilidad.AddPrePolizasDetalle(NuevaCvePrePoliza, False, TotalImporte, "Depósito Bancario", 30, "Depósito Bancario", Fecha, IdCuentaBancariaOrigen, -1, CveClasificacion:=CveClasificacion, CveSubProyecto:=CveSubProyecto, CveIE:=CveIEOrigen, ImporteMX:=TotalImporte * TipoCambio, CveCuenta:=CveCuentaBancariaOrigen) Then
 
-            If Comision <> 0 Then
+            If ChkFaltante.Checked Then
                 CveSubProyecto = DdlSubProyectoDeposito.SelectedValue.ToEntero
                 CveClasificacion = DdlClasificacion.SelectedValue.ToEntero
 
-                If Not ObjContabilidad.AddPrePolizasDetalle(NuevaCvePrePoliza, False, Comision, "Comisión", 51, "Depósito Bancario ", Fecha, IdCuentaBancariaOrigen, -1, CveClasificacion:=CveClasificacion, CveSubProyecto:=CveSubProyecto, ImporteMX:=Comision * TipoCambio, CveCuenta:=CveCuentaBancariaOrigen) Then
+                If Not ObjContabilidad.AddPrePolizasDetalle(NuevaCvePrePoliza, False, Comision, DdlClasificacion.SelectedItem.Text, 51, DdlClasificacion.SelectedItem.Text, Fecha, IdCuentaBancariaOrigen, -1, CveClasificacion:=CveClasificacion, CveSubProyecto:=CveSubProyecto, ImporteMX:=Comision * TipoCambio, CveCuenta:=CveCuentaBancariaOrigen) Then
+                    OcurrioError = True
+                End If
+            End If
+
+            If ChkDescuento.Checked Then
+                CveSubProyecto = DdlSubProyectoDeposito.SelectedValue.ToEntero
+                CveClasificacionDescuento = DdlClasificacionDescuento.SelectedValue.ToEntero
+
+                If Not ObjContabilidad.AddPrePolizasDetalle(NuevaCvePrePoliza, False, Descuento, DdlClasificacionDescuento.SelectedItem.Text, 51, DdlClasificacionDescuento.SelectedItem.Text, Fecha, IdCuentaBancariaOrigen, -1, CveClasificacion:=CveClasificacionDescuento, CveSubProyecto:=CveSubProyecto, ImporteMX:=Comision * TipoCambio, CveCuenta:=CveCuentaBancariaOrigen) Then
                     OcurrioError = True
                 End If
             End If
@@ -172,7 +192,7 @@ Partial Class Bancos_DepositosCaja
                 CveIEDestino = ObjBancos.AddBancos_IE(DdlCajaChica.SelectedValue.ToEntero, 2, Fecha, FolioIE.ToString, String.Format("Depósito Bancario: {0}", SerieFolio), Importe, CveMoneda, 1, "Depósito Bancario", "", False, False, -1, NuevaCvePrePoliza, "-1", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa)
 
 
-                If Not ObjContabilidad.AddPrePolizasDetalle(NuevaCvePrePoliza, True, Importe, SerieFolio, 30, String.Format("Depósito Bancario: {0}", SerieFolio), Fecha, IdCuentaBancariaDestino, -1, CveIE:=CveIEDestino, ImporteMX:=Importe * TipoCambio, CveCuenta:=CveCuentaBancariaDestino) Then
+                If Not ObjContabilidad.AddPrePolizasDetalle(NuevaCvePrePoliza, True, Importe, SerieFolio, 30, String.Format("Depósito Bancario: {0}", SerieFolio), Fecha, IdCuentaBancariaDestino, -1, CveClasificacion:=CveClasificacion, CveSubProyecto:=CveSubProyecto, CveIE:=CveIEDestino, ImporteMX:=Importe * TipoCambio, CveCuenta:=CveCuentaBancariaDestino) Then
                     OcurrioError = True
                 End If
 

From ef2ee4d324a68736bcf03a51f92cd655da1acadc Mon Sep 17 00:00:00 2001
From: rakcsle <rakcsle.rakcsle@gmail.com>
Date: Mon, 19 Apr 2021 10:32:43 -0700
Subject: [PATCH 13/22] Compras Contratos

---
 Compras/Compras.aspx           |  87 +++++++++++++++--------
 Compras/Compras.aspx.vb        | 124 ++++++++++++++++++++++++++++++++-
 Contratos/ContratoObra.aspx.vb |   2 +-
 3 files changed, 181 insertions(+), 32 deletions(-)

diff --git a/Compras/Compras.aspx b/Compras/Compras.aspx
index 7064cbbec..f0c780a36 100644
--- a/Compras/Compras.aspx
+++ b/Compras/Compras.aspx
@@ -122,6 +122,19 @@
         </ContentTemplate>
     </asp:UpdatePanel>
 
+
+    <%--2021-04-15 contratos de obra--%>
+    <asp:UpdatePanel ID="UpAccionesContratosObra" runat="server" UpdateMode="Conditional">
+
+        <ContentTemplate>
+            <li style="text-align: left!important" runat="server" id="LIContratos" visible="false">
+                <asp:LinkButton runat="server" ID="LnkAcontratos" CssClass="" data-toggle="tooltip" data-placement="left" OnClick="LnkAcontratos_Click" title="Contratos" Text="<i class='fa fa-file-text'></i> Contratos"></asp:LinkButton>
+            </li>
+        </ContentTemplate>
+         
+    </asp:UpdatePanel>
+   
+
 </asp:Content>
 <asp:Content ID="Content6" ContentPlaceHolderID="CP" runat="Server">
 </asp:Content>
@@ -5332,16 +5345,12 @@
         </div>
     </div>--%>
 
-
-
-
-
-
-    <div id="DivmodalConmtrato" class="modal ADS fade">
+    
+        <div id="DivmodalConmtrato" class="modal ADS fade">
         <div class="modal-dialog">
             <asp:UpdatePanel ID="UpModalContrato" runat="server" class="modal-content rowpadding" tabindex="-1" UpdateMode="Conditional">
                 <ContentTemplate>
-
+                    
                     <div class="modal-header">
                         <button type="button" class="close" data-dismiss="modal">&times;</button>
                         <h4>
@@ -5353,25 +5362,25 @@
                         <div class="row">
 
                             <div class="col-md-6">
-                                <div class="form-group form-md-line-input input-iconright">
-                                    <asp:DropDownList runat="server" ID="DdlContratosObra" AutoPostBack="true" OnSelectedIndexChanged="DdlContratosObra_SelectedIndexChanged" DataTextField="ContratoCompleto" DataValueField="CveContrato" CssClass="form-control input-sm select2me" Width="100%">
-                                        <asp:ListItem Value="-1">Seleccione uno</asp:ListItem>
-                                    </asp:DropDownList>
-                                    <label for="<%= DdlContratosObra.ClientID.ToString()%>">Contrato:</label>
-                                </div>
+                                 <div class="form-group form-md-line-input input-iconright">
+                                <asp:DropDownList runat="server" ID="DdlContratosObra" AutoPostBack="true" OnSelectedIndexChanged="DdlContratosCompras_SelectedIndexChanged" DataTextField="ContratoCompleto" DataValueField="CveContrato" CssClass="form-control input-sm select2me" Width="100%">
+                                    <asp:ListItem Value="-1">Seleccione uno</asp:ListItem>
+                                </asp:DropDownList>
+                                <label for="<%= DdlContratosObra.ClientID.ToString()%>">Contrato:</label>
+                                     </div>
                             </div>
 
 
                             <div class="col-md-6">
                                 <div class="form-group form-md-line-input input-iconright">
-                                    <asp:DropDownList ID="DdlTipoGastoObra" runat="server" DataTextField="TipoGasto" DataValueField="CveTipoGasto" AppendDataBoundItems="true" CssClass="form-control input-sm select2me" Width="100%">
+                                    <asp:DropDownList ID="DdlTipoGastoContrato" runat="server" DataTextField="TipoGasto" DataValueField="CveTipoGasto"   AppendDataBoundItems="true" CssClass="form-control input-sm select2me"  Width="100%">
                                         <asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem>
                                     </asp:DropDownList>
-                                    <label for="<%= DdlTipoGastoObra.ClientID.ToString()%>">Tipo de Gasto:</label>
+                                    <label for="<%= DdlTipoGastoContrato.ClientID.ToString()%>">Tipo de Gasto:</label>
 
 
-                                    <asp:RequiredFieldValidator runat="server" Enabled="true" InitialValue="-1" Display="None" ID="RFVDdlTipoGastoObra" ControlToValidate="DdlTipoGastoObra" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Tipo de Gasto''</b> es necesario, por favor seleccione uno." ValidationGroup="GrpAplicaContrato"></asp:RequiredFieldValidator>
-                                    <ajax:ValidatorCalloutExtender ID="CERFVDdlTipoGastoObra" runat="server" HighlightCssClass="vco" TargetControlID="RFVDdlTipoGastoObra" Width="300px"></ajax:ValidatorCalloutExtender>
+                                      <asp:RequiredFieldValidator runat="server" Enabled="true" InitialValue="-1" Display="None" ID="RFVDdlTipoGastoContrato" ControlToValidate="DdlTipoGastoContrato"  ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Tipo de Gasto''</b> es necesario, por favor seleccione uno." ValidationGroup="GrpAplicaContrato"></asp:RequiredFieldValidator>
+                                      <ajax:ValidatorCalloutExtender ID="CERFVDdlTipoGastoContrato" runat="server" HighlightCssClass="vco" TargetControlID="RFVDdlTipoGastoContrato" Width="300px"></ajax:ValidatorCalloutExtender>
 
 
                                 </div>
@@ -5382,7 +5391,7 @@
                             <div class="col-md-12">
 
                                 <asp:GridView ID="GvContratosControl" runat="server" AutoGenerateColumns="false" EmptyDataText="No se encontraron partidas"
-                                    DataKeyNames="CveContratoDetalle,CvePS,PS,Cantidad,PU,CantidadMax,CveUnidadMedida,Abreviatura,CveSubProyecto,SubProyecto,Codigo,CveProyecto,Proyecto,IVA,RetISR,RetIVA,IEPSPorcentaje,IEPSGrabaIVA,CveClasificacion,Clasificacion,CveTipoPS,CveSATPS"
+                                    DataKeyNames="CveContratoDetalle,CvePS,PS,Cantidad,PU,CantidadMax,CveUnidadMedida,Abreviatura,CveSubProyecto,SubProyecto,Codigo,CveProyecto,Proyecto,IVA,RetISR,RetIVA,IEPSPorcentaje,IEPSGrabaIVA,CveClasificacion,Clasificacion"
                                     CssClass="table GVEstimacion table-advance table-hover" GridLines="None" Width="100%">
                                     <Columns>
 
@@ -5394,21 +5403,21 @@
 
                                         <asp:TemplateField HeaderText="Cantidad">
                                             <ItemTemplate>
-                                                <asp:TextBox ID="TxtCantidad" Text="" type="number" step="any"
+                                                <asp:TextBox ID="TxtCantidad" Text="" CssClass="txtcant" onkeyup="ValidateCantCon(this)" type="number" step="any"
+                                                    data-cantidad='<%# Eval("CantidadMax")%>' data-pu='<%# Eval("PU")%>' data-cve='<%# Eval("CveContratoDetalle") %>'
                                                     Width="90" runat="server"></asp:TextBox>
                                             </ItemTemplate>
                                         </asp:TemplateField>
 
                                         <asp:TemplateField HeaderText="PU">
                                             <ItemTemplate>
-                                                <asp:TextBox runat="server" ID="TxtPU" Text='<%# Eval("PU", "{0:N2}")%>' type="number" step="any" Width="60px">
-                                                </asp:TextBox>
+                                                <span><%# Eval("PU", "{0:N2}")%></span>
                                             </ItemTemplate>
                                         </asp:TemplateField>
 
                                         <asp:TemplateField HeaderText="Importe">
                                             <ItemTemplate>
-                                                <asp:TextBox ID="TxtImporte" Text="" CssClass='<%# String.Format("ImporteCSS CssImporte{0}", Eval("CveContratoDetalle")) %>' type="number" step="any" Width="90" runat="server" onkeydown="keydownenabledtab(event)"></asp:TextBox>
+                                                <asp:TextBox ID="TxtImporte" Text="" data-cve='<%# Eval("CveContratoDetalle") %>' CssClass="txtimporte" type="number" step="any" Width="90" runat="server" onkeydown="keydownenabledtab(event)"></asp:TextBox>
                                             </ItemTemplate>
                                         </asp:TemplateField>
 
@@ -5418,17 +5427,12 @@
                             </div>
                         </div>
 
-                        <div class="col-md-10" style="text-align: right!important">Sub Total: </div>
-                        <div class="col-md-2">
-                            <asp:Label runat="server" ClientIDMode="Static" ID="LblTotalContrato"></asp:Label>
-                        </div>
 
-                        <br />
 
                     </div>
-                    <div class="modal-footer">
-
-                        <asp:Button ID="BtnAplicarContrato" runat="server" Text="Aceptar" ClientIDMode="Static" CssClass="btn btn-success" OnClick="BtnAplicarContrato_Click" ValidationGroup="GrpAplicaContrato" CausesValidation="true" />
+                    <div class="modal-footer">    
+                                            
+                        <asp:Button ID="BtnAplicarContrato" runat="server" Text="Aceptar" ClientIDMode="Static" CssClass="btn btn-success" OnClick="BtnAplicarContrato_Click"  Visible="false" ValidationGroup="GrpAplicaContrato" CausesValidation="true" />
                         <button type="button" class="btn default" data-dismiss="modal">Cancelar</button>
 
                     </div>
@@ -5438,6 +5442,9 @@
     </div>
 
 
+
+ 
+
 </asp:Content>
 <asp:Content ID="Content4" ContentPlaceHolderID="JS" runat="server">
     <script src="/Metronic/assets/global/plugins/jquery.pulsate.min.js"></script>
@@ -6607,6 +6614,26 @@
 
         }
 
+
+
+
+        function ValidateCantCon(variable) {
+
+            var txt = $(variable);
+            var max = txt.data('cantidad');
+            var value = parseInt(txt.val());
+            if (value > max) {
+                txt.val(max);
+            }
+            if (value < 0) {
+                txt.val(0);
+            }
+
+            var importe = $('.txtimporte[data-cve="' + txt.data('cve') + '"]');
+            importe.val(parseFloat(txt.val()) * parseFloat(txt.data('pu')));
+
+        }
+
     </script>
 
 </asp:Content>
diff --git a/Compras/Compras.aspx.vb b/Compras/Compras.aspx.vb
index ef1b08555..401384bb9 100644
--- a/Compras/Compras.aspx.vb
+++ b/Compras/Compras.aspx.vb
@@ -1478,6 +1478,10 @@ Partial Class Compras_Compras
                 UpLnkPaqueteriaGuias.Update()
             End If
 
+            If Not CveCompra > 0 And UsuarioActual.CveRol = 1 Then
+                LIContratos.Visible = True
+            End If
+
             'SI ES UNA COMPRA NUEVA SE PONE EL TOTAL, SI NO EL SALDO
             LblSaldoFactura.Text = If(CveCompra > 0, Saldo.FormatoNumero, TxtTotal.Text.FormatoNumero)
             'cuando es factura con amortizacion, el importe a descontar es el saldo que se debe de aplicar para la amortizacion
@@ -20821,10 +20825,128 @@ Partial Class Compras_Compras
 
     End Sub
 
-    Protected Sub BtnAplicarContrato_Click(sender As Object, e As EventArgs)
+
+
+#Region "Contratos Obra"
+
+    Protected Sub LnkAcontratos_Click(sender As Object, e As EventArgs)
+
+
+        DdlContratosObra.Items.Clear()
+        DdlContratosObra.DataSource = GlobalDTContratos.FiltraParametros(String.Format($"CveContratoTipo in (30,31) AND CveEmpresa = {UsuarioActual.CveEmpresa}"))
+        DdlContratosObra.DataBind()
+        DdlContratosObra.Items.Insert(0, New ListItem("Seleccione", "-1"))
+
+
+        DdlTipoGastoContrato.Items.Clear()
+        DdlTipoGastoContrato.DataSource = GlobalDTTiposGastos(UsuarioActual.CveEmpresa)
+        DdlTipoGastoContrato.DataBind()
+        DdlTipoGasto.Items.Insert(0, New ListItem("Seleccione", "-1"))
+
+        RegistraScript("$('#DivmodalConmtrato').modal('show')")
+        UpModalContrato.Update()
 
     End Sub
 
+
+    Protected Sub DdlContratosCompras_SelectedIndexChanged(sender As Object, e As EventArgs)
+
+
+        If DdlContratosObra.SelectedValue.ToEntero > 0 Then
+            Dim ObjContratos As New ClsContratos()
+
+            If ObjContratos.GetContratosObraCompras(DdlContratosObra.SelectedValue.ToEntero, UsuarioActual.CveEmpresa) Then
+
+                If ObjContratos.DtResultados.Rows.Count > 0 Then
+                    GvContratosControl.DataSource = ObjContratos.DtResultados
+                    BtnAplicarContrato.Visible = True
+                Else
+                    GvContratosControl.DataSource = Nothing
+                    BtnAplicarContrato.Visible = False
+                End If
+
+            End If
+
+
+            ObjContratos.Dispose()
+
+            GvContratosControl.DataBind()
+
+            UpModalContrato.Update()
+        End If
+
+
+
+    End Sub
+
+
+    Protected Sub BtnAplicarContrato_Click(sender As Object, e As EventArgs)
+
+
+        TmpDT.Rows.Clear()
+
+        Dim CveTipoGastoObra As Integer = DdlTipoGastoContrato.SelectedValue.ToEntero
+        Dim TuipoGasto As String = DdlTipoGastoContrato.SelectedItem.Text
+
+        For Each GvRow As GridViewRow In GvContratosControl.Rows
+
+            Dim CveContratoDetalle As Integer = GvRow.DataKey("CveContratoDetalle").ToEntero
+
+            Dim Cantidad As Double = GvRow.FCTextBox("TxtCantidad").Text.ToDouble
+            Dim CvePS As Integer = GvRow.DataKey("CvePS").ToEntero
+            Dim PS As String = GvRow.DataKey("PS")
+            Dim PU As Double = GvRow.DataKey("PU").ToDouble
+            Dim TotalPS As Double = GvRow.FCTextBox("TxtImporte").Text.ToDouble
+            Dim CveUnidadMedida As Integer = GvRow.DataKey("CveUnidadMedida").ToEntero
+            Dim UMAbreviatura As String = GvRow.DataKey("Abreviatura").ToString
+
+            Dim SubProyecto As String = GvRow.DataKey("SubProyecto")
+            Dim CveSubProyecto As Integer = GvRow.DataKey("CveSubProyecto").ToEntero
+            Dim Codigo As String = "" 'GvRow.DataKey("Codigo")
+
+            Dim Proyecto As String = GvRow.DataKey("Proyecto")
+            Dim CveProyecto As Integer = GvRow.DataKey("CveProyecto").ToEntero
+
+            Dim RetISR As Double = GvRow.DataKey("RetISR").ToString.ToDouble
+            Dim RetIVA As Double = GvRow.DataKey("RetIVA").ToString.ToDouble
+            Dim IvaPS As Double = GvRow.DataKey("IVA").ToString.ToDouble
+
+            Dim CveClasificacion As Integer = GvRow.DataKey("CveClasificacion").ToString.ToEntero
+            Dim Clasificacion As String = GvRow.DataKey("Clasificacion")
+
+
+            Dim IEPSPS As Double = GvRow.DataKey("IEPSPorcentaje").ToString.ToDouble
+            Dim IEPSPSIVA As Double = If(GvRow.DataKey("IEPSGrabaIVA").ToString = "True", IEPSPS, 0)
+
+            Dim IdCuentaPorEjercer As Integer = -1
+            Dim IdCuentaComprometido As Integer = -1
+
+
+
+
+            If Cantidad > 0 Then
+
+                AddPS(Cantidad, CveUnidadMedida, UMAbreviatura, CveClasificacion, Clasificacion, CvePS, PS, 1, CveSubProyecto.ToString, SubProyecto, Proyecto, CveProyecto.ToString, "", PU, PU * Cantidad, IvaPS, RetIVA, RetISR, IEPSPS, IEPSPSIVA, 0, CveContratoDetalle:=CveContratoDetalle,
+                      CveTipoGasto:=CveTipoGastoObra, TipoGasto:=TuipoGasto)
+
+
+                'ContratoObraAplciado = True
+
+            End If
+
+        Next
+
+        AddPS2()
+
+
+        RegistraScript("$('#DivmodalConmtrato').modal('hide')")
+
+
+
+    End Sub
+
+#End Region
+
     Protected Sub ChkMostrarTodos_CheckedChanged(sender As Object, e As EventArgs)
         CargaNCINV(ShowAllPendientes:=True)
         UpFacturaNC.Update()
diff --git a/Contratos/ContratoObra.aspx.vb b/Contratos/ContratoObra.aspx.vb
index a6b9a134c..8573e6e37 100644
--- a/Contratos/ContratoObra.aspx.vb
+++ b/Contratos/ContratoObra.aspx.vb
@@ -4622,7 +4622,7 @@ Partial Class Contratos_ContratoObra
                             CveUnidadMedida = GlobalDTUnidadesMedida(CveEmpresa:=UsuarioActual.CveEmpresa).Rows(0)("CveUnidadMedida").ToString.ToEntero
                         End If
 
-                        If ObjPS.AddPS(CveClasificacion, 1, CveUnidadMedida, DrowPS("Codigo").ToString.Trim, "", "", DrowPS("Producto").ToString, DrowPS("PU").ToString.ToDouble, -1, 0, False, 0, False, If(TipoCargaPresupuesto = EnumTipoCargaPresupuesto.Ventas, True, False),
+                        If ObjPS.AddPS(CveClasificacion, 1, CveUnidadMedida, DrowPS("Codigo").ToString.Trim, "", "", DrowPS("Producto").ToString, DrowPS("PU").ToString.ToDouble, 0, 0, False, 0, False, If(TipoCargaPresupuesto = EnumTipoCargaPresupuesto.Ventas, True, False),
                                        UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, 1, 1, CveTipoPS:=2, CveSATPS:=-1, CveMarca:=-1, CveTamaño:=-1, CveMedida:=-1, CveRinTamaño:=-1, CveModelo:=-1, Litraje:=-1, IEPSPorcentaje:=-1, CveClasificacion2:=-1, CveClasificacionDetalle:=-1) > 0 Then
                             CvePS = ObjPS.CvePS
                         Else

From 3d6d4ebefc13f0968ee6f40c7c834dfb446fbda2 Mon Sep 17 00:00:00 2001
From: HECTOR RODRIGUEZ <hecttor201@gmail.com>
Date: Mon, 19 Apr 2021 13:13:02 -0700
Subject: [PATCH 14/22]

---
 Bancos/DepositosCaja.aspx | 1 -
 1 file changed, 1 deletion(-)

diff --git a/Bancos/DepositosCaja.aspx b/Bancos/DepositosCaja.aspx
index dbbec3d15..e316bc77e 100644
--- a/Bancos/DepositosCaja.aspx
+++ b/Bancos/DepositosCaja.aspx
@@ -157,7 +157,6 @@
                     </asp:DropDownList>
                 </div>
             </div>
-            <br />
               <div class="row">
                 <div class="col-md-2" runat="server" id="Div1">
                     <asp:CheckBox ID="ChkDescuento" runat="server" Text="Descuento"/>

From c6ed036bad0fc7af83b03dcc97783d9b2729d24d Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Mon, 19 Apr 2021 13:21:18 -0700
Subject: [PATCH 15/22] =?UTF-8?q?--=20falta=20aplicar=20cambio=20de=20fluc?=
 =?UTF-8?q?tuacion=20de=20amortizaci=C3=B3n=20compra?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 Compras/Compras.aspx.vb | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Compras/Compras.aspx.vb b/Compras/Compras.aspx.vb
index ef1b08555..1eaa9cbbd 100644
--- a/Compras/Compras.aspx.vb
+++ b/Compras/Compras.aspx.vb
@@ -7244,7 +7244,7 @@ Partial Class Compras_Compras
                                                                         If Gvr.FCCheckBox("ChkFacturaNC").Checked Then
                                                                             'Dim CvePrePolizaTemp = ObjConta.AddPrePolizas("Compras/Registrar-NC", If(EsContado And CvePlantillaPrePoliza = 1, 2, CvePlantillaPrePoliza), ImporteCompra, TxtTotal.Text.ToDouble, DdlMoneda.SelectedValue.ToEntero, TxtFecha.Text.ToDate, ConceptoPoliza, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, FolioFijo:=FolioFijo, ReglaFolioPoliza:=ObjCompras.ObtenerReglaFolio(DdlTipoTransaccion.SelectedValue, DdlTipoTransaccionCaja.SelectedValue, UsuarioActual.CveEmpresa), CveTipoPoliza:=ObjConta.ObtenerTipoPoliza(DdlTipoTransaccion.SelectedValue, DdlTipoTransaccionCaja.SelectedValue, UsuarioActual.CveEmpresa))
                                                                             Dim importeMovimientoNC = Gvr.FCTextBox("TxtImporte").Text.ToDecimal
-                                                                            Dim TipoCambioFactura = Gvr.DataKey("TipoCambio").ToDecimal
+                                                                            Dim TipoCambioFactura = Gvr.DataKey("TipoCambio").ToDecimal  ' RMF. falta aplicar si está generada su TC de la última fluctuación
                                                                             Dim importeMNNC = importeMovimientoNC * TipoCambioFactura * Multiplicador
 
                                                                             IdCtaContable = CtaProveedorExtranjera

From dac432d229ad699180612276f2a8b1999cef37e1 Mon Sep 17 00:00:00 2001
From: HECTOR RODRIGUEZ <hecttor201@gmail.com>
Date: Mon, 19 Apr 2021 15:04:32 -0700
Subject: [PATCH 16/22] SubPryecto en descuento

---
 Bancos/DepositosCaja.aspx    | 17 ++++++++++++++---
 Bancos/DepositosCaja.aspx.vb | 18 +++++++++++++-----
 2 files changed, 27 insertions(+), 8 deletions(-)

diff --git a/Bancos/DepositosCaja.aspx b/Bancos/DepositosCaja.aspx
index e316bc77e..de167d9e2 100644
--- a/Bancos/DepositosCaja.aspx
+++ b/Bancos/DepositosCaja.aspx
@@ -141,7 +141,7 @@
                     <asp:CheckBox ID="ChkFaltante" runat="server" Text="Faltante/Sobrante"/>
                 </div>
                  <div class="col-md-3" id="DivComision" style="display: none">
-                    <label style="width: 105px; ">Faltante/Sobrante:</label>
+                    <label style="width: 105px; ">Importe:</label>
                     <asp:TextBox runat="server" ID="TxtComision" Class=" input-sm "  Width="75px"></asp:TextBox>
                 </div>
 
@@ -162,10 +162,16 @@
                     <asp:CheckBox ID="ChkDescuento" runat="server" Text="Descuento"/>
                 </div>
                  <div class="col-md-3" id="DivDescuento" style="display: none">
-                    <label style="width: 105px; ">Descuento:</label>
+                    <label style="width: 105px; ">Importe:</label>
                     <asp:TextBox runat="server" ID="TxtDescuento" Class=" input-sm "  Width="75px"></asp:TextBox>
                 </div>
 
+                <label class="col-md-1 truncate" style="width: 120px; display: none" id="LblSubproyectoDescuento" >SubProyecto:</label>
+                <div class="col-md-2"  style="display: none" id="divSubProyectoDescuento">
+                    <asp:DropDownList ID="DdlSubProyectoDescuento" runat="server" AppendDataBoundItems="true" DataTextField="SubProyecto" DataValueField="CveSubProyecto" Class="table-group-action-input form-control input-inline input-small input-sm select2me">                                   
+                    </asp:DropDownList>
+                </div>
+
                 <label class="col-md-1 truncate" style="width: 120px; display: none" id="LblClasificacionDescuento">Clasificación:</label>
                 <div class="col-md-2" style="display: none" id="divClasificacionDescuento">
                     <asp:DropDownList  ID="DdlClasificacionDescuento" AutoPostBack="false" CssClass=" form-control input-sm select2me" runat="server"  Width="100%" AppendDataBoundItems="true" DataTextField="Clasificacion" DataValueField="CveClasificacion">
@@ -288,7 +294,7 @@
 
             } else {
                 $('#DivComision').css("display", "none");
-                $('#LblSubproyecto').css("display", "none");
+                $('#divSubProyecto').css("display", "none");
                 $('#divSubProyecto').css("display", "none");
                 $('#LblClasificacion').css("display", "none");
                 $('#divClasificacion').css("display", "none");
@@ -299,13 +305,18 @@
         function CheckDescuento(chk) {
             if (chk.checked == true) {
                 $('#DivDescuento').css("display", "block");
+                $('#LblSubproyectoDescuento').css("display", "block");
+                $('#divSubProyectoDescuento').css("display", "block");
                 $('#LblClasificacionDescuento').css("display", "block");
                 $('#divClasificacionDescuento').css("display", "block");
 
                 debugger;
 
             } else {
+                
                 $('#DivDescuento').css("display", "none");
+                $('#LblSubproyectoDescuento').css("display", "none");
+                $('#divSubProyectoDescuento').css("display", "none");
                 $('#LblClasificacionDescuento').css("display", "none");
                 $('#divClasificacionDescuento').css("display", "none");
                 debugger;
diff --git a/Bancos/DepositosCaja.aspx.vb b/Bancos/DepositosCaja.aspx.vb
index cd06f1e44..b26fa368c 100644
--- a/Bancos/DepositosCaja.aspx.vb
+++ b/Bancos/DepositosCaja.aspx.vb
@@ -41,15 +41,22 @@ Partial Class Bancos_DepositosCaja
         DdlSubProyectos.DataBind()
         DdlSubProyectos.Items.Insert(0, New ListItem("Todos", "-1"))
 
-        DdlSubProyectoDeposito.DataSource = GlobalDTSubProyectosUsuarios(UsuarioActual.CveUsuario, -1, UsuarioActual.CveEmpresa)
+        DdlSubProyectoDeposito.DataSource = DdlSubProyectos.DataSource
         DdlSubProyectoDeposito.DataBind()
         DdlSubProyectos.Items.Insert(0, New ListItem("Seleccione", "-1"))
 
+        DdlSubProyectoDescuento.DataSource = DdlSubProyectos.DataSource
+        DdlSubProyectoDescuento.DataBind()
+        DdlSubProyectos.Items.Insert(0, New ListItem("Seleccione", "-1"))
 
         DdlClasificacion.DataSource = GlobalDTClasificaciones(UsuarioActual.CveEmpresa, UsoClasificacion:=2)
         DdlClasificacion.DataBind()
         DdlSubProyectos.Items.Insert(0, New ListItem("Seleccione", "-1"))
 
+        DdlClasificacionDescuento.DataSource = DdlClasificacion.DataSource
+        DdlClasificacionDescuento.DataBind()
+        DdlSubProyectos.Items.Insert(0, New ListItem("Seleccione", "-1"))
+
     End Sub
 
     Private Sub BtnConsultar_Click(sender As Object, e As EventArgs) Handles BtnConsultar.Click
@@ -119,9 +126,10 @@ Partial Class Bancos_DepositosCaja
         Dim CveCuentaBancariaDestino As Integer = 0
         Dim drOrigen As DataRow = GlobalDTBancosCuentas(UsuarioActual.CveUsuario, CveCuenta:=DdlCajaChica.SelectedValue.ToEntero, CveEmpresa:=UsuarioActual.CveEmpresa).FiltroPrimero("")
         Dim drDestino As DataRow = GlobalDTBancosCuentas(UsuarioActual.CveUsuario, CveCuenta:=DdlCuentaDeposito.SelectedValue.ToEntero, CveEmpresa:=UsuarioActual.CveEmpresa).FiltroPrimero("")
-        Dim CveSubProyecto As Integer = 0
-        Dim CveClasificacion As Integer = 0
-        Dim CveClasificacionDescuento As Integer = 0
+        Dim CveSubProyecto As Integer = -1
+        Dim CveSubProyectoDescuento As Integer = -1
+        Dim CveClasificacion As Integer = -1
+        Dim CveClasificacionDescuento As Integer = -1
         Dim documentos As String = "Los Depósitos se realizaron exitósamente<br/><br/>"
         Dim imprimirFolios As String = ""
         If drOrigen IsNot Nothing Then
@@ -160,7 +168,7 @@ Partial Class Bancos_DepositosCaja
             End If
 
             If ChkDescuento.Checked Then
-                CveSubProyecto = DdlSubProyectoDeposito.SelectedValue.ToEntero
+                CveSubProyectoDescuento = DdlSubProyectoDescuento.SelectedValue.ToEntero
                 CveClasificacionDescuento = DdlClasificacionDescuento.SelectedValue.ToEntero
 
                 If Not ObjContabilidad.AddPrePolizasDetalle(NuevaCvePrePoliza, False, Descuento, DdlClasificacionDescuento.SelectedItem.Text, 51, DdlClasificacionDescuento.SelectedItem.Text, Fecha, IdCuentaBancariaOrigen, -1, CveClasificacion:=CveClasificacionDescuento, CveSubProyecto:=CveSubProyecto, ImporteMX:=Comision * TipoCambio, CveCuenta:=CveCuentaBancariaOrigen) Then

From 43d6a35cf9be00cea92ddf32b0cc5a72b8f516a7 Mon Sep 17 00:00:00 2001
From: HECTOR RODRIGUEZ <hecttor201@gmail.com>
Date: Mon, 19 Apr 2021 16:12:46 -0700
Subject: [PATCH 17/22]

---
 Bancos/DepositosCaja.aspx.vb | 1 +
 1 file changed, 1 insertion(+)

diff --git a/Bancos/DepositosCaja.aspx.vb b/Bancos/DepositosCaja.aspx.vb
index b26fa368c..40eab0270 100644
--- a/Bancos/DepositosCaja.aspx.vb
+++ b/Bancos/DepositosCaja.aspx.vb
@@ -22,6 +22,7 @@ Partial Class Bancos_DepositosCaja
             txtFechaI.Text = Now.AddDays(-1).ToShortDateString
             txtFechaF.Text = Now.ToShortDateString
             TxtComision.Attributes.Add("onKeyUp", "txtSuma(event);")
+            TxtDescuento.Attributes.Add("onKeyUp", "txtSuma(event);")
 
             CargaCuentas()
             ChkFaltante.Attributes.Add("onclick", "CheckFaltante(this);")

From 858100ed3b4a0a3e2463f816fb1f2cc04d779221 Mon Sep 17 00:00:00 2001
From: HECTOR RODRIGUEZ <hecttor201@gmail.com>
Date: Mon, 19 Apr 2021 17:21:30 -0700
Subject: [PATCH 18/22] Cambios en descuento

---
 Bancos/DepositosCaja.aspx    | 42 +++++++++++++++++++++++-------------
 Bancos/DepositosCaja.aspx.vb |  2 +-
 2 files changed, 28 insertions(+), 16 deletions(-)

diff --git a/Bancos/DepositosCaja.aspx b/Bancos/DepositosCaja.aspx
index de167d9e2..20e230d4d 100644
--- a/Bancos/DepositosCaja.aspx
+++ b/Bancos/DepositosCaja.aspx
@@ -251,21 +251,22 @@
 
         var ValorTotalSeleccionado = 0
         var comision = 0;
+        var descuento = 0;
+        var saldo = 0;
 
         function FnSuma(chk, cantidad) {
-            var saldo = ToDouble($('#C_lblValorTotal').text());
+            var saldoInicial = ToDouble($('#C_lblValorTotal').text());
             if (chk.checked == false) {
                 cantidad = cantidad * -1;
             }
-            saldo = saldo + cantidad;
-            $('#C_lblValorTotal').text(FormatoNumero(saldo, 2));
-            $('#C_lblValorTotalSeleccionado').text(FormatoNumero(saldo, 2));
-            ValorTotalSeleccionado = saldo
+            saldoInicial = saldoInicial + cantidad;
+            $('#C_lblValorTotal').text(FormatoNumero(saldoInicial, 2));
+            $('#C_lblValorTotalSeleccionado').text(FormatoNumero(saldoInicial, 2));
+            ValorTotalSeleccionado = saldoInicial
             
         }
 
         function txtSuma(txt) {
-            var saldo = ToDouble($('#C_lblValorTotal').text());
             var comision2 = ToDouble($('#C_TxtComision').val());
             var comisionNegativa = 0;
             if (comision2 < 0) {
@@ -275,13 +276,32 @@
                 $('#C_TxtComision').val(comision)
                 alert("No es posible poner una comision superior a lo seleccionado")
             } else {
-                saldo = ValorTotalSeleccionado + comision2;
+                saldo = ValorTotalSeleccionado + comision2 + descuento;
                 $('#C_lblValorTotal').text(FormatoNumero(saldo, 2));
                 comision = ToDouble($('#C_TxtComision').val())
+                debugger;
             }
                 
         }
 
+        function txtSumaDescuento(txt) {
+            var comision2 = ToDouble($('#C_TxtDescuento').val());
+            var comisionNegativa = 0;
+            if (comision2 < 0) {
+                comisionNegativa = comision2 * -1
+            }
+            if (comisionNegativa > ValorTotalSeleccionado) {
+                $('#C_TxtDescuento').val(descuento)
+                alert("No es posible poner una comision superior a lo seleccionado")
+            } else {
+                saldo = ValorTotalSeleccionado + comision2 + comision;
+                $('#C_lblValorTotal').text(FormatoNumero(saldo, 2));
+                descuento = ToDouble($('#C_TxtDescuento').val())
+                debugger;
+            }
+
+        }
+
         function CheckFaltante(chk) {
             if (chk.checked == true) {
                 $('#DivComision').css("display", "block");
@@ -289,16 +309,12 @@
                 $('#divSubProyecto').css("display", "block");
                 $('#LblClasificacion').css("display", "block");
                 $('#divClasificacion').css("display", "block");
-
-                debugger;
-
             } else {
                 $('#DivComision').css("display", "none");
                 $('#divSubProyecto').css("display", "none");
                 $('#divSubProyecto').css("display", "none");
                 $('#LblClasificacion').css("display", "none");
                 $('#divClasificacion').css("display", "none");
-                debugger;
             }
         }
 
@@ -309,9 +325,6 @@
                 $('#divSubProyectoDescuento').css("display", "block");
                 $('#LblClasificacionDescuento').css("display", "block");
                 $('#divClasificacionDescuento').css("display", "block");
-
-                debugger;
-
             } else {
                 
                 $('#DivDescuento').css("display", "none");
@@ -319,7 +332,6 @@
                 $('#divSubProyectoDescuento').css("display", "none");
                 $('#LblClasificacionDescuento').css("display", "none");
                 $('#divClasificacionDescuento').css("display", "none");
-                debugger;
             }
         }
     </script>
diff --git a/Bancos/DepositosCaja.aspx.vb b/Bancos/DepositosCaja.aspx.vb
index 40eab0270..1d7742e10 100644
--- a/Bancos/DepositosCaja.aspx.vb
+++ b/Bancos/DepositosCaja.aspx.vb
@@ -22,7 +22,7 @@ Partial Class Bancos_DepositosCaja
             txtFechaI.Text = Now.AddDays(-1).ToShortDateString
             txtFechaF.Text = Now.ToShortDateString
             TxtComision.Attributes.Add("onKeyUp", "txtSuma(event);")
-            TxtDescuento.Attributes.Add("onKeyUp", "txtSuma(event);")
+            TxtDescuento.Attributes.Add("onKeyUp", "txtSumaDescuento(event);")
 
             CargaCuentas()
             ChkFaltante.Attributes.Add("onclick", "CheckFaltante(this);")

From 8cbcad5f81215c899a5e5e393e72d662b8377551 Mon Sep 17 00:00:00 2001
From: rakcsle <rakcsle.rakcsle@gmail.com>
Date: Tue, 20 Apr 2021 11:36:29 -0700
Subject: [PATCH 19/22] Ordenamiento de tablas, JS

---
 Scripts/custom.js | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/Scripts/custom.js b/Scripts/custom.js
index 28dd940bc..5c66f6c4f 100644
--- a/Scripts/custom.js
+++ b/Scripts/custom.js
@@ -1667,18 +1667,18 @@ function loadsortadscroll() {
                             mapped.sort(function (a, b) {
                                 return (+(a.value > b.value) || +(a.value === b.value) - 1) * multiplicador;
                             });
-                            tthis.closest('tr').find('th').data('tipodato', 'string')
+                            //tthis.closest('tr').find('th').data('tipodato', 'string')
                         } else {
                             if (tipodate == 1) {
                                 mapped.sort(function (a, b) {
                                     return (+(a.valued > b.valued) || +(a.valued === b.valued) - 1) * multiplicador;
                                 });
-                                tthis.closest('tr').find('th').data('tipodato', 'date')
+                                //tthis.closest('tr').find('th').data('tipodato', 'date')
                             } else {
                                 mapped.sort(function (a, b) {
                                     return (+(a.valuen > b.valuen) || +(a.valuen === b.valuen) - 1) * multiplicador;
                                 });
-                                tthis.closest('tr').find('th').data('tipodato', 'numeric')
+                                //tthis.closest('tr').find('th').data('tipodato', 'numeric')
                             }
                         }
                         mapped.each(function (i, el) {

From 5e2fd703558ba37d1e196e9b1556b6baab6f18b9 Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Tue, 20 Apr 2021 14:54:57 -0700
Subject: [PATCH 20/22] --mensaje inconsistencias

---
 Inicio.aspx | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Inicio.aspx b/Inicio.aspx
index 82d6e39c9..7a2d2a2f7 100644
--- a/Inicio.aspx
+++ b/Inicio.aspx
@@ -1046,7 +1046,7 @@
                             <a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvIncons.ClientID) %>" style="margin-top: -3px; margin-left: -13px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
                         </div>
                     </div>
-                    <asp:GridView ID="GvIncons" runat="server" CssClass="table table-striped table-advance table-hover Widthall ScrollAD mysmallbtn" GridLines="None">
+                    <asp:GridView ID="GvIncons" runat="server" CssClass="table table-striped table-advance table-hover Widthall ScrollAD mysmallbtn" GridLines="None" EmptyDataText="Felicidades, lo lograste, no tienes inconsistencias">
                     </asp:GridView>
                     <div class="modal-footer">
                         <asp:UpdatePanel runat="server">

From d5f7f974803ed8f91a6cf43602f8a90fc3d7d3ba Mon Sep 17 00:00:00 2001
From: HECTOR RODRIGUEZ <hecttor201@gmail.com>
Date: Wed, 21 Apr 2021 00:29:46 -0700
Subject: [PATCH 21/22]

---
 Bancos/DepositosCaja.aspx.vb | 2 +-
 CRM/Acercamiento.aspx.cs     | 4 ++--
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/Bancos/DepositosCaja.aspx.vb b/Bancos/DepositosCaja.aspx.vb
index 1d7742e10..9274e79ab 100644
--- a/Bancos/DepositosCaja.aspx.vb
+++ b/Bancos/DepositosCaja.aspx.vb
@@ -163,7 +163,7 @@ Partial Class Bancos_DepositosCaja
                 CveSubProyecto = DdlSubProyectoDeposito.SelectedValue.ToEntero
                 CveClasificacion = DdlClasificacion.SelectedValue.ToEntero
 
-                If Not ObjContabilidad.AddPrePolizasDetalle(NuevaCvePrePoliza, False, Comision, DdlClasificacion.SelectedItem.Text, 51, DdlClasificacion.SelectedItem.Text, Fecha, IdCuentaBancariaOrigen, -1, CveClasificacion:=CveClasificacion, CveSubProyecto:=CveSubProyecto, ImporteMX:=Comision * TipoCambio, CveCuenta:=CveCuentaBancariaOrigen) Then
+                If Not ObjContabilidad.AddPrePolizasDetalle(NuevaCvePrePoliza, True, Comision, DdlClasificacion.SelectedItem.Text, 51, DdlClasificacion.SelectedItem.Text, Fecha, IdCuentaBancariaOrigen, -1, CveClasificacion:=CveClasificacion, CveSubProyecto:=CveSubProyecto, ImporteMX:=Comision * TipoCambio, CveCuenta:=CveCuentaBancariaOrigen) Then
                     OcurrioError = True
                 End If
             End If
diff --git a/CRM/Acercamiento.aspx.cs b/CRM/Acercamiento.aspx.cs
index 30c7a064f..8a7c0fff3 100644
--- a/CRM/Acercamiento.aspx.cs
+++ b/CRM/Acercamiento.aspx.cs
@@ -1068,10 +1068,10 @@ public partial class CRM_Acercamiento : ClsPaginas
         ClsOIEventos ObjEventos = new ClsOIEventos();
         DateTime FechaInicio = TxtFechaInicioAgenda.Text.ToDateTime();
         int CveContactoAgendar = DdlContactoAgenda.SelectedValue.ToEntero();
-
+        int CveEmpresaCRM = DdlEmpresaCRM.SelectedValue.ToEntero();
         int CveEtapa = HdfEtapaSeleccionada.Value.ToEntero() == -1 ? CveEtapaActual : HdfEtapaSeleccionada.Value.ToEntero();
 
-        if (ObjEventos.AddEventoAgenda(DdlTipoAgenda.SelectedValue.ToEntero(), TxtAsuntoAgenda.Text, TxtDescripcionAgenda.Text, DdlPrioridadAgenda.SelectedValue.ToEntero(), FechaInicio, FechaInicio, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CveTipoProcesoCRM: CveTipoProceso, CveAcercamientoCRM: CveAcercamiento, CveContactoCRM: CveContactoAgendar, CveEtapaProcesoCRM: CveEtapa))
+        if (ObjEventos.AddEventoAgenda(DdlTipoAgenda.SelectedValue.ToEntero(), TxtAsuntoAgenda.Text, TxtDescripcionAgenda.Text, DdlPrioridadAgenda.SelectedValue.ToEntero(), FechaInicio, FechaInicio, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CveTipoProcesoCRM: CveTipoProceso, CveAcercamientoCRM: CveAcercamiento, CveContactoCRM: CveContactoAgendar, CveEtapaProcesoCRM: CveEtapa, CveEmpresaCRM:CveEmpresaCRM))
         {
             limpiarModalAgendar();
             RegistraScript("$('#ModalAgenda').modal('hide')");

From 0e14753eeab616d814881f85bfcada0f6b8fe244 Mon Sep 17 00:00:00 2001
From: HECTOR RODRIGUEZ <hecttor201@gmail.com>
Date: Wed, 21 Apr 2021 00:30:10 -0700
Subject: [PATCH 22/22] rotacion y balanceo

---
 Empresas/141/Formatos/Factura.rdlc |  16 +-
 Empresas/152/Formatos/Factura.rdlc | 520 +----------------------------
 Ventas/Ventas.aspx                 |  13 +
 Ventas/Ventas.aspx.vb              |  13 +
 4 files changed, 57 insertions(+), 505 deletions(-)

diff --git a/Empresas/141/Formatos/Factura.rdlc b/Empresas/141/Formatos/Factura.rdlc
index 79a23d44f..fa20efdbd 100644
--- a/Empresas/141/Formatos/Factura.rdlc
+++ b/Empresas/141/Formatos/Factura.rdlc
@@ -1340,12 +1340,26 @@
                       <FontWeight>Bold</FontWeight>
                     </Style>
                   </TextRun>
+                  <TextRun>
+                    <Value xml:space="preserve">   </Value>
+                    <Style>
+                      <FontFamily>calibri</FontFamily>
+                      <FontWeight>Bold</FontWeight>
+                    </Style>
+                  </TextRun>
+                  <TextRun>
+                    <Value>="&lt;b&gt;Próxima Rotación y Balanceo: &lt;/b&gt;" &amp; FormatDateTime(CDate(Parameters!Fecha.Value).AddMonths(6), DateFormat.ShortDate) &amp; "   &lt;b&gt;Próxima Alineacion: &lt;/b&gt;" &amp; FormatDateTime(CDate(Parameters!Fecha.Value).AddMonths(6), DateFormat.ShortDate)</Value>
+                    <MarkupType>HTML</MarkupType>
+                    <Style>
+                      <FontFamily>calibri</FontFamily>
+                    </Style>
+                  </TextRun>
                 </TextRuns>
                 <Style />
               </Paragraph>
             </Paragraphs>
             <rd:DefaultName>Textbox1</rd:DefaultName>
-            <Top>9.6829cm</Top>
+            <Top>9.66322cm</Top>
             <Left>1.10521cm</Left>
             <Height>0.62233cm</Height>
             <Width>9.17089cm</Width>
diff --git a/Empresas/152/Formatos/Factura.rdlc b/Empresas/152/Formatos/Factura.rdlc
index 0597018c8..dd41dbdf2 100644
--- a/Empresas/152/Formatos/Factura.rdlc
+++ b/Empresas/152/Formatos/Factura.rdlc
@@ -1,5 +1,5 @@
 <?xml version="1.0" encoding="utf-8"?>
-<Report xmlns="http://schemas.microsoft.com/sqlserver/reporting/2016/01/reportdefinition" xmlns:rd="http://schemas.microsoft.com/SQLServer/reporting/reportdesigner">
+<Report xmlns="http://schemas.microsoft.com/sqlserver/reporting/2010/01/reportdefinition" xmlns:rd="http://schemas.microsoft.com/SQLServer/reporting/reportdesigner">
   <AutoRefresh>0</AutoRefresh>
   <DataSources>
     <DataSource Name="DsOC">
@@ -1340,6 +1340,20 @@
                       <FontWeight>Bold</FontWeight>
                     </Style>
                   </TextRun>
+                  <TextRun>
+                    <Value xml:space="preserve">    </Value>
+                    <Style>
+                      <FontFamily>calibri</FontFamily>
+                      <FontWeight>Bold</FontWeight>
+                    </Style>
+                  </TextRun>
+                  <TextRun>
+                    <Value>="&lt;b&gt;Próxima Rotación y Balanceo: &lt;/b&gt;" &amp; FormatDateTime(CDate(Parameters!Fecha.Value).AddMonths(6), DateFormat.ShortDate) &amp; "   &lt;b&gt;Próxima Alineacion: &lt;/b&gt;" &amp; FormatDateTime(CDate(Parameters!Fecha.Value).AddMonths(6), DateFormat.ShortDate)</Value>
+                    <MarkupType>HTML</MarkupType>
+                    <Style>
+                      <FontFamily>calibri</FontFamily>
+                    </Style>
+                  </TextRun>
                 </TextRuns>
                 <Style />
               </Paragraph>
@@ -3567,509 +3581,7 @@
       <Prompt>ReportParameter1</Prompt>
     </ReportParameter>
   </ReportParameters>
-  <ReportParametersLayout>
-    <GridLayoutDefinition>
-      <NumberOfColumns>2</NumberOfColumns>
-      <NumberOfRows>50</NumberOfRows>
-      <CellDefinitions>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>0</RowIndex>
-          <ParameterName>ClienteCodigo</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>0</RowIndex>
-          <ParameterName>ClienteNombre</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>1</RowIndex>
-          <ParameterName>ClienteDireccion</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>1</RowIndex>
-          <ParameterName>ClienteLugar</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>2</RowIndex>
-          <ParameterName>ClienteTelefono</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>2</RowIndex>
-          <ParameterName>ClienteContacto</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>3</RowIndex>
-          <ParameterName>ClienteContactoMail</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>3</RowIndex>
-          <ParameterName>ImporteLetra</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>4</RowIndex>
-          <ParameterName>Observaciones</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>4</RowIndex>
-          <ParameterName>CveVendedor</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>5</RowIndex>
-          <ParameterName>Status</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>5</RowIndex>
-          <ParameterName>FechaSolicitud</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>6</RowIndex>
-          <ParameterName>Folio</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>6</RowIndex>
-          <ParameterName>Descuento</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>7</RowIndex>
-          <ParameterName>SubTotal</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>7</RowIndex>
-          <ParameterName>IVA</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>8</RowIndex>
-          <ParameterName>Total</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>8</RowIndex>
-          <ParameterName>Fecha</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>9</RowIndex>
-          <ParameterName>DescFinanciero</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>9</RowIndex>
-          <ParameterName>VigInsCon</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>10</RowIndex>
-          <ParameterName>Universidades</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>10</RowIndex>
-          <ParameterName>CECOP</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>11</RowIndex>
-          <ParameterName>InfraEducativa</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>11</RowIndex>
-          <ParameterName>DomicilioSucursal</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>12</RowIndex>
-          <ParameterName>MetodoPago</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>12</RowIndex>
-          <ParameterName>Vencimiento</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>13</RowIndex>
-          <ParameterName>FolioFiscal</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>13</RowIndex>
-          <ParameterName>FechaCertificacion</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>14</RowIndex>
-          <ParameterName>SelloCFDI</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>14</RowIndex>
-          <ParameterName>CadenaSAT</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>15</RowIndex>
-          <ParameterName>SelloSAT</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>15</RowIndex>
-          <ParameterName>CiudadSucursal</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>16</RowIndex>
-          <ParameterName>Serie</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>16</RowIndex>
-          <ParameterName>QR</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>17</RowIndex>
-          <ParameterName>ClienteRFC</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>17</RowIndex>
-          <ParameterName>FormaPago</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>18</RowIndex>
-          <ParameterName>LogoPath</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>18</RowIndex>
-          <ParameterName>Prueba</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>19</RowIndex>
-          <ParameterName>VendedorNombre</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>19</RowIndex>
-          <ParameterName>VendedorCelular</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>20</RowIndex>
-          <ParameterName>VendedorMail</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>20</RowIndex>
-          <ParameterName>VendedorTelefono</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>21</RowIndex>
-          <ParameterName>Moneda</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>21</RowIndex>
-          <ParameterName>TipoCambio</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>22</RowIndex>
-          <ParameterName>CondicionPago</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>22</RowIndex>
-          <ParameterName>CadenaOriginal</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>23</RowIndex>
-          <ParameterName>SerieCertificadoSAT</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>23</RowIndex>
-          <ParameterName>Tipo</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>24</RowIndex>
-          <ParameterName>NumCta</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>24</RowIndex>
-          <ParameterName>CertificadoContribuyente</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>25</RowIndex>
-          <ParameterName>Amortizacion</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>25</RowIndex>
-          <ParameterName>SubTotal2</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>26</RowIndex>
-          <ParameterName>RetIVA</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>26</RowIndex>
-          <ParameterName>RetISR</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>27</RowIndex>
-          <ParameterName>TipoDocumento</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>27</RowIndex>
-          <ParameterName>AplicaPagare</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>28</RowIndex>
-          <ParameterName>Ref</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>28</RowIndex>
-          <ParameterName>Sucursal</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>29</RowIndex>
-          <ParameterName>ClienteDiasCredito</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>29</RowIndex>
-          <ParameterName>OC</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>30</RowIndex>
-          <ParameterName>MonedaAbreviatura</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>30</RowIndex>
-          <ParameterName>UsuarioImprimio</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>31</RowIndex>
-          <ParameterName>FechaImpresion</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>31</RowIndex>
-          <ParameterName>ClienteCalle</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>32</RowIndex>
-          <ParameterName>ClienteColonia</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>32</RowIndex>
-          <ParameterName>ClienteCiudad</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>33</RowIndex>
-          <ParameterName>ClienteMunicipio</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>33</RowIndex>
-          <ParameterName>ClienteEstado</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>34</RowIndex>
-          <ParameterName>ClienteCP</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>34</RowIndex>
-          <ParameterName>ClientePais</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>35</RowIndex>
-          <ParameterName>ClienteNoInt</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>35</RowIndex>
-          <ParameterName>ClienteNoExt</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>36</RowIndex>
-          <ParameterName>EnvioDireccion</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>36</RowIndex>
-          <ParameterName>EnvioColonia</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>37</RowIndex>
-          <ParameterName>EnvioCiudad</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>37</RowIndex>
-          <ParameterName>EnvioEstado</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>38</RowIndex>
-          <ParameterName>EnvioCP</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>38</RowIndex>
-          <ParameterName>EstatusFactura</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>39</RowIndex>
-          <ParameterName>EstatusEntrega</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>39</RowIndex>
-          <ParameterName>EnvioNoExt</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>40</RowIndex>
-          <ParameterName>EnvioNoInt</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>40</RowIndex>
-          <ParameterName>EnvioContacto</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>41</RowIndex>
-          <ParameterName>EnvioDepartamento</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>41</RowIndex>
-          <ParameterName>PedidoContrato</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>42</RowIndex>
-          <ParameterName>INETipoProceso</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>42</RowIndex>
-          <ParameterName>INETipoComite</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>43</RowIndex>
-          <ParameterName>INEIdContabilidad</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>43</RowIndex>
-          <ParameterName>Referencia</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>44</RowIndex>
-          <ParameterName>DescripcionContrato</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>44</RowIndex>
-          <ParameterName>TipoRelacion</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>45</RowIndex>
-          <ParameterName>FolioFiscalPadre</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>45</RowIndex>
-          <ParameterName>UsoCFDI</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>46</RowIndex>
-          <ParameterName>FolioFiscalRelacionado</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>46</RowIndex>
-          <ParameterName>TipoRelacionTexto</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>47</RowIndex>
-          <ParameterName>OrdenCompra</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>47</RowIndex>
-          <ParameterName>ClienteDatoExtra1</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>48</RowIndex>
-          <ParameterName>Contrato</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>1</ColumnIndex>
-          <RowIndex>48</RowIndex>
-          <ParameterName>EnvioTel</ParameterName>
-        </CellDefinition>
-        <CellDefinition>
-          <ColumnIndex>0</ColumnIndex>
-          <RowIndex>49</RowIndex>
-          <ParameterName>Kilometraje</ParameterName>
-        </CellDefinition>
-      </CellDefinitions>
-    </GridLayoutDefinition>
-  </ReportParametersLayout>
+  
   <EmbeddedImages>
     <EmbeddedImage Name="ID2">
       <MIMEType>image/png</MIMEType>
diff --git a/Ventas/Ventas.aspx b/Ventas/Ventas.aspx
index 81aaae32d..7eedee488 100644
--- a/Ventas/Ventas.aspx
+++ b/Ventas/Ventas.aspx
@@ -3631,6 +3631,19 @@
                             <tr align="left" id="trPaqueteriaDirectaLabel" runat="server" visible="false">
                                 <td id="Td4" runat="server">Tipo de Entrega:&nbsp;<b>Entrega Directa</b></td>
                             </tr>
+                            <tr align="left" id="trRotacion" runat="server" visible="false">
+                                <td id="Td3" runat="server">Próxima Rotación y Balanceo:&nbsp;</td>
+                            </tr>
+                            <tr align="left" id="trRotacionlbl" runat="server" visible="false">
+                                <td><asp:Label runat="server" id="LblRotacion" Text=""></asp:Label></td>
+                            </tr>
+                            <tr align="left" id="trAlineacion" runat="server" visible="false">
+                                <td id="Td7" runat="server">Próxima Alineación:&nbsp;</td>
+                            </tr>
+                            <tr align="left" id="trAlineacionlbl" runat="server" visible="false">
+                                <td><asp:Label runat="server" id="LblAlineacion" Text=""></asp:Label></td>
+                            </tr>
+                            
                         </table>
                     </div>
                 </ContentTemplate>
diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb
index c5318d7f2..133132566 100644
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -2909,6 +2909,19 @@ Partial Class Ventas
 
         'UNA VEZ CARGADA LAS CONDICIONES DE PAGO INICIALMENTE, NO VUELVE A SOBREESCRIBIR EL VALOR
         CveFormaPago33Cliente = -1
+
+        If UsuarioActual.CveEmpresa.Contiene(141, 152, 159, 160, 161, 162, 163) Then
+            trRotacion.Visible = True
+            trRotacionlbl.Visible = True
+            trAlineacion.Visible = True
+            trAlineacionlbl.Visible = True
+
+            Dim FechaRotaAlinea As Date = TxtFecha.Text.ToDate
+            LblRotacion.Text = FechaRotaAlinea.AddMonths(6).ToShortDateString
+            LblAlineacion.Text = FechaRotaAlinea.AddMonths(6).ToShortDateString
+
+            UPObservaciones.Update()
+        End If
     End Sub
     Private Sub BloqueaClasificaciones()
         If UsuarioActual.Empresa.Funcionalidad(558) = "1" AndAlso DdlTipoComprobante.SelectedValue = "Cot" Then