Como Agilizar o Tráfego da Rede no Clipper

Como Agilizar o Tráfego da Rede no Clipper

1. Criar arquivos temporários na unidade de disco local (Dica: Coloque o aplicativo na estação cliente (Windows: local do objeto) executando no servidor (Windows: Iniciar em:), lembre da função GETENV() para obter o diretório temporário da estação -mais elegante.)

2. Crie arquivo de índice temporário para filtrar o banco de dados, não use SET FILTER.

cRANDOM  := ALLTRIM(STR(RAN(9999))) // gera número aleatório de 0 a 9999
fINDEX3  := xTEMP+"TEMP" + cRANDOM  // gera nome do arquivo temporário. xTEMP é uma pasta local.
INDEX ON RIGHT(CTR,2)+LEFT(CTR,3)+DESCEND(DTOS(PRAZO)) TAG PRAZO TO (fINDEX3) ;
	 FOR !EMPTY(PRAZO) .AND. PRAZO>=DATE(); /* AQUI VAI O "FILTRO" */
	 ADDITIVE TEMPORARY /* ADDITIVE: Cria índice sem fechar o demais abertos. TEMPORARY: apaga esse índice se fechar o respectivo DBF.

2. Não fique abrindo e fechando os bancos de dados. Simplesmente deixe-os abertos.

3. Programe de forma mais objetiva possível. Não reinvente a roda.

4. Não use LOCATEs, REPLACE ALL ou qualquer comando que pesquise o DBF inteiro.

5. Acrescente memória ao servidor para um grande cache de disco.

6. Encontre um servidor que gerencie o cache de gravação/leitura (e/s) eficientemente (hardware ou software).

7. USE... EXCLUSIVE sempre quando possível.

8. Certifique-se de que nenhum anti-vírus entra no caminho (use servidor Unix/Linux).

9. Use índices mais rápidos como os do formato da extensão .CDX ou .NSX (Comix ou SixDrive). 

10. Verifique se o tipo de cabeamento e as placas de rede podem ser melhorados (trocados por mais rápido). Consulte um especialista em redes.

11. Verifique se a velocidade do disco rígido é boa

Prefira NVMe! NVMe > SSD > HD: O SSD é 10x mais rápido do que um HD. Já o NVMe é 10x mais rápido do que um SSD.

O HD SCSI era o recomendado para servidores de rede antigamente.

HD SATA III só funciona com o cabo Flat adequado/próprio. Não use um HD SATA III com cabo de SATA II. 

Instale 2 (dois) HDs em RAID modo strip para dobrar a velocidade. Precisa ser da mesma marca, modelo e tamanho.

[NetWork]
PrintBufTime=1
[IfsMgr]
PrintBufTime=1

13. Impressora lenta no 2000/XP/VISTA: Execute o REGEDIT e mude a chave a seguir conforme indicado:

HKLM\SYSTEM\CurrentControlSet\LPT_timeout = 1

14. Use um servidor de banco de dados, como o LetoDBf (solução gratuita, funciona com [x]Harbour). Funciona com servidor Windows e Linux.