×
Linguagem de Programação ADVPL
Perguntas Query SQL no ADVPL
- jean.luckesi
- Autor do Tópico
- Desconectado
- Membro Sénior
Menos
Mais
- Postagens: 45
- Obrigados Recebidos: 0
11 anos 6 meses atrás #14197
por jean.luckesi
Query SQL no ADVPL foi criado por jean.luckesi
Bom dia Pessoal,
Estou começando agora com Query SQL no Advpl.
Fiz Query abaixo, que o resultado é o que eu preciso para dar o MSGInfo para o usuario.
Quero encontrar o ultimo registro referente ao Plano de conta e mostrar pro usuario.
A query abaixo faz isso, mas nao sei como colocar ele no ADPL pra exibir.
cQuery := "SELECT MAX(CONVERT(INT,CT1_CONTA)) "
cQuery += " FROM " + RETSQLNAME("CT1")
cQuery += " WHERE D_E_L_E_T_ <> '*' "
cQuery += " AND LEFT(LTRIM(CT1_CONTA),3) = '112'"
TCSQLExec(cQuery)
Fico no aguardo
Obrigado a todos
Estou começando agora com Query SQL no Advpl.
Fiz Query abaixo, que o resultado é o que eu preciso para dar o MSGInfo para o usuario.
Quero encontrar o ultimo registro referente ao Plano de conta e mostrar pro usuario.
A query abaixo faz isso, mas nao sei como colocar ele no ADPL pra exibir.
cQuery := "SELECT MAX(CONVERT(INT,CT1_CONTA)) "
cQuery += " FROM " + RETSQLNAME("CT1")
cQuery += " WHERE D_E_L_E_T_ <> '*' "
cQuery += " AND LEFT(LTRIM(CT1_CONTA),3) = '112'"
TCSQLExec(cQuery)
Fico no aguardo
Obrigado a todos
Por favor Acessar ou Registrar para participar da conversa.
- nagasako
- Desconectado
- Membro Iniciado
Menos
Mais
- Postagens: 11
- Obrigados Recebidos: 0
11 anos 6 meses atrás - 11 anos 6 meses atrás #14198
por nagasako
Respondido por nagasako no tópico Query SQL no ADVPL
Em vez de TCSQLExec(cQuery)
faça:
cQuery := "SELECT MAX(CONVERT(INT,CT1_CONTA)) AS RESULT "
cQuery += " FROM " + RETSQLNAME("CT1")
cQuery += " WHERE D_E_L_E_T_ <> '*' "
cQuery += " AND LEFT(LTRIM(CT1_CONTA),3) = '112'"
TCQUERY CQUERY NEW ALIAS "TRB"
DBSELECTAREA("TRB")
DbGoTop()
Alert(TRB->RESULT)
faça:
cQuery := "SELECT MAX(CONVERT(INT,CT1_CONTA)) AS RESULT "
cQuery += " FROM " + RETSQLNAME("CT1")
cQuery += " WHERE D_E_L_E_T_ <> '*' "
cQuery += " AND LEFT(LTRIM(CT1_CONTA),3) = '112'"
TCQUERY CQUERY NEW ALIAS "TRB"
DBSELECTAREA("TRB")
DbGoTop()
Alert(TRB->RESULT)
Ultima edição: 11 anos 6 meses atrás por nagasako.
Por favor Acessar ou Registrar para participar da conversa.
- jean.luckesi
- Autor do Tópico
- Desconectado
- Membro Sénior
Menos
Mais
- Postagens: 45
- Obrigados Recebidos: 0
11 anos 6 meses atrás #14208
por jean.luckesi
Respondido por jean.luckesi no tópico Query SQL no ADVPL
Luis,
Deu certinho.
Essa tabela que cria, ela é temporaria ??
e depois fecho que DBCLOSEAREA()
Correto?
Vlw
Deu certinho.
Essa tabela que cria, ela é temporaria ??
e depois fecho que DBCLOSEAREA()
Correto?
Vlw
Por favor Acessar ou Registrar para participar da conversa.
- nagasako
- Desconectado
- Membro Iniciado
Menos
Mais
- Postagens: 11
- Obrigados Recebidos: 0
- jean.luckesi
- Autor do Tópico
- Desconectado
- Membro Sénior
Menos
Mais
- Postagens: 45
- Obrigados Recebidos: 0
11 anos 6 meses atrás #14233
por jean.luckesi
Respondido por jean.luckesi no tópico [RESOLVIDO] Query SQL no ADVPL
Duvida resolvida
Por favor Acessar ou Registrar para participar da conversa.
Tempo para a criação da página:0.110 segundos