PC Toledo

Olá!

CPF não tem consulta pública que retorne os dados do cidadão. No máximo tem a consulta pública que retorna a situação cadastral. São dados protegidos pela LGPD. Tem a consulta paga, por exemplo, da Serasa.

Para consulta de CNPJ, veja este tópico

Olá!

Acho que a IA está testando o fórum...

Olá!

Conversa fiada...

Acho que é mais fácil eu ficar milionário que a Oracle estar em apuros...

A Oracle está em dificuldade financeira?


Não, a Oracle não está em dificuldade financeira no sentido de insolvência ou risco de falência. Pelo contrário, a empresa vive um período de forte expansão ...

Olá!

Somente.e para atualizar o link mencionado, que direcionava para o fórum antigo.

alxsts escreveu: 07 Abr 2021 16:27 Veja a função InitCap () neste tópico

Olá!

Pequenas correções no código que postei acima:


#include "box.ch"

PROCEDURE Main()

LOCAL acMenuItems[4], nPos

acMenuItems[1] := " Cadastro 1 "
acMenuItems[2] := " Cadastro 2 "
acMenuItems[3] := " Cadastro 3 "
acMenuItems[4] := " Cadastro 4 "

CLS
DispBox( 9, 9, 13, 20, B_SINGLE ...

Olá!

Itamar M. Lins Jr. escreveu: 13 Mai 2026 20:24 No mundo gráfico, muito conhecido como combobox

Não... este seria o ListBox. O Combo (Combined Box) é aquele que vem fechado e tem a seta à direita para expandir a lista.

No Harbour TUI (console) tem o e o

Olá!

Além do Browse, AChoice() também faz. É só definir uma janela com quantidade de linhas inferior à quantidade de itens da lista...

#include "box.ch"

PROCEDURE Main()

LOCAL acMenuItems[4], nPos

acMenuItems[1] := " Cadastro 1 "
acMenuItems[2] := " Cadastro 2 "
acMenuItems[3 ...

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 ...

Olá!
Obrigado Alexandre, vou fazer o teste aqui.

Gostaria de saber se funcionou e se melhorou a performance.


ela já esta com o ìndice docum+codfor+tpnota+serie+ordem

Não sei como está criando o índice, mas não pode ser como em Clipper, concatenado campos.

Sintaxe do Firebird:
CREATE INDEX ...

Olá!

Perguntei para a IA do Google:

Como melhorar a performance deste SELECT em Firebird 2.5? A performance está lenta...

Resposta:

O principal motivo da lentidão é o uso de concatenação de campos (||) e funções (como trim) nas cláusulas WHERE e JOIN. Isso impede o Firebird de usar índices ...

Olá!

JoséQuintas escreveu: 05 Mai 2026 18:37 Não conheço o x || y || z

Em alguns SGBD, como Oracle e PostgreSQL, este é o operador de concatenação de strings. O mesmo que
x + y + z

Olá!

Obrigado pela contribuição!

Ela vem se juntar a algumas outras, postadas anteriormente. Use o mecanismo de busca do fórum para conferir.

Olá!

Ao que parece, o Claude Code realmente impressionou o Antonio Linares ...

A bola da vez é este novo projeto, OpenADS, que visa gerar uma versão aberta e gratuita do SAP Advantage Database Server, conhecido como ADS.

Depois de construir o Harbour Builder para Windows, Mac e Linux em apenas ...

Olá!


Facilitaria bastante a análise e ajuda se você postasse o código SQL já concatenado, entre as tags code e /code..

select b.valor , b.dc , b.nrecibo , d.valor ,
(select sum(b.valor) from "+pagarb +" b where b.docum||b.codfor||b.tpnota||b.serie||b.ordem = '"+xchave+"' and b.dc = 'C' and ...

Olá!

Que bom que escapou desta. Agora é se cuidar mais.

Gosto dos vídeos do canal do Dr. Roberto Yano. Tem muitas dicas para a boa saúde geral, especialmente do coração.

Me fez lembrar do tópico E se você morrer?...