MOSTRAR NO MSFLEXGRID

LLAIA 26/08/2012 09:53:43
#408666

Vai depender de como vc tá carregando esse grid. é uma consulta/view no BD? Coloque na cláusula where uma condição para retorna os não pagos. é um loop em um recodset? Coloque um If verificando uma condição verificando os não pagos.
Como vc tá fazendo a carga?

RICKSOUSA 26/08/2012 12:24:23
#408669

amigo estou fazendo da seguinte maneira:


[txt-color=#0000f0]Select Case TipoConCP.ItemData(TipoConCP.ListIndex)

Case 0
CabecalhoContasPagar
SQL = [Ô]select year(data) as ano from ContasPagar GROUP BY year(Data)[Ô]
Set RS = Conexao.Execute(SQL)
AnoConCP.Clear
Do While Not RS.EOF
AnoConCP.AddItem RS!ano
RS.MoveNext
ZebraFlex MSFlexGrid1, &HC0FFC0

Loop[/txt-color]

RICKSOUSA 26/08/2012 12:26:38
#408670

então quando eu escolho todos registros, ai escolho o ano e o mes e ta carregando normal,

criei um select case para quando eu escolher todos então vai carregar todos, quando eu escolher não carrega somente os que não estão pagos e quando eu escolher sim carrega somente os que estão pagos e etc...

ADILSOO 26/08/2012 22:57:38
#408692 Resposta escolhida

Faz assim...

 SQL = [Ô]SELECT year(data) AS ano FROM ContasPagar WHERE pago = [ô]NAO[ô] GROUP BY year(Data)[Ô]