02/10/2009

comandos sql inner join left join

ola boa tarde sou alexandre desenvolvedor em vb 6 ,esotu com seguinte problema tenho 2 tabelas em um banco dados access tabela pedidodevenda e pessoas utilizo a sql em vb

QSQL = ´SELECT P.NumDoc AS [Nº DOC], iif(pe.pessoa_fisica,nome,razao_social) as PESSOA, iif(pe.pessoa_fisica,nome,razao_social) as VENDEDOR, P.Data AS DATA,´
3 QSQL = QSQL & ´ Format$(p.totalpedido,´#,0.00´) as TOTALPEDIDO, IIF(P.PENDENTE=0,´FECHADO´,´PENDENTE´) AS SITUAÇÃO, P.Chave´
´QSQL = QSQL & ´ FROM PEDIDOSDEVENDA AS P INNER JOIN Pessoas pe ON P.ChavePessoa = Pe.Chave INNER JOIN PESSOAS VE ON p.ChaveVendedor = ve.Chave´
QSQL = QSQL & ´ FROM PEDIDOSDEVENDA AS P INNER JOIN Pessoas pe ON P.ChavePessoa = pe.chave and P.Chavevendedor = pe.chave´
preciso listar a pessoa e o vendedor mas somente aparece os campos se forem iguais
ex: se chavepessoa=chave da tabela pessoa aparece
se chavepessoa<>chavevendedor o campo chavepessoa e chavevendedor ficam iguais mesmo que seja diferente

preciso de ajuda uma solução sql vb


Vbnet

Respostas

02/10/2009

Vbnet

ola boa tarde sou alexandre desenvolvedor em vb 6 ,esotu com seguinte problema tenho 2 tabelas em um banco dados access tabela pedidodevenda e pessoas utilizo a sql em vb QSQL = ´SELECT P.NumDoc AS [Nº DOC], iif(pe.pessoa_fisica,nome,razao_social) as PESSOA, iif(pe.pessoa_fisica,nome,razao_social) as VENDEDOR, P.Data AS DATA,´ 3 QSQL = QSQL & ´ Format$(p.totalpedido,´#,0.00´) as TOTALPEDIDO, IIF(P.PENDENTE=0,´FECHADO´,´PENDENTE´) AS SITUAÇÃO, P.Chave´ ´QSQL = QSQL & ´ FROM PEDIDOSDEVENDA AS P INNER JOIN Pessoas pe ON P.ChavePessoa = Pe.Chave preciso listar a pessoa e o vendedor nesses campos sao gravados numero da chave da pessoa ou vendedor mas somente aparece os campos se forem iguais . ex: se chavepessoa=chave da tabela pessoa ok se chavepessoa<>chavevendedor o campo chavepessoa e chavevendedor ficam iguais mesmo que seja diferente o numero da chave gostaria de listar o vendedor e a pessoa do pedido ex cod 1 pessoa alex vendedor carlos valor 15,00 preciso de ajuda uma solução sql vb



Responder Citar