Fórum Como posso montar esta instrucao SQL ??? usando INNER JOIN #284673
14/06/2005
0
Boa tarde a todos do forum , estou tendo dificuldades em executar a seguinte instrucao SQL: Presciso buscar o nome dos Vendedores da tabela VENDEDOR, Baseada na tabela de CAIXA
CAIXA : CodCaixa, CodSupervisor, CodUsuario, Data, Valor.
VENDEDOR : CodVendedor, Nome, Comissao.
Veja a minha SQL montada, nao da erro mas porem tras para o campo CAIXA o mesmo vendedor
SqlAux.Close;
SqlAux.SQL.Clear;
SqlAux.SQL.Add(´Select Caixa.*,´);
SqlAux.SQL.Add(´Vendedor.Nome as Supervisor,´);
SqlAux.SQL.Add(´Vendedor.Nome as Usuario from Caixa´);
SqlAux.SQL.Add(´Inner Join Vendedor on Vendedor.CodVendedor = Caixa.CodSupervisor´);
SqlAux.SQL.Add(´Inner Join Vendedor on Vendedor.CodVendedor = Caixa.CodUsuario´);
SqlAux.SQL.Add(´Where Caixa.CodCaixa = :Codigo´);
SqlAux.ParamByName(´Codigo´).AsInteger:= NumeroDaAbertura;
SqlAux.Open;
edtSupervisor.Text:= SqlAux.fieldByName(´Supervisor´).AsString;
edtUsuario.Text:= SqlAux.fieldByName(´Usuario´).AsString;
Entao aparece o mesmo no de vendedor para os dois edits...?
alguem sabe me dizer aonde erro ??? Estou usando IB6, delphi 7 Obrigado ...
CAIXA : CodCaixa, CodSupervisor, CodUsuario, Data, Valor.
VENDEDOR : CodVendedor, Nome, Comissao.
Veja a minha SQL montada, nao da erro mas porem tras para o campo CAIXA o mesmo vendedor
SqlAux.Close;
SqlAux.SQL.Clear;
SqlAux.SQL.Add(´Select Caixa.*,´);
SqlAux.SQL.Add(´Vendedor.Nome as Supervisor,´);
SqlAux.SQL.Add(´Vendedor.Nome as Usuario from Caixa´);
SqlAux.SQL.Add(´Inner Join Vendedor on Vendedor.CodVendedor = Caixa.CodSupervisor´);
SqlAux.SQL.Add(´Inner Join Vendedor on Vendedor.CodVendedor = Caixa.CodUsuario´);
SqlAux.SQL.Add(´Where Caixa.CodCaixa = :Codigo´);
SqlAux.ParamByName(´Codigo´).AsInteger:= NumeroDaAbertura;
SqlAux.Open;
edtSupervisor.Text:= SqlAux.fieldByName(´Supervisor´).AsString;
edtUsuario.Text:= SqlAux.fieldByName(´Usuario´).AsString;
Entao aparece o mesmo no de vendedor para os dois edits...?
alguem sabe me dizer aonde erro ??? Estou usando IB6, delphi 7 Obrigado ...
Walter Faria
Curtir tópico
+ 0
Responder
Posts
14/06/2005
Rjun
Altere seu sql.
SqlAux.Close; SqlAux.SQL.Clear; SqlAux.SQL.Add(´Select Ca.*,´); SqlAux.SQL.Add(´Su.Nome as Supervisor,´); SqlAux.SQL.Add(´Us.Nome as Usuario from Caixa Ca´); SqlAux.SQL.Add(´Inner Join Vendedor Su on Su.CodVendedor = Caixa.CodSupervisor´); SqlAux.SQL.Add(´Inner Join Vendedor Us on Us.CodVendedor = Caixa.CodUsuario´); SqlAux.SQL.Add(´Where Ca.CodCaixa = :Codigo´); SqlAux.ParamByName(´Codigo´).AsInteger:= NumeroDaAbertura; SqlAux.Open;
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)