|
Bem Vindo, Visitante
|
Todos os Fórums
ADVPL
|
Imprimir
Enviar Para um Amigo Precisa estar Logado
|
|
|
Assunto: |
Trabalhar com querys em bloco |
|
Versão: |
11.8 |
|
Plataforma: |
Microsoft |
Complemento: |
|
|
DB: |
SQL Server |
Complemento: |
|
|
|
|
|
Mensagem do
GALE
em 09/11/2017, 11:30 h
Local: PR Registro: 15/05/2017 Postagens: 49 |
Pessoal, bom dia
Atualmente a gente pra fazer uma query faz assim:
cQuery := ‘Select * from SA1‘
cQuery += ‘Where condicao a > condicao b‘
Teria uma forma menos penosa de se fazer isso, como por exemplo, o textto do clipper?
por exemplo:
Text to cQuery
Select * from Sa1
Where condicao a > condicao b
e aqui escrevo um livro
endtext
rodoaquery(cQuery)?
Grato pela ajuda!! |
|
|
Mensagem do
ROBERTOMEN
em 09/11/2017, 13:55 h
Local: PR Registro: 04/07/2017 Postagens: 422 |
desconheço !!! |
|
|
Mensagem do
CRISTIAM
em 09/11/2017, 14:26 h
Local: SP Registro: 10/05/2012 Postagens: 157 |
Rapaz!!!
pode crer que a sintaxe SQL é uma benção Divina!
o SQL é uma linguagem de alto nível, muito próximo da escrita humana.
ao contrário do ADVPL que provem da sintaxe Clipper da década de 80.
mas se vc curte uns enroscos (risos) pode usar o Embedded SQL (eu particularmente ODEIO)...
veja o link:
http://tdn.totvs.com/display/tec/Embedded+SQL+-+Facilitador+de+queries
boa sorte
abraços
Cristiam |
|
|
Mensagem do
ROBERTOMEN
em 09/11/2017, 14:41 h
Local: PR Registro: 04/07/2017 Postagens: 422 |
boa CISTIAM,,,não conhecia !!! |
|
|
Mensagem do
ZERO
em 09/11/2017, 14:45 h
Local: RJ Registro: 09/02/2015 Postagens: 235 |
eu tb já andei olhando o Embedded SQL mas nunca usei sei lá, não me pareceu vantagem.. mas sempre bom divulgar opções |
|
|
Mensagem do
EMERSON.EN
em 09/11/2017, 17:21 h
Local: SP Registro: 20/08/2010 Postagens: 669 |
eu acho muito mais simples de usar!
BEGINSQL ALIAS cAliasSZI
SELECT TOP 1 ZI_PEDGAP, ZI_EMPRESA
FROM %table:SZI% SZIA
WHERE ZI_RESERVA = ‘‘
AND ZI_ERRO = ‘‘
AND ZI_NUM = ‘‘
AND ZI_PEDGAP <> ‘‘
AND ZI_EMPRESA <> ‘‘
AND ZI_CONDPAG <> ‘‘
AND ZI_CLIENTE <> ‘‘
AND ZI_DTDIGIT BETWEEN %Exp:DtoS(mv_par01)% AND %Exp:DtoS(mv_par02)%
AND SZIA.%notDel%
AND (
SELECT COUNT(ZI_PEDGAP) FROM %table:SZI% SZIB
WHERE SZIB.ZI_PEDGAP = SZIA.ZI_PEDGAP
AND SZIB.ZI_EMPRESA = SZIA.ZI_EMPRESA
AND SZIB.%notDel%
AND SZIB.ZI_RESERVA != ‘‘
AND SZIB.ZI_FILIAL = SZIA.ZI_FILIAL
) = 0
GROUP BY ZI_PEDGAP, ZI_EMPRESA
ORDER BY ZI_PEDGAP, ZI_EMPRESA
ENDSQL
(cAliasSZI)->(dbGoTop())
|
|
|
Mensagem do
GALE
em 09/11/2017, 17:37 h
Local: PR Registro: 15/05/2017 Postagens: 49 |
Valeu! Estou no ADVPL relativamente recentemente, mas já programo a quase 20 anos, inclusive clipper, foxpro 2.6, visual foxpro, a adaptação está a jato rsrs
Algumas coisas como essa sinto falta e vou perguntando aqui.
Tu é o cara Cristiam. Vou analisar este código e tentar usá-lo na prática, não é a mesma coisa que o copyto mais já ajuda bem, ainda mais pra querys maiores. |
|
Para postar no Fórum você precisa efetuar o seu login ou se registrar
|
|