.

Compras/Compras.aspx

@@ -873,7 +873,10 @@
                                     <div class="col-md-6">
                                         <asp:UpdatePanel ID="UPPAnticiposSel" runat="server" UpdateMode="Conditional">
                                             <ContentTemplate>
-                                                <asp:GridView ID="GvAnticiposSel" runat="server" CssClass="table table-striped table-hover Widthall" AutoGenerateColumns="False" DataKeyNames="TipoDocto,CveCompraNC" ClientIDMode="Static" EmptyDataText="" Caption="Anticipos/NC Vinculados" GridLines="None">
+
+                                                <asp:Literal runat="server" ID="LtlGvAnticiposSel" Visible="false">Anticipos/NC Vinculados</asp:Literal>                                                
+                                                <asp:GridView ID="GvAnticiposSel" runat="server" CssClass="table table-striped table-hover ScrollAD" Width="100%" AutoGenerateColumns="False" DataKeyNames="TipoDocto,CveCompraNC" ClientIDMode="Static" EmptyDataText=""  data-height="280" 
+                                                      GridLines="None">
                                                     <Columns>
                                                         <asp:TemplateField>
                                                             <ItemTemplate>

Compras/Compras.aspx.vb

@@ -3122,6 +3122,10 @@ Partial Class Compras_Compras
                 GvAnticiposSel.DataSource = dtnc
                 GvAnticiposSel.DataBind()
 
+                If dtnc IsNot Nothing AndAlso dtnc.Rows.Count > 0 Then
+                    LtlGvAnticiposSel.Visible = True
+                End If
+
 
                 ''  VALIDA ELIMINAR COMPRA, QUE NO TENGA PAGOS CONCILIADOS
                 If (UsuarioActual.TienePermisoProceso(77) OrElse UsuarioActual.TienePermisoProceso(135)) AndAlso dr("NumPagosConciliados").ToString.ToEntero = 0 Then ' Eliminar compra

Empresas/178/Formatos/Factura.rdlc

@@ -722,7 +722,7 @@
               <Paragraph>
                 <TextRuns>
                   <TextRun>
-                    <Value>LUGAR DE EXPEDICIÓN:</Value>
+                    <Value>LUGAR DE EXPEDICIÓN: 56400</Value>
                     <Style>
                       <FontFamily>Calibri</FontFamily>
                       <FontSize>8pt</FontSize>
@@ -734,21 +734,6 @@
                   <TextAlign>Center</TextAlign>
                 </Style>
               </Paragraph>
-              <Paragraph>
-                <TextRuns>
-                  <TextRun>
-                    <Value>=Parameters!CP.Value</Value>
-                    <Style>
-                      <FontFamily>Calibri</FontFamily>
-                      <FontSize>8pt</FontSize>
-                      <FontWeight>Normal</FontWeight>
-                    </Style>
-                  </TextRun>
-                </TextRuns>
-                <Style>
-                  <TextAlign>Center</TextAlign>
-                </Style>
-              </Paragraph>
             </Paragraphs>
             <rd:DefaultName>Textbox10</rd:DefaultName>
             <Top>0.53358in</Top>
@@ -5423,6 +5408,18 @@
       <AllowBlank>true</AllowBlank>
       <Prompt>ReportParameter1</Prompt>
     </ReportParameter>
+    <ReportParameter Name="QRDescarga">
+      <DataType>String</DataType>
+      <Nullable>true</Nullable>
+      <AllowBlank>true</AllowBlank>
+      <Prompt>ReportParameter1</Prompt>
+    </ReportParameter>
+    <ReportParameter Name="Kilometraje">
+      <DataType>String</DataType>
+      <Nullable>true</Nullable>
+      <AllowBlank>true</AllowBlank>
+      <Prompt>ReportParameter1</Prompt>
+    </ReportParameter>
   </ReportParameters>
   <EmbeddedImages>
     <EmbeddedImage Name="Logo2">

Ventas/Clientes.aspx.vb

@@ -526,13 +526,13 @@ Partial Class Clientes
         Set(value As DateTime)
             ViewState("FechaIngLineaAdicional") = value
         End Set
-    End Property
-
-
-
-
+    End Property
+
+
+
+
 #End Region
-
+
 #Region "Documentacion"
     Private Property DTDocumentacion As DataTable
         Get
@@ -881,8 +881,8 @@ Partial Class Clientes
 
 
             Else
-                    'Configuración de Modalidad Insert
-                    CargaEstados()
+                'Configuración de Modalidad Insert
+                CargaEstados()
                 BtnGuardar.Visible = PermiteGuardar()
 
                 If UsuarioActual.Empresa.Funcionalidad(525) = "1" Then
@@ -1300,8 +1300,7 @@ Partial Class Clientes
     End Sub
 
 
-    Private Sub CargaCombos()
-
+    Private Sub CargaCombos()
         CargaMetodosPago()
         CargaPrecioLista()
         CargaVendedores()
@@ -1504,7 +1503,7 @@ Partial Class Clientes
                 ' CargaDocs()
                 CargaCombos()
                 CargaDocumentacionCliente()
-                'CargaSubProyectosSucursales()
+                CargaSubProyectosSuscursales()
                 'CargaMetodosPago33()
                 'CargaFormaPago33()
                 'CargaComboCFDI()
@@ -9853,7 +9852,7 @@ Partial Class Clientes
             Alert("Puntuación Inicializada")
         End If
         Acum.Dispose()
-    End Sub
+    End Sub
 #End Region
     Protected Sub DdlTipoRetencion_SelectedIndexChanged(sender As Object, e As EventArgs)
         If UsuarioActual.Empresa.Funcionalidad(579) = "1" Then

Ventas/Promociones.aspx.vb

@@ -315,10 +315,10 @@ Partial Class Ventas_Promociones
 
         ButBtnEliminar.Visible = True
 
-        If CvePromocionPadre > 0 Then
-            BtnGuardar.Enabled = False
-            ButBtnEliminar.Enabled = False
-        End If
+        'If CvePromocionPadre > 0 Then
+        '    BtnGuardar.Enabled = False
+        '    ButBtnEliminar.Enabled = False
+        'End If
 
         ObjVentas.Dispose()
     End Sub