Merge branch 'master' of http://192.168.10.111:8383/SIG

CxC/RepCxC.aspx

@@ -116,10 +116,8 @@
                                     <asp:ListItem Selected="True" Text="Todos" Value="-1"></asp:ListItem>
                                 </asp:DropDownList>--%>
                             </div>
-
-                            <div class="col-md-1 truncate">
-                                Sucursal: 
-                            </div>
+                                                        
+                            <asp:Label runat="server" ID="LblSubProyecto" CssClass="col-md-1">SubProyecto:</asp:Label>
                             <div class="col-md-2 ">
                                 <asp:DropDownList ID="DdlSubProyecto" runat="server" AppendDataBoundItems="true" DataTextField="SubProyecto" DataValueField="CveSubProyecto" CssClass="form-control  input-small input-sm select2me" Width="100%">
                                     <asp:ListItem Selected="True" Text="Todas" Value="-1"></asp:ListItem>
@@ -352,17 +350,17 @@
 
                     </div>
                     <div class="row">
-                        <div class="col-md-1 truncate" title="Tipo Cliente:" data-toggle="tooltip" data-placement="top">
+                        <div class="col-md-1 truncate" title="Tipo Cliente:" data-toggle="tooltip" data-placement="top" id="divLineaAdicional1" runat="server" visible="false">
                             Linea Adicional:
                         </div>
-                        <div class="col-md-2">
+                        <div class="col-md-2" id="divLineaAdicional2" runat="server" visible="false">
                             <asp:DropDownList ID="DdlTieneLineaAdicional" runat="server" AppendDataBoundItems="true" Class="table-group-action-input form-control input-inline input-small input-sm select2me">
                                 <asp:ListItem Selected="True" Text="Todas" Value="-1"></asp:ListItem>
                                 <asp:ListItem Text="Solo lineas adicionales" Value="1"></asp:ListItem>
                                 <asp:ListItem Text="Sin lineas adicionales" Value="0"></asp:ListItem>
                             </asp:DropDownList>
                         </div>
-                        <div class="col-md-1 truncate" title="Tipo Cliente:" data-toggle="tooltip" data-placement="top">
+                        <div class="col-md-1 truncate" title="Contrato:" data-toggle="tooltip" data-placement="top" id="divContrato1" visible="false" runat="server" >
                             Contrato:
                         </div>
                         <div class="col-md-2" runat="server" id="divContrato" visible="false" >

CxC/RepCxC.aspx.vb

@@ -112,15 +112,12 @@ Partial Class RepCxC
         Else
             DdlClientesWS.setEsWebService(False)
             CargaClientes()
-        End If
-        'DdlClientes.DataSource = GlobalDTCliente(UsuarioActual.CveEmpresa, -1)
-        'DdlClientes.DataBind()
-
-        'CargaSubProyectos
-        DdlSubProyecto.DataSource = GlobalDTSubProyectosUsuarios(UsuarioActual.CveUsuario, -1, UsuarioActual.CveEmpresa, -1, 1)
-        DdlSubProyecto.DataBind()
-
-        'Carga Vendedor
+        End If
+
+        'CargaSubProyectos 
+        CargarCentrosDeCosto(Nothing, DdlSubProyecto, Nothing, LblSubProyecto)
+
+        'Carga Vendedor
         DdlVendedor.DataSource = GlobalDTVendedores(UsuarioActual.CveEmpresa)
         DdlVendedor.DataBind()
         DdlVendedor.SelectedValueExist(UsuarioActual.CveVendedor)
@@ -151,19 +148,12 @@ Partial Class RepCxC
         'Carga Clasificacion Cliente
         DdlClienteClasificacion.DataSource = GlobalDTClienteClasificaciones(UsuarioActual.CveEmpresa)
         DdlClienteClasificacion.DataBind()
-        DdlClienteClasificacion.Items.Insert(0, New ListItem("Todos", "-1"))
-
-        'Dim ObjSisUsuarios As New ClsSisUsuarios()
-
-        'If ObjSisUsuarios.GetEmpresasUsuario(UsuarioActual.CveUsuario) Then
-        '    DdlEmpresas.DataSource = ObjSisUsuarios.DtResultados
-        '    DdlEmpresas.DataBind()
-        '    DivEmpresasFiltro.Visible = True
-        '    For i As Integer = 0 To DdlEmpresas.Items.Count - 1
-        '        DdlEmpresas.Items(i).Selected = True
-        '    Next
-        'End If
-        'ObjSisUsuarios.Dispose()
+        DdlClienteClasificacion.Items.Insert(0, New ListItem("Todos", "-1"))
+
+        If UsuarioActual.CveEmpresa = 119 Then
+            divLineaAdicional1.Visible = True
+            divLineaAdicional2.Visible = True
+        End If
         If UsuarioActual.CveEmpresa = 13 Then
             CargaContratos()
         End If
@@ -176,6 +166,7 @@ Partial Class RepCxC
             DdlContrato.DataSource = ObjContratos.DtResultados
         End If
         divContrato.Visible = True
+        divContrato1.visible = True
         ObjContratos.Dispose()
         DdlContrato.DataBind()
 

CxC/RepCxCDetalle.aspx

@@ -334,20 +334,19 @@
 
                     </div>
                     <div class="row">
-                        <div class="col-md-1 truncate" title="Tipo Cliente:" data-toggle="tooltip" data-placement="top">
+                        <div class="col-md-1 truncate" title="Tipo Cliente:" data-toggle="tooltip" data-placement="top" id="divLineaAdicional1" runat="server" visible="false">
                             Linea Adicional:
-                           
-                        </div>
-                        <div class="col-md-2">
-                            <asp:DropDownList ID="DdlTieneLineaAdicional" runat="server" AppendDataBoundItems="true" Class="table-group-action-input form-control input-inline input-small input-sm select2me">
-                                <asp:ListItem Selected="True" Text="Todas" Value="-1"></asp:ListItem>
-                                <asp:ListItem Text="Solo lineas adicionales" Value="1"></asp:ListItem>
-                                <asp:ListItem Text="Sin lineas adicionales" Value="0"></asp:ListItem>
-                            </asp:DropDownList>
-                        </div>
-                        <div class="col-md-1 truncate" title="Tipo Cliente:" data-toggle="tooltip" data-placement="top">
-                            Contrato:
                         </div>
+                        <div class="col-md-2" id="divLineaAdicional2" runat="server" visible="false">
+                            <asp:DropDownList ID="DdlTieneLineaAdicional" runat="server" AppendDataBoundItems="true" Class="table-group-action-input form-control input-inline input-small input-sm select2me">
+                                <asp:ListItem Selected="True" Text="Todas" Value="-1"></asp:ListItem>
+                                <asp:ListItem Text="Solo lineas adicionales" Value="1"></asp:ListItem>
+                                <asp:ListItem Text="Sin lineas adicionales" Value="0"></asp:ListItem>
+                            </asp:DropDownList>
+                        </div>
+                        <div class="col-md-1 truncate" title="Contrato:" data-toggle="tooltip" data-placement="top" id="divContrato1" visible="false" runat="server" >
+                            Contrato:
+                        </div>                           
                         <div class="col-md-2" runat="server" id="divContrato" visible="false" >
                             <asp:DropDownList ID="DdlContrato" runat="server" AppendDataBoundItems="true" DataTextField="TituloInfo" DataValueField="CveContrato" Class="table-group-action-input form-control input-inline input-small input-sm select2me">
                                 <asp:ListItem Selected="True" Text="Todas" Value="-1"></asp:ListItem>

CxC/RepCxCDetalle.aspx.vb

@@ -247,13 +247,9 @@ Partial Class RepCxCDetalle
 #Region "CARGAS"
     Private Sub CargaCombos()
         Dim CveCliente, CveVendedor, CveUsuario, CveSubProyecto,
-            CveEstatus, CveResponsable, CveAgrupador, CveClienteClasificacion As Integer
-
-        'CargaClientes
-        'CargaClientes
-        'txtFechaI.Text = Now.AddMonths(-12).FirstDayOfMonth.ToShortDateString
-        txtFechaF.Text = Now.LastDayOfMonth.ToShortDateString
+            CveEstatus, CveResponsable, CveAgrupador, CveClienteClasificacion As Integer
 
+        txtFechaF.Text = Now.LastDayOfMonth.ToShortDateString
 
         If UsuarioActual.Empresa.Funcionalidad(105) = "1" Then
             DdlClientesWS.setEsWebService(True)
@@ -427,6 +423,10 @@ Partial Class RepCxCDetalle
         If UsuarioActual.CveEmpresa.Contiene(72, 80, 146, 119) Then ChkAnticipos.Visible = True
 
         DdlTieneLineaAdicional.SelectedValueExist(If(Request("TieneLineaAdicional") IsNot Nothing, Request("TieneLineaAdicional").ToString, "-1").ToString)
+        If UsuarioActual.CveEmpresa = 119 Then
+            divLineaAdicional1.Visible = True
+            divLineaAdicional2.Visible = True
+        End If
 
         If UsuarioActual.CveEmpresa = 13 Then
             CargaContratos()
@@ -438,8 +438,9 @@ Partial Class RepCxCDetalle
         Dim ObjContratos As New ClsContratos
         If ObjContratos.GetContratos(-1, UsuarioActual.CveEmpresa, CveCliente:=-1) Then
             DdlContrato.DataSource = ObjContratos.DtResultados
-        End If
-         divContrato.Visible = True
+        End If
+        divContrato.Visible = True
+        divContrato1.Visible = True
         ObjContratos.Dispose()
         DdlContrato.DataBind()