diff --git a/App_Code/ClsVentas.vb b/App_Code/ClsVentas.vb
index abc48596e..0673bb5c0 100644
--- a/App_Code/ClsVentas.vb
+++ b/App_Code/ClsVentas.vb
@@ -6322,7 +6322,7 @@ Public Class ClsVentas
     End Function
 
 
-    Public Function GetLineasAdicionalesVencimientos(CveCliente As Integer, TipoLinea As Integer, FechaInicio As Date, FechaFin As Date, CveMoneda As Integer, CveEmpresa As Integer) As Boolean
+    Public Function GetLineasAdicionalesVencimientos(CveCliente As Integer, TipoLinea As Integer, FechaInicio As Date, FechaFin As Date, CveMoneda As Integer, CveSubProyecto As Integer, CveEmpresa As Integer) As Boolean
 
         Dim Retorno As Boolean = False
         DataAdapter("PA_Vta_LineasAdicionalesVencimientosGet")
@@ -6332,6 +6332,7 @@ Public Class ClsVentas
             .Add("@FechaFin", SqlDbType.Date).Value = FechaFin
             .Add("@TipoLinea", SqlDbType.Int).Value = TipoLinea
             .Add("@CveMoneda", SqlDbType.Int).Value = CveMoneda
+            .Add("@CveSubProyecto", SqlDbType.Int).Value = CveSubProyecto
             .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
         End With
         Try
diff --git a/Ventas/Clientes.aspx b/Ventas/Clientes.aspx
index ef7407d92..15d088193 100644
--- a/Ventas/Clientes.aspx
+++ b/Ventas/Clientes.aspx
@@ -1736,11 +1736,12 @@
                                             <div class="portlet-title">
                                                 <div class="caption font-green">
                                                     <i class="icon-pin font-green"></i>
-                                                    <span class="caption-subject bold uppercase">Parametros</span>
+                                                    <span class="caption-subject bold uppercase">Crédito</span>
+                                                   &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<asp:Label ID="LblAlertaQuebranto" runat="server" Font-Bold ="true" ForeColor="#CC0000"></asp:Label>
                                                 </div>
 
-                                                <div class="tools">
-                                                    <asp:CheckBox ID="ChkPermiteCredito" runat="server" Text="Permite Crédito" />
+                                                <div class="tools">                                                   
+                                                         <asp:CheckBox ID="ChkPermiteCredito" runat="server" Text="Permite Crédito" /> 
                                                     <a href="javascript:;" class="collapse" data-original-title="" title=""></a>
                                                 </div>
 
@@ -1836,7 +1837,7 @@
                                                                     </div>
                                                                 </div>
                                                                 <div>
-                                                                    <label for="<%= TxtDocumentacion.ClientID.ToString()%>">Documentación:</label>
+                                                                    <label for="<%= TxtDocumentacion.ClientID.ToString()%>">Observaciones:</label>
                                                                     <asp:TextBox ID="TxtDocumentacion" CssClass="form-control" runat="server" Rows="3"></asp:TextBox>
                                                                 </div>
                                                                 <div class="row" id="DivDiasRevision" runat="server" visible="false">
@@ -1864,6 +1865,16 @@
                                                                     <asp:TextBox ID="TxtObsDiasRevision" runat="server" CssClass="form-control" Enabled="false"></asp:TextBox>
                                                                     <label for="<%= TxtObsDiasRevision.ClientID.ToString()%>">Documentación Revisión: </label>
                                                                 </div>
+                                                                <div class="row" runat="server" id="divQuebranto1" visible="false">
+                                                                     <div class="col-md-12">
+                                                                              <div class="col-md-4" >
+                                                                                  <asp:CheckBox ID="ChkEnQuebranto" runat="server" Text="En Quebranto" />
+                                                                             </div>
+                                                                             <div class="col-md-4" >
+                                                                                 <asp:CheckBox ID="ChkEnDemanda" runat="server" Text="En Demanda" />
+                                                                             </div>                                                                                                                  
+                                                                         </div>
+                                                                     </div>
 
                                                             </div>
 
@@ -1937,6 +1948,14 @@
 
                                                                     </div>
                                                                 </div>
+                                                                <div class="row" runat="server" id="divQuebranto2" visible="false">
+                                                                     <div class="col-md-12">
+                                                                         <label class="col-md-1 " style="width: 120px; text-align: right">Registro Firmas:</label>
+                                                                            <div class="col-md-2" style="width: 250px">
+                                                                                 <asp:TextBox ID="TxtNombreFirmas" runat="server" Width="250px"></asp:TextBox>
+                                                                            </div>  
+                                                                     </div>
+                                                                </div>
 
                                                             </div>
 
@@ -4632,20 +4651,7 @@
                         <div class="row ">
                             <div class="col-md-12">                                                              
 
-                                   <div class="row ">
-                                    <div class="col-md-12">
-                                             <div class="col-md-2" >
-                                                 <asp:CheckBox ID="ChkEnQuebranto" runat="server" Text="En Quebranto" />
-                                            </div>
-                                            <div class="col-md-2" >
-                                                <asp:CheckBox ID="ChkEnDemanda" runat="server" Text="En Demanda" />
-                                            </div>
-                                            <label class="col-md-1 " style="width: 120px; text-align: right">Registro Firmas:</label>
-                                            <div class="col-md-2" style="width: 250px">
-                                                 <asp:TextBox ID="TxtNombreFirmas" runat="server" Width="250px"></asp:TextBox>
-                                            </div>                                       
-                                        </div>
-                                    </div>
+                                   
                                 <div class="row ">
                                     <div class="  col-md-12" style="text-align: right!important">
                                         <input type="text" id="TxtBuscarLineaAdicional" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBuscarLineaAdicional','{0}')", GvLineasAdicionales.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" />
diff --git a/Ventas/Clientes.aspx.vb b/Ventas/Clientes.aspx.vb
index 814cd34a5..661750fb4 100644
--- a/Ventas/Clientes.aspx.vb
+++ b/Ventas/Clientes.aspx.vb
@@ -919,7 +919,9 @@ Partial Class Clientes
                 CargaCombosLineasAdicionales()
                 TabLineasAdicionales.Visible = True
                 LnkAgregarLineaAdicional.Visible = True
-                GetLineasAdicionales()
+                GetLineasAdicionales()
+                divQuebranto1.Visible = True
+                divQuebranto2.Visible = True
             End If
 
             If UsuarioActual.Empresa.Funcionalidad(109) <> "1" Then
@@ -1689,8 +1691,6 @@ Partial Class Clientes
 
                 'Horario
                 TxtHorario.Text = ObjClientes.Horario
-
-
                 TxtObsDiasRevision.Text = ObjClientes.ObservacionRevision
                 TxtReferenciaFiscal.Text = ObjClientes.ReferenciaFiscal
                 TxtCelular.Text = ObjClientes.Celular
@@ -1705,6 +1705,9 @@ Partial Class Clientes
                 ChkEnDemanda.Checked = ObjClientes.EnDemanda
                 TxtNombreFirmas.Text = ObjClientes.CreditoRegistroFirmas
 
+                If ObjClientes.EnQuebranto Then LblAlertaQuebranto.Text = "En Quebranto"
+                If ObjClientes.EnDemanda Then LblAlertaQuebranto.Text &= "En Demanda"
+
                 '7eleven
                 TxtProveedor.Text = ObjClientes.SevenEleven_NumProveedor
 
@@ -1851,6 +1854,23 @@ Partial Class Clientes
                 GvCxCHistorial.DataSource = dt.AsEnumerable().Take(22).CopyToDataTable()
             End If
             Retorno = True
+            If UsuarioActual.CveEmpresa.Contiene(119, 158) Then
+                Dim tdtt As DataTable = DtCxCActivas.FiltraParametros("DiasVencidos > 0")
+                If tdtt.Rows.Count > 0 Then
+                    Dim tstr As String = "Facturas con vencimiento: <br/>"
+                    Dim tdtsaldo As DataTable = tdtt.FiltraParametros("CveMoneda = 1")
+                    If tdtsaldo.Rows.Count > 0 Then
+                        tstr &= tdtt.Rows.Count & $"  -  ${tdtsaldo.SUM("Saldo").FormatoNumero} Pesos.<br/>"
+                    End If
+                    tdtsaldo = tdtt.FiltraParametros("CveMoneda = 2")
+                    If tdtsaldo.Rows.Count > 0 Then
+                        tstr &= tdtsaldo.Rows.Count & $"  -  ${tdtsaldo.SUM("Saldo").FormatoNumero} Dólares.<br/>"
+                    End If
+
+                    Alert(tstr, TipoMensaje.MsgAdvertencia)
+                End If
+            End If
+
         Else
             GvCxC.DataSource = Nothing
             DtCxCActivas = Nothing
diff --git a/Ventas/RepVencimientosCredito.aspx b/Ventas/RepVencimientosCredito.aspx
index c29f49f8f..3322ead8b 100644
--- a/Ventas/RepVencimientosCredito.aspx
+++ b/Ventas/RepVencimientosCredito.aspx
@@ -82,9 +82,11 @@
                                 <asp:DropDownList runat="server" ID="DdlTipoLinea" CssClass="select2me" Width="100%">
                                     <asp:ListItem Text="Todos" Value="-1" Selected="True"></asp:ListItem>                                                                     
                                     <asp:ListItem Text="Pagaré Especial" Value="1"></asp:ListItem>                                   
-                                    <asp:ListItem Text="PO" Value="2"></asp:ListItem>                                    
+                                    <asp:ListItem Text="PO" Value="2"></asp:ListItem> 
+                                    <asp:ListItem Text="Pagaré Linea" Value="3"></asp:ListItem>
                                 </asp:DropDownList>
                             </div>
+                            
                             <div class="col-md-1 truncate" runat="server" id="DVAgrupador1" visible="false">Agrupador:</div>
                             <div class="col-md-1 " runat="server" id="DVAgrupador2" visible="false">
                                 <asp:DropDownList runat="server" ID="DdlAgrupador" CssClass="select2me" Width="100%">                                    
@@ -99,7 +101,11 @@
                 <div class="portlet-body" style="display: none;">           
                     <div class="row">
                          
-
+                        <label class="col-md-1">Sucursal: </label>
+                        <div class="col-md-1">
+                            <asp:DropDownList ID="DdlSubProyectos"  AppendDataBoundItems="true" DataTextField="SubProyecto" DataValueField="CveSubProyecto" CssClass="ddlFiltros input-sm select2me Widthall" Style="width: 100%;" runat="server"></asp:DropDownList>
+                            <%--<asp:DropDownList CssClass="table-group-action-input form-control input-inline input-small input-sm select2me" ID="DdlSubProyectos" DataTextField="SubProyecto" DataValueField="CveSubProyecto" runat="server"></asp:DropDownList>--%>
+                        </div>
                     </div>
                 </div>
             </div>
@@ -122,8 +128,7 @@
                     <div class="row ">
                         <div class="col-md-12">
 
-                            <asp:GridView ID="GvD" Width="100%" runat="server" GridLines="None"
-                                DataKeyNames="CveLineaAdicional,LineaAdicional,CveCliente,CveProveedor,TipoLinea,Importe,CveMoneda,FechaVencimiento,CveUsuario,CveCategoria,FechaIng,Proveedor,DiasVencimiento"
+                            <asp:GridView ID="GvD" Width="100%" runat="server" GridLines="None"                                
                                 CssClass="table table-striped table-advance table-hover ScrollAD input-sm " ShowHeader="True" EmptyDataText="No se encontraron resultados." ShowHeaderWhenEmpty="true"
                                 AutoGenerateColumns="False" AllowPaging="False" ShowFooter="False">
                                 <Columns>
@@ -134,7 +139,12 @@
                                     <asp:BoundField DataField="Importe" HeaderText="Importe" DataFormatString="{0:n}" ItemStyle-HorizontalAlign="Right" />
                                     <asp:BoundField DataField="Abreviatura" HeaderText="Moneda"  />                                   
                                     <asp:BoundField DataField="DiasVencimiento" HeaderText="Dias de Venc." />
-                                    <asp:BoundField DataField="FechaVencimiento" HeaderText="F. Vencimiento" DataFormatString="{0:d}"  />
+                                    <asp:BoundField DataField="FechaVencimiento" HeaderText="F. Vencimiento" DataFormatString="{0:d}"  /> 
+                                     <asp:TemplateField >
+                                         <ItemTemplate>
+                                             <asp:Literal ID="LtlPC" runat="server" Text='<%#  Eval("PermiteCredito").ToString()=="True"?"Si":"No" %>'></asp:Literal>&nbsp;
+                                         </ItemTemplate>
+                                     </asp:TemplateField>
                                 </Columns>
                             </asp:GridView>
                         </div>
diff --git a/Ventas/RepVencimientosCredito.aspx.cs b/Ventas/RepVencimientosCredito.aspx.cs
index 2bb092c17..b7dd35217 100644
--- a/Ventas/RepVencimientosCredito.aspx.cs
+++ b/Ventas/RepVencimientosCredito.aspx.cs
@@ -70,7 +70,11 @@ public partial class Ventas_RepVencimientosCredito : ClsPaginas
         DdlClientes.setEsWebService(true);
         DdlClientes.Attributes.Add("data-metodo", "getcliente");
         DdlClientes.SelectedText = "Todos";
-        DdlClientes.SelectedValue = "-1";         
+        DdlClientes.SelectedValue = "-1";
+        DdlSubProyectos.Items.Insert(0, new ListItem("Todos", "-1"));
+        DdlSubProyectos.DataSource = get_GlobalDTSubProyectosUsuarios(UsuarioActual.CveUsuario, -1, UsuarioActual.CveEmpresa);
+        DdlSubProyectos.DataBind();
+        
     }    
   
     protected void BtnConsultar_Click(object sender, EventArgs e)
@@ -85,7 +89,7 @@ public partial class Ventas_RepVencimientosCredito : ClsPaginas
 
         ClsVentas objVentas = new ClsVentas();
         
-        if (objVentas.GetLineasAdicionalesVencimientos( DdlClientes.SelectedValue.ToEntero(), DdlTipoLinea.SelectedValue.ToEntero(), txtFechaI.Text.ToDate(), txtFechaF.Text.ToDate(), -1, UsuarioActual.CveEmpresa))
+        if (objVentas.GetLineasAdicionalesVencimientos( DdlClientes.SelectedValue.ToEntero(), DdlTipoLinea.SelectedValue.ToEntero(), txtFechaI.Text.ToDate(), txtFechaF.Text.ToDate(), -1, DdlSubProyectos.SelectedValue.ToEntero(), UsuarioActual.CveEmpresa))
         {
             GvD.DataSource = objVentas.DtResultados;