Dicas

Last UpDate:

Imprime

Patrocinadores:

Como proteger seu sistema contra descompilação
Como agilizar o tráfego da rede no Clipper
Como executar aplicativos do Windows pelo Clipper
Modo Protegido e muito mais!
Quebra de Índices
Indexação de Arrays
HOWTO FLAGSHIP em Português (link) -Clipper p/ Linux
Oracle e outros Database Servers
Harbour Project -Estamos Salvos!!!
Clipper no Windows 95/98/ME/2000/NT
Como configurar o VNC 4 - Acesso remoto a computadores
CLIP - Open-source russo
Configurar o Teclado Brasileiro ABNT2 (c/ cedilha)
Usar nomes de arquivos extensos do Windows (em inglês)

Blinker
Salve tempo, memória e espaço em disco.

Crie executáveis que rodem em modo protegido, acesso direto a 16Mb de memória física e 64Mb de memória virtual; Livre de Royalties; Comprime os arquivos em até 70% (o arquivo continua sendo executável, não precisa descompactá-lo para rodá-lo!!!); Inclui número de série e versões de demonstração completamente funcionais, se você quiser; Use o comando "SPAWN" para chamar programas externos extensos como um sistema de relatório grafico em CLBC ou um processador de textos como o EDIT do DOS (Seu sistema fica em stand-by ocupando menos de 10Kb); Linkedição em menos de 1 segundo (encontrei problemas com esta opção na versão 4.x) ------------------------ Na minha opinião, este é o mais completo e profissional linkeditor do mercado. Se eu fosse você, esqueceria qualquer outro linkeditor. Anderson Cardoso Silva

Quebra de Índices
Algumas dicas

Este problema é muito comum. No Clipper, as modificações do banco de dados são feitos no cliente e depois enviados ao servidor... se há um pique de luz, um travamento, ou outro bug qualquer no cliente, o índice se quebra. Primeiro lugar você deve ter certeza de que em todo programa que você grava ou altera dados você abre todos os arquivos de índice que o DBF possui, mesmo os índices que você não utilizará no programa! Uma forma de evitar um pouco esses problemas é usar sempre o DBCOMMIT() para que as modificações não fique na memória dando bobeira e sim seja gravado logo no servidor... Isso ajudará muito. (NOVO) Nunca crie uma chave do tipo alltrim(nome)+codigo, pois na estrutura no arquivo de indice há um registro que define o tamanho da sua chave, se você criar uma chave com tamanho variável o resultado será sempre um arquivo corrompido! Você deve verificar as instalações dos computadores, veja se todos têm estabilizadores, aterramento adequado, etc. O servidor necessita ter um no-break! E caso o benefício do no-break possa se estender aos outros computadores provavelmente você não terá mais problemas com isso... (todos precisariam terminar rapidamente o trabalho antes que a energia acabasse, é claro). A única forma de prevenir 100% contra quebra de índices é a instalação de um bom gerenciador de banco de dados, como o ADS (Advantage Data Server), o único embargo é o preço... +- R$ 10.000,00. Nem preciso dizer que só é viável p/ grandes empresas, não é?! No entanto, o resultado é espetacular! Aumento da velocidade da rede, da capacidade de armazenamento dos DBFs, segurança total dos arquivos de índice, etc. Se após estas observações o problema ainda persiste, vá à seção de Know-How e procure o tema "Consistência dos Arquivos de Índice", que fala sobre como manter a integridade do banco de dados na programação de seu sistema.

Indexação de Arrays
Saiba como ordenar qualquer vetor ou matriz!

Acredito que a forma mais comezinha para este tema seja através do primeiro preceito da lógica: a observação. Então observe: Indexação de um array multidimensional (matriz) ----------------------------------------------- Digamos que tivéssemos a seguinte matriz de 3 dimensões (matriz de 3 colunas): aTST :=; { { "ANDERSON", "PROGRAMADOR", 23 },; { "LILIAN", "UNIVERSITÁRIA", 22 },; { "ALADIAH", "MILITAR", 59 } } Se você quisesse indexar esta matriz por idade em ordem crescente: aTST := aSORT( aTST,,,{|X,Y| X[3] < Y[3] } ) Por idade em ordem decrescente: aTST := aSORT( aTST,,,{|X,Y| X[3] > Y[3] } ) Por profissão em ordem crescente: aTST := aSORT( aTST,,,{|X,Y| X[2] < Y[2] } ) Por profissão em ordem decrescente: aTST := aSORT( aTST,,,{|X,Y| X[2] > Y[2] } ) Por nome em ordem crescente: aTST := aSORT( aTST,,,{|X,Y| X[1] < Y[1] } ) Por nome em ordem decrescente: aTST := aSORT( aTST,,,{|X,Y| X[1] > Y[1] } ) Ok?! Vamos adiante! Indexação de um array unidimensional (vetor) -------------------------------------------- Digamos que tivéssemos o seguinte vetor (matriz de 1 só coluna): aTST2 :=; { "01002 11/10/99 REFIL P/ IMPRESS HP 35.00",; "01000 10/11/99 CX. DISQ. NASHUA 8.00",; "00101 01/07/99 PENTE 32MB SDRAM 188.00",; } Se você quisesse indexar por ordem de pedido crescente você já sabe! Normal: aTST2 := aSORT( aTST2 ) Mas e por ordem decrescente do pedido? aTST2 := aSORT( aTST2,,,{|X,Y| X > Y } ) E se você quisesse por data??? Em ordem crescente??? aTST2 := aSORT( aTST2,,,{|X,Y| CTOD(SUBSTR(X,7,8)) < CTOD(SUBSTR(Y,7,8)) } ) E por ordem decrescente??? aTST2 := aSORT( aTST2,,,{|X,Y| CTOD(SUBSTR(X,7,8)) > CTOD(SUBSTR(Y,7,8)) } ) Por nome do produto em ordem crescente? aTST2 := aSORT( aTST2,,,{|X,Y| SUBSTR(X,17,20) < SUBSTR(Y,17,20) } ) Por nome do produto em ordem decrescente? aTST2 := aSORT( aTST2,,,{|X,Y| SUBSTR(X,17,20) > SUBSTR(Y,17,20) } ) Por preço em ordem crescente? aTST2 := aSORT( aTST2,,,{|X,Y| VAL(SUBSTR(X,36,7)) < VAL(SUBSTR(Y,36,7)) } ) Por preço em ordem decrescente? aTST2 := aSORT( aTST2,,,{|X,Y| VAL(SUBSTR(X,36,7)) > VAL(SUBSTR(Y,36,7)) } ) Estes exemplos foram dados por mera ilustração. Desculpe se eu fui redundante demais para você, mas tem que ser assim mesmo... Por analogia você poderá indexar qualquer 'array' de qualquer forma que quiser!!! Graças ao CA-CLIPPER Website!

O R A C L E e outros Database Servers

_Já existe driver (RDD) para aplicativos em Clipper rodar, sem traumas, um banco de dados em Oracle e outros Database Servers.

_Maiores informações clique no botão abaixo.

H A R B O U R

_P r o j e c t

Patrocinadores:

A CA (Computer Associates), última fabricante do Clipper, nos abandonou,... mas agora... Estamos salvos!!!

Harbour Project é o Clipper em Open Source (código aberto), é isso mesmo, um Linux da vida, cada um contribuindo para melhorar o Clipper!!! Qualquer um pode contribuir.

A FiveTech Software, ao contrário do que se podia esperar, está cobrando pelo FiveWin for Harbour (FWH)... pensei que a idéia de Open Source iria prevalecer em tudo... Sem embargo, compila aplicativos reais de 32bits para Windows com total compatibilidade com o Clipper (Harbour)... vale estudar a viabilidade do produto!

Obrigado pela dica postada no fórum, David Oliveira.

O CA-CLIPPER WEBSITE DESCOBRIU TUDO PARA VOCÊ

COMEÇAR A TRABALHAR COM O PROJETO HARBOUR

EM UMA PÁGINA ESPECIAL SOBRE O ASSUNTO:

CLIQUE AQUI !!!

Projeto Harbour

Download / Instalação / Funcionamento / Links

http://harbour.caclipperwebsite.com

Como executar aplicativos Windows pelo Clipper

Exemplos:

Abrir um arquivo de texto no NotePad do Windows...

cAPLICATIVO := "NotePad.exe"
cARQUIVO := "meu_arquivo.txt"
RUN ( "Start "+cAPLICATIVO +" "+ cARQUIVO )

Abrir um arquivo de texto no NotePad do Windows, imprimí-lo e sair...

cAPLICATIVO := "NotePad.exe"
cARQUIVO := "meu_arquivo.txt"
RUN ( "Start "+cAPLICATIVO +" " + cARQUIVO + " /p")

Você pode imaginar o que isto significa quanto às impressoras USB ou "Windows Only" ???
A impressão de arquivos com fonte, tamanho e estilo personalizados podem ser criados através da confecção de um arquivo no formato da extensão .RTF (Rich Text Format) e impressos no WordPad do Windows, ao invés do NotePad.

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

9. Use índices mais rápidos como os do formato da extensão .CDX ou .NSX (Comix ou SixDrive). Se estiver com coragem, quem sabe um Oracle... ou ADS (O ADS aumenta drasticamente a velocidade e a confiabilidade da rede, recomendado para grandes empresas, custo alto).

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 (ATA 66 ou ATA 100 só funciona com o cabo Flat adequado/próprio), um HD SCSI é o recomendado para servidores de rede.

12. Impressora lenta no Windows 98: incluir essas linhas no arquivo SYSTEM.INI logo após o final da lista [386enh]

[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

Como proteger seu sistema contra descompilação

Na sua procedure ERRORSYS.PRG, escreva o seguinte:

Procedure ERRORSYS
Private ErrorSys
ErrorSys := 9876543210

Existe um conchavo entre os autores de descompiladores para detectar a presença daquela "string" e recusar a descompilação, caso a encontre.

Clipper no Windows 95/98/ME/2000/NT

A configuração abaixo é para o programador (Para o usuário, você pode remover as variáveis de ambiente LIB, OBJ, BIN e INCLUDE).

Considere que o Clipper foi instalado na unidade C:, no diretório Clipper5 e dentro dele tenha os subdiretórios LIB, OBJ, BIN e INCLUDE.

Windows 95/98

Inclua estas linhas no AUTOEXEC.BAT:

SET CLIPPER=//F:225
SET LIB=C:\CLIPPER5\LIB
SET OBJ=C:\CLIPPER5\OBJ
SET BIN=C:\CLIPPER5\BIN
SET INCLUDE=C:\CLIPPER5\INCLUDE
SET PATH=%PATH%;C:\CLIPPER5\BIN
Atenção: Não substitua a linha SET PATH existente do seu AUTOEXEC.BAT, inclua esta outra nova linha com este SET PATH abaixo da existente!

Inclua estas linhas no CONFIG.SYS:

FILES=225
BUFFERS=80
STACKS=9,256

Reinicie a máquina para que as configurações tenham efeito

Windows ME

Clique no menu iniciar, executar e digite: msconfig;
Clique na aba, SYSTEM.INI, procure pelo bloco que inicia com a seguinte chave [386Enh];
Selecione a linha que contém a chave PerVMFiles, clique no botão "Editar" e defina o valor: PerVMFiles=225
Reinicie a máquina para que as configurações tenham efeito.
Para especificar ou editar valores no AUTOEXEC.BAT, o usuário deve editar a seguinte chave de registro do Windows:
HKEY_LOCAL_MACHINE\SYSTEM\currentcontrolset\control\session manager\environment

A chave de registro do Windows é editada por meio do aplicativo chamado REGEDIT, vá em Menu Iniciar, Executar e digite REGEDIT e tecle <Enter>.

Windows 2000/XP/NT

Essas versões do windows não tem os arquivos de configuração AUTOEXEC.BAT e CONFIG.SYS, necessários para determinar a quantidade de arquivos a serem abertos por um aplicativo MS-DOS.

Abra o arquivo AUTOEXEC.NT que está no diretório WINDOWS \ SYSTEM32 e inclua estas linhas :

SET CLIPPER=//F:225
SET LIB=C:\CLIPPER5\LIB
SET OBJ=C:\CLIPPER5\OBJ
SET BIN=C:\CLIPPER5\BIN
SET INCLUDE=C:\CLIPPER5\INCLUDE
SET PATH=%PATH%;C:\CLIPPER5\BIN

Outra forma de incluir variáveis de ambiente no Windows 2000/XP/NT (principalmente se o Windows não puxou estas variáveis de ambiente do AUTOEXEC.BAT), é seguir os seguintes passos:

INICIAR PAINEL DE CONTROLE SISTEMA AVANÇADO

VARIÁVEIS DE AMBIENTE

Clique no menu "Iniciar", depois em "Painel de Controle". Escolha então "Sistema". Na janela que abrir, clique na aba "Avançado" e depois no botão "Variáveis de Ambiente". Na próxima tela, clique em "adicionar"

Naquele mesmo diretório, abra o CONFIG.NT e inclua o seguinte comando :

FILES=225
BUFFERS=80
STACKS=9,256

Reinicie a máquina para que as configurações tenham efeito.

TELA COM 25 LINHAS NO WINDOWS XP

"Janela x tela inteira: rode o seu programa, que vai aparecer em uma janela, certo? Clique nele com o botão direito do mouse (na barra de tarefas) e vá em "padrões". Altere para 80 x 25 tanto o tamanho do buffer da tela quanto o tamanho da janela. Pronto. da próxima vez, o seu prg vai abrir em tela inteira! Independente disso, você pode alternar entre janela e tela inteira teclando ALT ENTER...". Por Eolo Ventura.

Atenção: Dependendo da versão do Clipper que você esteja utilizando, os parâmetros da variável CLIPPER deverão ser precedidos de ponto e vírgula (;) ou barras duplas (//).

Exemplo para o Clipper v.5.2e:

SET CLIPPER=//F:225 //DYNF:8 //SWAPK:65535 //SWAPPATH:"C:\TEMP" //TEMPPATH:"C:\TEMP"

Exemplo para o Clipper v.5.0a:

SET CLIPPER=F225;DYNF:8;SWAPK:65535;SWAPPATH:"C:\TEMP"

Para maiores informações, consulte o Norton Guide (NG) em:

OPTIONS DATABASE CA-Clipper 5.2 » Utilities
VIEW ENVIRONMENT

SET CLIPPER
Ou

OPTIONS DATABASE Clipper 5.00a » Utilitários

CLIPPER AMBIENTE

SET CLIPPER

Configurando o VNC4 - Acesso Remoto

Você já ouviu falar em PC Anywhere? Acesso remoto? Estar em dois lugares ao mesmo tempo?

O VNC4 é um programa Freeware (ou melhor, tem uma versão Freeware), por isso estamos tratando dele aqui. Veja o site: http://www.realvnc.com/

A instalação do VNC4 tem menos de 700Kb!!!

Se você é o responsável técnico de uma empresa com vários computadores e todos ficam te chamando o tempo todo, o VNC4 vai ajudar você a não ter que ir para lá e para cá, subindo e descendo escadas...

Se você tem clientes em outra cidade, não precisa mais viajar para fazer seu diagnóstico.

O VNC4 (Assim como qualquer programa de Acesso Remoto, tipo PC Anywhere, LogMeIn, "Acesso Remoto" do Windows XP etc) emula o teclado e o monitor de um outro computador, é como se você estivesse operando no outro computador.

Vamos lá!

Quando você instala o VNC4, ele cria um grupo de programas no "Menu Iniciar" de seu computador chamado "RealVNC" e dentro dele, há 3 outros grupos VNC Server 4 (Service-Mode), VNC Server 4 (User-Mode) e VNC Viewer 4.

Configurar o Anfitrião(Host) ou Servidor:

1. Dê dois cliques no ícone do VNC na bandeja do Windows (Tray -aqueles íconezinhos que ficam no canto direito da Barra de Tarefas, no canto inferior direito da tela), selecione a aba "Authentication", clique no botão SET PASSWORD. Ponha uma senha! Deixe marcado o "Prompt local user to accept incoming connections".

2. Execute o "Run VNC Server", vá em:

Menu Iniciar > RealVNC > VNC Server 4 (User-Mode) > Run VNC Server

3. Passe o mouse em cima do ícone do VNC na Barra de Tarefas e anote o endereço IP da sua máquina. Você também pode executar o comando "ipconfig" na janela do MS-DOS que vai te dar o nº do IP do seu computador.

Resumo: Rodar o servidor em User-Mode, definir senha e anotar o IP.

Configurar o Convidado (Guest):

1. Execute o "Run VNC Viewer"

Menu Iniciar > RealVNC > VNC Viewer 4 > Run VNC Viewer

2. Abrirá uma janela. Coloque o IP do computador remoto (Anfitrião).

3. Abrirá uma janela pedindo a senha. Coloque a senha do computador remoto (Anfitrião). Definida no item 1 da configuração do Anfitrião.

Anfitrião, Host, Servidor, em nosso caso, é tudo a mesma coisa.

Convidado e Guest é a mesma coisa. É o computador que vai acessar o computador da outra pessoa, enquanto que, anfitrião é o computador que vai receber a "visita" (acesso remoto) do convidado.

É lógico que o Anfitrião precisa passar as informações sobre a senha e o IP dele para o Convidado! Sem estas informações não é possível o acesso remoto. Também não é possível acessar o computador remoto sem que o Anfitrião permita que o Convidado entre! O Anfitrião recebe uma mensagem quando alguém tenta o acessar e ele permite ou não.

Boa sorte!!!

CLIP - Compilador Clipper open-source russo

" Neste documento iremos conhecer o CLIP, um compilador clipper para Linux. Além da total compatibilidade com o compilador CA-Clipper, este compilador oferece acesso a banco de dados cliente-servidor (Interbase, Oracle, MySQL e outros) e proporciona a elaboração de programa com interface gráfica usando a biblioteca GTK. "

http://www.vivaolinux.com.br/artigos/verArtigo.php?codigo=2584

Obrigado Alessandro, pela dica.

TECLADO BRASILEIRO ABNT2 (c/ cedilha)

Para configurar o seu teclado brasileiro padrão ABNT2 com cedilha e outros acentos, você precisa configurar alguns comandos externos do MS-DOS que são carregados no CONFIG.SYS e no AUTOEXEC.BAT. Veja a seguir:

1. No CONFIG.SYS:

DEVICEHIGH=C:\WINDOWS\COMMAND\DISPLAY.SYS CON=(EGA,,1)

2. No AUTOEXEC.BAT:

MODE CON CODEPAGE PREPARE=((850) C:\WINDOWS\COMMAND\EGA.CPI)

MODE CON CODEPAGE SELECT=850

LH KEYB BR,,C:\WINDOWS\COMMAND\KEYBRD2.SYS /ID:275

_Você tem alguma boa dica? Então diga qual! E seja reconhecido em nesta página de Dicas (dê alguns dados pessoais). Além de ganhar um link para sua página (se você tiver), você contribui para o avanço tecnológico nacional e aparece na Web!

1999 - CA-Clipper Website - Anderson Cardoso Silva

Numerabilis Folder | Numerabilis Website