Clipper On Line • Ver Tópico - Limitar a um registro de determinada tabela

Limitar a um registro de determinada tabela

Discussão sobre SQL

Moderador: Moderadores

 

Limitar a um registro de determinada tabela

Mensagempor JoséQuintas » 15 Abr 2020 17:08

Tem algum jeito prático disto:

    WITH OBJECT cnSQL
      :cSql := "SELECT IDPEDIDO, PDVALNOT, PDDATEMI, PDCADASTRO, PDVENDEDOR, JPFINAN.IDFINAN," + ;
         " JPFINAN.FINUMDOC, JPFINAN.FIPARCELA, JPFINAN.FIPEDIDO, JPFINAN.FIDATEMI," + ;
         " JPFINAN.FIDATVEN, JPFINAN.FIVALOR, JPFINAN.FIDATPAG, JPFINAN.FIDATCAN, JPFINAN.FIOBS," + ;
         " JPFINAN.FICADASTRO, JPCADASTRO.CDNOME, JPNOTFIS.IDNOTFIS, JPITPED.IPCFOP" + ;
         " FROM JPPEDIDO" + ;
         " LEFT JOIN JPFINAN ON JPFINAN.FIPEDIDO = JPPEDIDO.IDPEDIDO" + ;
         " LEFT JOIN JPCADASTRO ON JPCADASTRO.IDCADASTRO = JPFINAN.FICADASTRO" + ;
         " LEFT JOIN JPNOTFIS ON JPNOTFIS.NFPEDIDO = JPPEDIDO.IDPEDIDO" + ;
         " LEFT JOIN JPITPED ON JPITPED.IPPEDIDO = JPPEDIDO.IDPEDIDO" + ;
         " WHERE IDPEDIDO = " + NumberSQL( mIdPedido ) + ;
         " ORDER BY IDFINAN"
      :Execute()


Estou puxando o financeiro de um pedido, mas preciso do CFOP de um dos produtos. (JPITPED)
Precisaria limitar a 1 produto, ao mesmo tempo que não posso limitar no financeiro.
José M. C. Quintas
Harbour 3.2, mingw, gtwvg, multithread, dbfcdx, ADO+MySql, PNotepad
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar de usuário

JoséQuintas
Membro Master

Membro Master
 
Mensagens: 18013
Data de registro: 26 Fev 2007 11:59
Cidade/Estado: São Paulo-SP
Curtiu: 15 vezes
Mens.Curtidas: 1206 vezes

Limitar a um registro de determinada tabela

Mensagempor JoséQuintas » 15 Abr 2020 17:26

Resolvido.
Tabela temporária ITEMPED com um único registro.

   WITH OBJECT cnSQL
      :cSql := "SELECT IDPEDIDO, PDVALNOT, PDDATEMI, PDCADASTRO, PDVENDEDOR, JPFINAN.IDFINAN," + ;
         " JPFINAN.FINUMDOC, JPFINAN.FIPARCELA, JPFINAN.FIPEDIDO, JPFINAN.FIDATEMI," + ;
         " JPFINAN.FIDATVEN, JPFINAN.FIVALOR, JPFINAN.FIDATPAG, JPFINAN.FIDATCAN, JPFINAN.FIOBS," + ;
         " JPFINAN.FICADASTRO, JPCADASTRO.CDNOME, JPNOTFIS.IDNOTFIS, ITEMPED.IPCFOP" + ;
         " FROM JPPEDIDO" + ;
         " LEFT JOIN JPFINAN ON JPFINAN.FIPEDIDO = JPPEDIDO.IDPEDIDO" + ;
         " LEFT JOIN JPCADASTRO ON JPCADASTRO.IDCADASTRO = JPFINAN.FICADASTRO" + ;
         " LEFT JOIN JPNOTFIS ON JPNOTFIS.NFPEDIDO = JPPEDIDO.IDPEDIDO" + ;
         " LEFT JOIN ( " + ;
            " SELECT IDITPED, IPPEDIDO, IPCFOP FROM JPITPED " + ;
            " WHERE IPPEDIDO = " + NumberSQL( mIdPedido ) + " LIMIT 1 ) AS ITEMPED" + ;
            " ON ITEMPED.IPPEDIDO = JPPEDIDO.IDPEDIDO" + ;
         " WHERE IDPEDIDO = " + NumberSQL( mIdPedido ) + ;
         " ORDER BY IDFINAN"
      :Execute()


esta parte:
         " LEFT JOIN ( " + ;
            " SELECT IDITPED, IPPEDIDO, IPCFOP FROM JPITPED " + ;
            " WHERE IPPEDIDO = " + NumberSQL( mIdPedido ) + " LIMIT 1 ) AS ITEMPED" + ;
            " ON ITEMPED.IPPEDIDO = JPPEDIDO.IDPEDIDO" + ;


e com certeza, esta no SELECT:
ITEMPED.IPCFOP
José M. C. Quintas
Harbour 3.2, mingw, gtwvg, multithread, dbfcdx, ADO+MySql, PNotepad
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar de usuário

JoséQuintas
Membro Master

Membro Master
 
Mensagens: 18013
Data de registro: 26 Fev 2007 11:59
Cidade/Estado: São Paulo-SP
Curtiu: 15 vezes
Mens.Curtidas: 1206 vezes

Limitar a um registro de determinada tabela

Mensagempor JoséQuintas » 15 Abr 2020 17:34

Com certeza, depois da migração vou fazer uma boa remodelagem nos arquivos/tabelas.
Só não sei ainda qual... kkkkk

Nesse caso, um indicativo do CFOP principal no pedido seria suficiente pra não pesquisar nos produtos.
Pensar nisso depois....
José M. C. Quintas
Harbour 3.2, mingw, gtwvg, multithread, dbfcdx, ADO+MySql, PNotepad
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"

https://github.com/JoseQuintas/
Avatar de usuário

JoséQuintas
Membro Master

Membro Master
 
Mensagens: 18013
Data de registro: 26 Fev 2007 11:59
Cidade/Estado: São Paulo-SP
Curtiu: 15 vezes
Mens.Curtidas: 1206 vezes




Retornar para SQL

Quem está online

Usuários vendo este fórum: Nenhum usuário registrado online e 8 visitantes


Ola Amigo, espero que meu site e forum tem lhe beneficiado, com exemplos e dicas de programacao.
Entao divulgue o link da Doacao abaixo para seus amigos e redes sociais ou faça uma doacao para o site forum...
MUITO OBRIGADO PELA SUA DOACAO!
Faça uma doação para o forum
cron
v
Olá visitante, seja bem-vindo ao Fórum Clipper On Line!
Efetue o seu login ou faça o seu Registro