PC Toledo

... SQLITE3", hb_DirBase() + "test.sqlite3" } )
IF tmp == 0
? "Unable connect to the server"
ENDIF
? "-2-"
? "Use:", dbUseArea( .T., , "select * from t1", "t1" )
? "-3-"
? "Alias:", Alias()
? "-4-"
? "DB struct:", hb_ValToExp( dbStruct() )
? "-5-"
FOR tmp := 1 TO FCount ...

... INSERT INTO t1( name, age ) VALUES( 'Mary', 19 ) - Done
The number of database rows that were changed: 1
Total changes: 6
Last _ROWID_: 6


SELECT * FROM t1 WHERE name == 'Andy'
Record # 1
Column name :
Column type : SQLITE_NULL
Column value: NULL
Column name : id
Column type : SQLITE ...

... C", 40, 0 }, ;
{ "PRECO" , "N", 10, 2 } ;
} )
endif

// Abre o arquivo de forma compartilhada
USE PRODUTOS SHARED NEW
::AreaTrabalho := Select() // Guarda o ponteiro desta tabela
return Self

// Busca um produto pelo código e carrega para as variáveis do objeto
METHOD Localizar( nCodigo ...

rs := cnSQL:Execute( " SELECT ..." )
DO WHILE ! rs:eof()
rs:movenext()
ENDDO
rs:Close()


No caso do ADO, esse temporário é no formato ADO
No caso do SQLMIX, esse temporário é acessado como DBF
No caso do hbMySQL esse temporário é acessado como array
No caso de uma API poderia ser JSON, XML, ou ...

... se desejar criar uma tabela local (DBF/INI) etc...Depende da necessidade disso, as opções são variadíssimas.


Por isso eu recomendo o uso de ADO.
Ainda não entendeu nem que o SELECT geralmente trás um temporário.
Se é um temporário, nem precisa pensar em criar nada local, porque já veio na consulta.

... são no máximo 10 ou 15, no máximo 50 registros.
Um exemplo da IA.


// Query segura que busca o usuário ativo e confere a senha
cSql := "SELECT id, apelido, nome, nivel, liberapdv, senha " + ;
"FROM usuarios " + ;
"WHERE LOWER(apelido) = " + SqlVal( Lower(AllTrim(cApelidoInput ...

... nItensPagina )
ELSE
? "Não há mais registros."
ENDIF

// Fecha a conexão
RddInfo( RDDI_DISCONNECT, hConn )
RETURN

// Função que executa o SELECT paginado
FUNCTION BuscarPagina( nIdAnterior, nLimite )
LOCAL cQuery, nUltimoIdEncontrado := 0
LOCAL nContador := 0

// Monta a query utilizando ...

... tabela estoques !')
RDDINFO(RDDI_DISCONNECT, nCon)
RDDSETDEFAULT( cRdd )
RETURN .T.
ENDIF

ImportaDbfParaPostgres()
dbUseArea( .T., "SQLMIX" , "select * from estoques",'xx' )
Browse()
ShowEstruturaTabela( 'estoques' )

Return .t ...

Boa tarde.

Agradeço à todos que responderam, estou resolvendo algumas coisas aqui, mas até final da semana vou responder à todos e testar esses exemplos.

Obrigado à todos por enquanto.


Poka

... Código executado entre os blocos BEGIN...END; padrão ou stored procedures não executarão AUTOCOMMIT em comandos DML (Data Management Language (SELECT, INSERT, UPDATE, DELETE)), sendo necessário emitir o COMMIT no próprio bloco/stored procedure ou permitir que a aplicação cliente o execute ...

Olá!
Uso Firebird 2.5
As Common Table Expressions (CTE), também conhecidas como WITH, somente estão disponíveis a partir da versão 3 do Firebird.

Este é mais um daqueles tópicos em que não ficaremos sabendo se a ajuda fornecida serviu para alguma coisa pois o autor já criou uma solução ...

Amiguinhos,

POKA sua query tem muitas sub-querys aninhadas então pode demorar mesmo. Tente:

str := ;
"WITH Dados AS (" + ;
" SELECT b.valor, b.dc, b.nrecibo, d.valor " + ;
" FROM " + pagarb + " b " + ;
" INNER JOIN " + pagard + " d " + ;
" ON b.docum = d.docum AND b.codfor = d.codfor " + ;
" AND b ...

Eu aconselharia separar o resumo das somas do SELECT principal. Do jeito atual, ele agrupa por b.valor, b.dc, b.nrecibo, d.valor, então pode gerar várias linhas e ainda obriga o Firebird a agrupar mais dados do que precisa.

Também tem dois possíveis erros:

FROM PAGARB bINNER JOIN PAGARD d

deveria ...

Olá!

Chamou minha atenção esta frase na resposta da IA:

## Por que isso fica mais rápido?

1. SARGability: Ao usar coluna = :valor, o Firebird usa o índice da chave primária ou estrangeira.


Recorrendo novamente a ela:
SARGability (uma contração de Search ARGument ABLE) refere-se à capacidade ...

Boa noite.

Alexandre, o índice está correto, sem concatenar, estão separados por virgula.

A rotina com o case traz instantâneo, porém não traz somado por grupo (sum).
Se tiver 10 lançamentos na baixa, traz 10 lançamentos, não agrupados.
Fiz diversas alterações, mas não resolveu.

Vou mexer ...