Duas Condi��es com o IF

Question

Boa Tarde, Meu Nome � Aldo, e estou iniciando no F�rum. Quero saber se alguem pode me ajudar.Exemplo: Tenho uma Tabela (apenas Uma) que controla:  Numero do cliente e o que eles compraram, valor do pr...

Martins · Answer

[quote:539c6a920a=�aldo.junior1�]Boa Tarde, Meu Nome � Aldo, e estou iniciando no F�rum. Quero saber se alguem pode me ajudar.Exemplo: Tenho uma Tabela (apenas Uma) que controla:  Numero do cliente e o que eles compraram, valor do produto, dia, mes, ano etc. Quero saber se com a estrutura IF THEN ELSE consigo mandar imprimir (RAVE) somente o que um determinado cliente comprou no mes de MAR�O (Tabela do Paradox7) :?: Grato,Aldo Pinatti Junior[/quote:539c6a920a]Poder, pode, mas se fosse vc usaria Query, ficaria melhor.O campo m�s � inteiro?Algo mais ou menos assim pode te ajudar.[code:1:539c6a920a] Query1.Close; Query1.SQL.Clear; Query1.SQL.Add(�Select * From Sua_Tabela where Mes = :pmes�); Query1.Params.ParamByName(�pmes�).AsInteger := StrToInt(EdMes.Text); Query1.Open;[/code:1:539c6a920a]Qualquer coisa, retorne ao f�rum....

Aldo.junior1 · Answer

Grato pela resposta, MAS ...... sou meio BURR�O

Sim o Campo do Mes est� escrito [b:43d6c8f21c]MAR�O[/b:43d6c8f21c] (mes_compra) � UMA STRING

Pelo que entendi, com estes parametros com Query+SQL, se referem apenas ao mes, me desculpe se eu N�O entendi bem. Mas eh o seguinte: vou fazer um exemplo, porque tem varios clientes, segue

Campo: [b:43d6c8f21c]COD_CLI[/b:43d6c8f21c] = 100
[b:43d6c8f21c]Nome_CLI[/b:43d6c8f21c] = Paulo
[b:43d6c8f21c]MES_COMPRA[/b:43d6c8f21c]: comprou todos os meses Janeiro, Fevereiro Mar�o e continua a comprar em Abril, mas o Cliente Paulo (COD_CLI=100), teve uma duvida no valor nas compras de mar�o (campo: [b:43d6c8f21c]MES_COMPRA[/b:43d6c8f21c])

Quero Imprimir somente as compras que ele([b:43d6c8f21c]COD_CLI[/b:43d6c8f21c] ) realizou no Mes de MAR�O([b:43d6c8f21c]MES_COMPRA[/b:43d6c8f21c])

Grato,

Delphi 7 + RAVE

Luiz Henrique · Answer

Boa noite aldo

Nao � questao de ser burrao, o Martins te deu um exemplo , ...so faltou o ....AND cliente = �selecionar�..., de uma execucao padrao SQL...apos esta execucao, vc dispararia o teu relatorio. Resumindo vc seleciona e imprime...nao sei bem como o Rave funciona mas seria mais ou menos isso.

Um abra�o....T+

Aldo.junior1 · Answer

AHAHAHAHA, vc n�o sabe o quanto sou novato!!!!

para mim apenas a instru��o:

IF TABLE1.FIELBYNAME(�COD_CLI�).AsInteger=�100� and TABLE1.FIELBYNAME(�MES_COMPRA�).AsString=�MAR�O� then........bastaria para resolver o meu problema.

N�o sei muito (praticamente nada, sei que preciso estudar mais) das instru��es QUERY.SQL. E com as linhas de comando do Martins onde eu encaixaria o AND ??? . em que linha??? Ainda n�o tenho a mesma L�gica que Vcs.

Sou mesmo meio BURR�O

Tenho o Programa praticamente pronto, estou com dificuldades nestas coisas de Consulta e Impress�o.

Por favor me explique, se posso usar express�es tipo IF, While, Case ou outro comando.

Muito Obrigado Cara !!!

Fale comigo como um Novato Mesmo

Grato T+

Aldo

Joaoshi · Answer

Colega, no SQL a instru��o para retornar o que voc� sugeriu como TABLE1 seria:

SELECT * FROM TABLE1 WHERE COD_CLI = 100 [b:7bc91ae424]AND[/b:7bc91ae424]
MES_COMPRA = �MAR�O�

TABLE1.FIELBYNAME(�COD_CLI�).AsInteger=�100� and TABLE1.FIELBYNAME(�MES_COMPRA�).AsString=�MAR�O�

Aldo.junior1 · Answer

Legal Colega Jo�oshiMuito Obrigado!!!, mas tenho um problema. Onde eu Coloco estas instru��es ??? Em todo o lugar que eu coloco me ERRO.Preciso inserir um Componente QUERY no Form ???as Instru��es v�o entre Begin End; ???em que PROCEDURE ??? BOTTONCLICK ???as Instru��es v�o nas propriedades do Componente QUERY ???onde Coloco isto??? Esta est� sendo minha d�vida e ninguem me respondeMuito ObrigadoAldo...

Joaoshi · Answer

Colega, as instru��es v�o na propriedade [b:e33a5df6e6]SQL[/b:e33a5df6e6] da Query.

Ent�o no evento OnClick de um button voc� colocaria:

Query1.Close;
Query1.Sql.Clear;
Query1.Sql.add(�SELECT * FROM TABLE1 WHERE COD_CLI = 100 AND
MES_COMPRA = � + QuotedStr(�MAR�O�) );
Query1.Open;

Como o colega [b:e33a5df6e6]Martins[/b:e33a5df6e6] havia informado no post anterior.

Espero ter ajudado.

Martins · Answer

[quote:cd33aeb820=�joaoshi�]Colega, as instru��es v�o na propriedade [b:cd33aeb820]SQL[/b:cd33aeb820] da Query.Ent�o no evento OnClick de um button voc� colocaria:Query1.Close;Query1.Sql.Clear;Query1.Sql.add(�SELECT * FROM TABLE1 WHERE COD_CLI = 100 AND MES_COMPRA = � + QuotedStr(�MAR�O�) );Query1.Open;Como o colega [b:cd33aeb820]Martins[/b:cd33aeb820] havia informado no post anterior.Espero ter ajudado.[/quote:cd33aeb820]Lembrando q vc poder� trocar o nome Mar�o por um parametro para ficar mais flex�vel OK!Valew pela complementa��o do c�digo Galera!!Modificando um pouco aqui, testa a�.Lembrando q vc deve fazer isso na query q vai ser usada no seu relat�rio, e vc dever� se acostumar a usar SQL, vc ainda vai precisar muito.[code:1:cd33aeb820] Query1.Close;  Query1.SQL.Clear;  Query1.SQL.Add(�SELECT * FROM Sua_Tabela WHERE CODCLI = : PCODOCLI  AND MES LIKE :pMES�);  Query1.Params.ParamByName(�PCODCLI�).AsInteger := StrToInt(Edcodcli.Text);  Query1.Params.ParamByName(�pMES�).AsString := EdMes.Text +���; Query1.Open; [/code:1:cd33aeb820]...

Aldo.junior1 · Answer

OK, Obrigado a todos os Colegas, Pelas Respostas

Agora Sim, me deram uma Luz, as informa��es estavam meio em peda�os

Vou fazer conforme as orienta��es dos colegas, qualquer coisa volto ao F�rum.

A!! e desculpe alguma coisa e ao Administrador pela duplicidade, mas as informa��es estavam meio desencontradas e fiquei ancioso.

OBRIGADO PELA AJUDA RAPAZIADA !!!! VALEU

Aldo

F�rum Duas Condi��es com o IF #356898