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

Compras ddlclasificaiones, seleccionar no filtra ps

Browse Source
This commit is contained in:
rakcsle
2021-02-19 11:03:18 -07:00
parent 624d253e19
commit 2542f4720f
3 changed files with 7 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
App_Code/ClsBancos.vb
View File

@@ -954,7 +954,7 @@ Public Class ClsBancos
Dim dttpagos As DataTable = Nothing Dim dttpagos As DataTable = Nothing
Dim dr As Data.DataRow = Nothing Dim dr As Data.DataRow = Nothing
If GetComplementoPagosRep(-1, Now.AddYears(-2), Now, If(CvePrePoliza > 0, -1, CveIE), CveVenta, If(EsRegeneracion, 2, 1), UsuarioActual.CveEmpresa, CvePrePoliza:=CvePrePoliza) Then If GetComplementoPagosRep(-1, Now.AddYears(-5), Now, If(CvePrePoliza > 0, -1, CveIE), CveVenta, If(EsRegeneracion, 2, 1), UsuarioActual.CveEmpresa, CvePrePoliza:=CvePrePoliza) Then
dr = DtResultados.FiltroPrimero("CveVenta IS NULL") dr = DtResultados.FiltroPrimero("CveVenta IS NULL")
dttpagos = DtResultados.FiltraParametros("CveVenta > 0") dttpagos = DtResultados.FiltraParametros("CveVenta > 0")
End If End If

4
Compras/Compras.aspx.vb
View File

@@ -17759,6 +17759,7 @@ Partial Class Compras_Compras
DdlClasificacionChange() DdlClasificacionChange()
End Sub End Sub
Private Sub DdlClasificacionChange() Private Sub DdlClasificacionChange()
CargaPS(DdlClasificacion.SelectedValue.ToEntero) CargaPS(DdlClasificacion.SelectedValue.ToEntero)
If UsuarioActual.Empresa.Funcionalidad(200) = "1" Then If UsuarioActual.Empresa.Funcionalidad(200) = "1" Then
@@ -17811,8 +17812,7 @@ Partial Class Compras_Compras
DdlPS.DataSource = If(CveClasificacion > 0, DTTemp.FiltraParametros($"CveClasificacion = {CveClasificacion}"), DTTemp) DdlPS.DataSource = If(CveClasificacion > 0, DTTemp.FiltraParametros($"CveClasificacion = {CveClasificacion}"), DTTemp)
Else Else
DdlPS.DataSource = GlobalDTPSSimplificado(UsuarioActual.CveEmpresa) DdlPS.DataSource = If(CveClasificacion > 0, GlobalDTPSSimplificado(UsuarioActual.CveEmpresa).FiltraParametros($"CveClasificacion = {CveClasificacion}"), GlobalDTPSSimplificado(UsuarioActual.CveEmpresa))
End If End If

4
OC/RepSolicitudesAnticipo.aspx.cs
View File

@@ -122,16 +122,20 @@ public partial class OC_RepSolicitudesAnticipo : ClsPaginas
if (DdlEstatus.SelectedValue.ToEntero() == 3) if (DdlEstatus.SelectedValue.ToEntero() == 3)
{ {
GvSolicitudes.Columns[5].Visible = false; GvSolicitudes.Columns[5].Visible = false;
GvSolicitudes.Columns[9].Visible = false;
GvSolicitudes.Columns[6].Visible = true; GvSolicitudes.Columns[6].Visible = true;
GvSolicitudes.Columns[7].Visible = true; GvSolicitudes.Columns[7].Visible = true;
} }
else else
{ {
GvSolicitudes.Columns[5].Visible = true; GvSolicitudes.Columns[5].Visible = true;
GvSolicitudes.Columns[9].Visible = true;
GvSolicitudes.Columns[6].Visible = false; GvSolicitudes.Columns[6].Visible = false;
GvSolicitudes.Columns[7].Visible = false; GvSolicitudes.Columns[7].Visible = false;
} }
CargaDatos(); CargaDatos();
} }