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

Reportes Cambiar Cliente y proveedor a dropdown lost, Compras Editar Fecha de compra, reg prepolizas s agregar IE cuando ya esta creada la poliza

Browse Source
This commit is contained in:
rakcsle
2022-06-29 10:07:33 -07:00
parent 6cf6a1c02e
commit f28317c346
24 changed files with 536 additions and 152 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
Ventas/RepProductosServiciosPeriodo.aspx
View File

@@ -202,9 +202,11 @@
</div>
<label class="col-md-1 ">Cliente:</label>
<div class="col-md-2">
<asp:DropDownList ID="DdlClientes" runat="server" AppendDataBoundItems="true" DataTextField="Nombre" DataValueField="CveCliente" Class="table-group-action-input form-control input-inline input-small input-sm select2me">
<ADS:Dropdownlost CssClassDdl="select2me" ID="DdlClientes" Width="100%" data-metodo="getcliente" runat="server" DataTextField="NombreComercial" DataValueField="CveCliente" CssStyle="width: 100%;"></ADS:Dropdownlost>
<%--<asp:DropDownList ID="DdlClientes" runat="server" AppendDataBoundItems="true" DataTextField="Nombre" DataValueField="CveCliente" Class="table-group-action-input form-control input-inline input-small input-sm select2me">
<asp:ListItem Selected="True" Text="Todos" Value="-1"></asp:ListItem>
</asp:DropDownList>
</asp:DropDownList>--%>
</div>
<label class="col-md-1 truncate">Fecha Mostrada:</label>
<div class="col-md-2">

24
Ventas/RepProductosServiciosPeriodo.aspx.cs
View File

@@ -70,14 +70,18 @@ public partial class Ventas_RepProductosServiciosPeriodo : ClsPaginas
{
DdlTipoComprobante.SelectedValueExist(Opcion);
DdlGrupo.SelectedValueExist("7");
DdlTipoComprobante_SelectedIndexChanged(DdlTipoComprobante, EventArgs.Empty);
DdlEstatus.SelectedValue = "-1";
}
}
private void CargaCombos()
{
//CargaClientes
DdlTipoComprobante_SelectedIndexChanged(DdlTipoComprobante, EventArgs.Empty);
DdlEstatus.SelectedValue = "-1";
}
}
private void CargaCombos()
{
////CargaClientes
//ClsClientes ObjClientes = new ClsClientes();
//if (ObjClientes.GetClientes(-1, "-1", "-1", "-1", "-1", "-1", "-1", -1, UsuarioActual.CveEmpresa))
//{
// DdlClientes.DataSource = ObjClientes.DtResultados;
//}
//ObjClientes.Dispose();
//DdlClientes.DataBind();
@@ -260,10 +264,10 @@ public partial class Ventas_RepProductosServiciosPeriodo : ClsPaginas
DdlGrupo.SelectedValueExist("8");
}
#endregion
#region SELECTED INDEX CHANGE
#region SELECTED INDEX CHANGE
protected void DdlClienteClasificacion_SelectedIndexChanged(object sender, EventArgs e)
{

5
Ventas/RepRecuperacionPeriodo.aspx
View File

@@ -114,9 +114,10 @@
</div>
<div class="col-md-1 truncate">Cliente:</div>
<div class="col-md-2 ">
<asp:DropDownList ID="DdlClientes" runat="server" AppendDataBoundItems="true" DataTextField="Nombre" DataValueField="CveCliente" CssClass="form-control input-small input-sm select2me" Width="100%">
<ADS:Dropdownlost CssClassDdl="select2me" ID="DdlClientes" Width="100%" data-metodo="getcliente" runat="server" DataTextField="NombreComercial" DataValueField="CveCliente" CssStyle="width: 100%;"></ADS:Dropdownlost>
<%--<asp:DropDownList ID="DdlClientes" runat="server" AppendDataBoundItems="true" DataTextField="Nombre" DataValueField="CveCliente" CssClass="form-control input-small input-sm select2me" Width="100%">
<asp:ListItem Selected="True" Text="Todos" Value="-1"></asp:ListItem>
</asp:DropDownList>
</asp:DropDownList>--%>
</div>
<div class="col-md-1 truncate">Clasificación Cli.:</div>
<div class="col-md-2 ">

9
Ventas/RepRecuperacionPeriodo.aspx.cs
View File

@@ -76,9 +76,16 @@ public partial class Ventas_RepRecuperacionPeriodo : ClsPaginas
DdlBanco.Items.Insert(0, new ListItem("Todos", "-1"));
DdlBanco.DataBind();
//Carga Clasificacion Cliente
ClsClientes ObjCliente = new ClsClientes();
if (ObjCliente.GetClienteClasificacion(UsuarioActual.CveEmpresa))
{
DdlClienteClasificacion.DataSource = ObjCliente.DtResultados;
}
ObjCliente.Dispose();
DdlClienteClasificacion.Items.Insert(0, new ListItem("Todos", "-1"));
DdlClienteClasificacion.DataBind();
DdlClientes.setEsWebService(true);
@@ -92,7 +99,7 @@ public partial class Ventas_RepRecuperacionPeriodo : ClsPaginas
}
private void GenerarPDF(string Opcion)
{
{
string FechaInicio, FechaFin, Sucursal, Grupo, Vendedor,Cliente, ClasificacionCliente,Banco,CuentaBancaria,TipoDocto,EstatusCliente,Registro,Responsable;
if (txtFechaI.Text == "") { FechaInicio = ""; } else { FechaInicio = $"&emsp;<b>Fecha Inicio:</b> {txtFechaI.Text}"; }
if (txtFechaF.Text == "") { FechaFin = ""; } else { FechaFin = $"&emsp;<b>Fecha Fin:</b> {txtFechaF.Text}"; }

6
Ventas/RepVentasPeriodo.aspx
View File

@@ -226,9 +226,11 @@
</div>
<label class="col-md-1 ">Cliente:</label>
<div class="col-md-2">
<asp:DropDownList ID="DdlClientes" runat="server" AppendDataBoundItems="true" DataTextField="Nombre" DataValueField="CveCliente" Class="table-group-action-input form-control input-inline input-small input-sm select2me">
<%--<asp:DropDownList ID="DdlClientes" runat="server" AppendDataBoundItems="true" DataTextField="Nombre" DataValueField="CveCliente" Class="table-group-action-input form-control input-inline input-small input-sm select2me">
<asp:ListItem Selected="True" Text="Todos" Value="-1"></asp:ListItem>
</asp:DropDownList>
</asp:DropDownList>--%>
<ADS:Dropdownlost CssClassDdl="select2me" ID="DdlClientes" Width="100%" data-metodo="getcliente" runat="server" DataTextField="NombreComercial" DataValueField="CveCliente" CssStyle="width: 100%;"></ADS:Dropdownlost>
</div>
<label title="Clasificación Cliente" data-toggle="tooltip" data-placement="top" class="col-md-1 ">Clasificacion Cli.:</label>
<div class="col-md-2">

38
Ventas/RepVentasPeriodo.aspx.vb
View File

@@ -96,16 +96,20 @@ Partial Class RepVentasPeriodo
End Sub
Private Sub CargaCombos()
'CargaClientes
Dim ObjClientes As New ClsClientes
If ObjClientes.GetClientes(-1, "-1", "-1", "-1", "-1", "-1", "-1", -1, UsuarioActual.CveEmpresa) Then
DdlClientes.DataSource = ObjClientes.DtResultados
Else
DdlClientes.DataSource = Nothing
End If
ObjClientes.Dispose()
DdlClientes.DataBind()
Private Sub CargaCombos()
''CargaClientes
'Dim ObjClientes As New ClsClientes
'If ObjClientes.GetClientes(-1, "-1", "-1", "-1", "-1", "-1", "-1", -1, UsuarioActual.CveEmpresa) Then
' DdlClientes.DataSource = ObjClientes.DtResultados
'Else
' DdlClientes.DataSource = Nothing
'End If
'ObjClientes.Dispose()
'DdlClientes.DataBind()
DdlClientes.setEsWebService(True)
DdlClientes.Attributes.Add("data-metodo", "getcliente")
DdlClientes.SelectedText = "Todos"
DdlClientes.SelectedValue = "-1"
'CargaSucursales
@@ -192,8 +196,10 @@ Partial Class RepVentasPeriodo
FechaIEjec = If(IsDate(TxtFechaIEjec.Text.Trim()), TxtFechaIEjec.Text.Trim.ToDate, MinFecha)
FechaFEjec = If(IsDate(TxtFechaFEjec.Text.Trim()), TxtFechaFEjec.Text.Trim.ToDate, MaxFecha)
Dim ModalidadContable As Boolean = Not ChkLecturaAdmin.Checked
Dim ModalidadContable As Boolean = Not ChkLecturaAdmin.Checked
If ObjVentas.GetRepVentasPeriodos(FechaI, FechaF, FechaIEjec, FechaFEjec, DdlClientes.SelectedValue.ToEntero, DdlSubProyectoEjecucion.SelectedValue.ToEntero, DdlVendedor.SelectedValue.ToEntero,
DdlUsuario.SelectedValue.ToEntero, DdlEstatus.SelectedValue.ToEntero, "-1", UsuarioActual.CveEmpresa, DdlGrupo.SelectedValue.ToEntero, DdlTipoComprobante.SelectedValue,
DdlProyecto.SelectedValue.ToEntero, DdlSubProyecto.SelectedValue.ToEntero, RblTipoCambio.SelectedValue.ToEntero, TCEspecifico, CveUsuarioConsulta:=UsuarioActual.CveUsuario,
@@ -408,11 +414,13 @@ Partial Class RepVentasPeriodo
CargaClientes()
End Sub
Private Sub CargaClientes()
DdlClientes.Items.Clear()
Private Sub CargaClientes()
DdlClientes.ddl.Items.Clear()
DdlClientes.DataSource = GlobalDTCliente(UsuarioActual.CveEmpresa, -1).FiltraParametros($"CveClienteClasificacion = {DdlClienteClasificacion.SelectedValue.ToEntero} OR {DdlClienteClasificacion.SelectedValue.ToEntero} = -1")
DdlClientes.DataBind()
DdlClientes.Items.Insert(0, New ListItem("Todos", "-1"))
DdlClientes.ddl.Items.Insert(0, New ListItem("Todos", "-1"))
End Sub
End Class