AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Sub Proyectos en CxP

Browse Source
This commit is contained in:
Jonathan Alexis Perez Morales
2022-10-31 12:42:56 -07:00
parent 2f28a20f2c
commit 7d550da50b
4 changed files with 793 additions and 746 deletions
Download Patch File Download Diff File Expand all files Collapse all files

48
Compras/RepCxP.aspx
View File

@@ -85,7 +85,7 @@
<div class="row text-size-12">
<div class="col-md-1"><span>Proveedor: </span></div>
<div class="col-md-1">
<ADS:Dropdownlost ID="DdlProveedor" runat="server" CssStyle="width: 100%; selected2me" Width="100%" DataTextField="RazonSocial" DataValueField="CveProveedor" ></ADS:Dropdownlost>
<ADS:Dropdownlost ID="DdlProveedor" runat="server" CssStyle="width: 100%; selected2me" Width="100%" DataTextField="RazonSocial" DataValueField="CveProveedor"></ADS:Dropdownlost>
</div>
<div class="col-md-1"><span>Clasificación:</span></div>
<div class="col-md-1">
@@ -226,13 +226,21 @@
</asp:DropDownList>
</div>
<div class="col-md-1"><span><asp:Label runat="server" ID="LblSubProyectofiltro"></asp:Label>:</span></div>
<asp:Label runat="server" class="col-md-1" ID="LblProyecto"></asp:Label>
<div class="col-md-1">
<asp:DropDownList ID="DdlSubProyecto" runat="server" CssClass="select2me" AppendDataBoundItems="true" DataTextField="SubProyecto" DataValueField="CveSubProyecto" Width="100%">
<asp:DropDownList ID="DdlProyecto" runat="server" CssClass="select2me" DataTextField="Proyecto" DataValueField="CveProyecto" Width="100%" AutoPostBack="true">
<asp:ListItem Selected="True" Text="Todas" Value="-1"></asp:ListItem>
</asp:DropDownList>
</div>
<asp:Label runat="server" class="col-md-1" ID="LblSubProyectofiltro"></asp:Label>
<div class="col-md-1">
<asp:DropDownList ID="DdlSubProyecto" runat="server" CssClass="select2me" DataTextField="SubProyecto" DataValueField="CveSubProyecto" Width="100%">
<asp:ListItem Selected="True" Text="Todas" Value="-1"></asp:ListItem>
</asp:DropDownList>
</div>
<div class="col-md-1"><span>Tipo Docto:</span></div>
<div class="col-md-2 " style="padding-bottom: 10px;">
<asp:ListBox ID="DdlTipoDocto" SelectionMode="Multiple" CssClass="form-control ddlFiltros input-sm select2me Widthall" Style="width: 100%;" runat="server">
@@ -243,33 +251,28 @@
<asp:ListItem Selected="True" Value="DEV" Text="Devolución"></asp:ListItem>
</asp:ListBox>
</div>
<div class="col-md-1"><span>Comprobación:</span></div>
<div class="col-md-1">
<asp:DropDownList ID="DdlComprobacion" runat="server" CssClass="select2me" AppendDataBoundItems="true" Width="100%">
<asp:ListItem Selected="True" Text="Todos" Value="-1"></asp:ListItem>
<asp:ListItem Text="Si" Value="1"></asp:ListItem>
<asp:ListItem Text="No" Value="0"></asp:ListItem>
</asp:DropDownList>
</div>
</div>
<div class="row">
<div id="DivEmpresasFiltro" runat="server" visible="false">
<div class="col-md-1 truncate">
Empresas:
</div>
<div class="col-md-2 " style="padding-bottom: 10px;">
<asp:ListBox ID="DdlEmpresas" SelectionMode="Multiple" CssClass="form-control ddlFiltros input-sm select2me Widthall" Style="width: 100%;" runat="server" DataTextField="Empresa" DataValueField="CveEmpresa"></asp:ListBox>
</div>
</div>
<div runat="server" id="divAgruparMes" visible="false">
<div runat="server" id="divAgruparMes" visible="false">
<div class="col-md-1 truncate ">Ver por meses: </div>
<div class="col-md-1 truncate ">
<asp:CheckBox runat="server" ID="chkAgruparMes"/>
<asp:CheckBox runat="server" ID="chkAgruparMes" />
</div>
</div>
<div class="col-md-1 truncate" title="Moneda:" data-toggle="tooltip" data-placement="top">
Moneda:
</div>
<div class="col-md-1 truncate">
<asp:DropDownList ID="DdlMoneda" runat="server" AppendDataBoundItems="true" Class="table-group-action-input form-control input-inline input-small input-sm select2me">
@@ -278,6 +281,14 @@
<asp:ListItem Text="Dolares" Value="2"></asp:ListItem>
</asp:DropDownList>
</div>
<div class="col-md-1"><span>Comprobación:</span></div>
<div class="col-md-1">
<asp:DropDownList ID="DdlComprobacion" runat="server" CssClass="select2me" AppendDataBoundItems="true" Width="100%">
<asp:ListItem Selected="True" Text="Todos" Value="-1"></asp:ListItem>
<asp:ListItem Text="Si" Value="1"></asp:ListItem>
<asp:ListItem Text="No" Value="0"></asp:ListItem>
</asp:DropDownList>
</div>
</div>
</div>
</div>
@@ -295,6 +306,7 @@
<asp:TemplateField ItemStyle-Width="7%">
<HeaderTemplate>
Saldo
</HeaderTemplate>
<ItemTemplate>
<asp:HyperLink CssClass="Texto" ID="HplSaldo" runat="server" Text='<%# Eval("Saldo", "{0:N2}") %>'></asp:HyperLink>
@@ -395,6 +407,7 @@
<asp:TemplateField ItemStyle-Width="7%">
<HeaderTemplate>
Total
</HeaderTemplate>
<ItemTemplate>
<asp:HyperLink CssClass="Texto" ID="LtlPorVencer" runat="server" Text='<%# Eval("por_vencer", "{0:N2}") %>'></asp:HyperLink>
@@ -404,6 +417,7 @@
<asp:TemplateField Visible="false">
<HeaderTemplate>
Ventas
</HeaderTemplate>
<ItemTemplate>
<asp:HyperLink CssClass="Texto" ID="LtlVentas" runat="server" Text='<%# Eval("Total", "{0:N2}") %>'></asp:HyperLink>
@@ -412,6 +426,7 @@
<asp:TemplateField Visible="false">
<HeaderTemplate>
Saldo
</HeaderTemplate>
<ItemTemplate>
<asp:HyperLink CssClass="Texto" ID="LtlSaldo1" runat="server" Text='<%# Eval("Saldo", "{0:N2}") %>'></asp:HyperLink>
@@ -420,6 +435,7 @@
<asp:TemplateField Visible="false">
<HeaderTemplate>
Resta
</HeaderTemplate>
<ItemTemplate>
<asp:HyperLink CssClass="Texto" ID="LtlVentasRecuperado" runat="server"></asp:HyperLink>
@@ -428,6 +444,7 @@
<asp:TemplateField Visible="false">
<HeaderTemplate>
% Recup.
</HeaderTemplate>
<ItemTemplate>
<asp:HyperLink CssClass="Texto" ID="LtlPorRecuperado" runat="server"></asp:HyperLink>
@@ -436,6 +453,7 @@
<asp:TemplateField Visible="false">
<HeaderTemplate>
% X Recup.
</HeaderTemplate>
<ItemTemplate>
<asp:HyperLink CssClass="Texto" ID="LtlPorPorRecuperar" runat="server"></asp:HyperLink>
@@ -548,6 +566,7 @@
</div>
</div>
</div>
</ContentTemplate>
</asp:UpdatePanel>
<div class="modal-footer">
@@ -585,7 +604,8 @@
<div class="row" style="margin-left: 10px;" runat="server" id="LiEspecifico" visible="false">
Especifico:
<asp:TextBox ID="TxtEspecifico" runat="server" Width="55px" />
<asp:TextBox ID="TxtEspecifico" runat="server" Width="55px" />
</div>
</ContentTemplate>
</asp:UpdatePanel>

14
Compras/RepCxP.aspx.vb
View File

@@ -129,9 +129,9 @@ Partial Class Compras_RepCxP
DdlUsuarioResponsable.DataSource = GlobalDTUsuarioResponsable.FiltraParametros("CveEmpresa = " & UsuarioActual.CveEmpresa).FiltraParametros("ProveedoresResponsables > 0")
DdlUsuarioResponsable.DataBind()
DdlSubProyecto.DataSource = GlobalDTSubProyectosUsuarios(UsuarioActual.CveUsuario, -1, UsuarioActual.CveEmpresa, -1, 1)
DdlSubProyecto.DataBind()
CargarCentrosDeCosto(Nothing, Nothing, Nothing, LblSubProyectofiltro)
'DdlSubProyecto.DataSource = GlobalDTSubProyectosUsuarios(UsuarioActual.CveUsuario, -1, UsuarioActual.CveEmpresa, -1, 1)
'DdlSubProyecto.DataBind()
CargarCentrosDeCosto(DdlProyecto, DdlSubProyecto, LblProyecto, LblSubProyectofiltro)
DdlProveedoresClasificaciones.DataSource = GlobalDTProveedorClasificacion(UsuarioActual.CveEmpresa)
DdlProveedoresClasificaciones.DataBind()
@@ -168,6 +168,14 @@ Partial Class Compras_RepCxP
End Sub
Protected Sub DdlProyecto_SelectedIndexChanged(sender As Object, e As System.EventArgs) Handles DdlProyecto.SelectedIndexChanged
DdlSubProyecto.DataSource = GlobalDTSubProyectosUsuarios(UsuarioActual.CveUsuario, DdlProyecto.SelectedValue.ToEntero(), UsuarioActual.CveEmpresa, CveEstatus:=1)
DdlSubProyecto.DataBind()
DdlSubProyecto.Items.Insert(0, New ListItem("Todos", "-1"))
UPFiltros.Update()
End Sub
Private Sub CargaDatos()
If RblTipoCambio.SelectedValue = 3 And TxtEspecifico.Text <> "" Then
TCEspecifico = TxtEspecifico.Text

29
Compras/RepCxPDetalle.aspx
View File

@@ -216,9 +216,16 @@
<asp:ListItem Selected="True" Text="Todos" Value="-1"></asp:ListItem>
</asp:DropDownList>
</div>
<div class="col-md-1"><span><asp:Label runat="server" ID="LblSubProyectofiltro"></asp:Label>:</span></div>
<asp:Label runat="server" class="col-md-1" ID="LblProyecto"></asp:Label>
<div class="col-md-1">
<asp:DropDownList ID="DdlSubProyecto" runat="server" CssClass="select2me" AppendDataBoundItems="true" DataTextField="SubProyecto" DataValueField="CveSubProyecto" Width="100%">
<asp:DropDownList ID="DdlProyecto" runat="server" CssClass="select2me" DataTextField="Proyecto" DataValueField="CveProyecto" Width="100%" AutoPostBack="true">
<asp:ListItem Selected="True" Text="Todas" Value="-1"></asp:ListItem>
</asp:DropDownList>
</div>
<asp:Label runat="server" class="col-md-1" ID="LblSubProyectofiltro"></asp:Label>
<div class="col-md-1">
<asp:DropDownList ID="DdlSubProyecto" runat="server" CssClass="select2me" DataTextField="SubProyecto" DataValueField="CveSubProyecto" Width="100%">
<asp:ListItem Selected="True" Text="Todas" Value="-1"></asp:ListItem>
</asp:DropDownList>
</div>
@@ -230,14 +237,7 @@
<asp:ListItem Text="No" Value="0"></asp:ListItem>
</asp:DropDownList>
</div>
<div class="col-md-1" style="margin-left:20px"><span>Aplica NC:</span></div>
<div class="col-md-1">
<asp:DropDownList ID="DdlAplicaNC" runat="server" CssClass="select2me" AppendDataBoundItems="true" Width="100%">
<asp:ListItem Selected="True" Text="Todos" Value="-1"></asp:ListItem>
<asp:ListItem Text="Si" Value="1"></asp:ListItem>
<asp:ListItem Text="No" Value="0"></asp:ListItem>
</asp:DropDownList>
</div>
</div>
@@ -246,7 +246,14 @@
<div class="col-md-1">
<asp:DropDownList ID="Ddlmoneda" runat="server" AppendDataBoundItems="true" CssClass="select2me" DataTextField="Moneda" DataValueField="CveMoneda" Width="100%" ></asp:DropDownList>
</div>
<div class="col-md-1" style="margin-left:20px"><span>Aplica NC:</span></div>
<div class="col-md-1">
<asp:DropDownList ID="DdlAplicaNC" runat="server" CssClass="select2me" AppendDataBoundItems="true" Width="100%">
<asp:ListItem Selected="True" Text="Todos" Value="-1"></asp:ListItem>
<asp:ListItem Text="Si" Value="1"></asp:ListItem>
<asp:ListItem Text="No" Value="0"></asp:ListItem>
</asp:DropDownList>
</div>
</div>
</div>
</div>

20
Compras/RepCxPDetalle.aspx.vb
View File

@@ -268,11 +268,15 @@ Partial Class RepCxPDetalle
Dim CveSucursal As Integer = IfNull(Request("CveSubProyecto"), -1).ToString.ToEntero
DdlSubProyecto.DataSource = GlobalDTSubProyectosUsuarios(UsuarioActual.CveUsuario, -1, UsuarioActual.CveEmpresa, -1, 1)
DdlSubProyecto.DataBind()
'DdlSubProyecto.DataSource = GlobalDTSubProyectosUsuarios(UsuarioActual.CveUsuario, -1, UsuarioActual.CveEmpresa, -1, 1)
'DdlSubProyecto.DataBind()
'DdlSubProyecto.Items.Insert(1, New ListItem("Sin Sucursal", "0"))
'DdlSubProyecto.SelectedValueExist(CveSucursal)
CargarCentrosDeCosto(DdlProyecto, DdlSubProyecto, LblProyecto, LblSubProyectofiltro)
DdlSubProyecto.Items.Insert(1, New ListItem("Sin Sucursal", "0"))
DdlSubProyecto.SelectedValueExist(CveSucursal)
CargarCentrosDeCosto(Nothing, Nothing, Nothing, LblSubProyectofiltro)
'CargarCentrosDeCosto(Nothing, Nothing, Nothing, LblSubProyectofiltro)
Dim TipoMoneda As Integer = IfNull(Request("TipoMoneda"), 1).ToString.ToEntero
RblTipoCambio.SelectedValue = TipoMoneda.ToString
@@ -346,6 +350,14 @@ Partial Class RepCxPDetalle
End Sub
Protected Sub DdlProyecto_SelectedIndexChanged(sender As Object, e As System.EventArgs) Handles DdlProyecto.SelectedIndexChanged
DdlSubProyecto.DataSource = GlobalDTSubProyectosUsuarios(UsuarioActual.CveUsuario, DdlProyecto.SelectedValue.ToEntero(), UsuarioActual.CveEmpresa, CveEstatus:=1)
DdlSubProyecto.DataBind()
DdlSubProyecto.Items.Insert(0, New ListItem("Todos", "-1"))
UPFiltros.Update()
End Sub
Private Function CargaCuentasContables(DT As DataTable) As DataTable
Dim ObjConpaq As New ClsContPAQi(UsuarioActual.Empresa)