PC Toledo

e depois nao se esqueca de setar as variaveis de ambiente no arquivo autoexec.bat

INCLUDE=C:\CLIPPER\INCLUDE
LIB=C:\CLIPPER\LIB
OBJ=C:\CLIPPER\OBJ

Opa !!! mas desta forma nao tem como saber se o arquivo ja esta aberto em modo compartilhado !!!

Nao vejo problema nenhum em fazer isso, vc apenas teria q :

abrir o cupom fiscal
ler os itens do orcamento e efeturar a venda de cada item
o usuario informar a forma de pagamento
e depois fechar o cupom fiscal

Muito estranho isso mario, fiz um teste aqui e o meu mostrou normalmente, talvez se vc tive-se deletado o arquivo .obj resolveria o problema !!!

Nao existe nenhuma diferenca entre ntx ou cdx, a sua rotina eh q nao esta correta, poste ela ae pra nois dar uma olhada !!!

O BLINKER ajuda, mas consegue recuperar sistema mesmo até com a última versão a 7.0.

Para proteger um programa use

1 - PROTEGGI nos OBJS
2 - Use blinker 7.0 com BLINKER EXECUTABLE COMPRESS 1 e BLINKER EXECUTABLE EXTENDED
3 - Compile com o parametro /L

Mesmo assim o programa ainda podera ser ...

Compilando com Blinker 5.1

Marcelo tente esse codigo aqui, substitua os seus read´s pela funcao Le()

#define GE_NOEXIT 0 // no exit attempted (blank)
#command READ TIMEOUT AT <n> ;
=> ;
Aeval(GetList, ;
{|o| o:reader := ;
{|oGet| TimedReader(oGet, <n>) } }) ;;
READ


Function Le()
LOCAL vcursor
vcursor:=SETCURSOR(1 ...

Alguem tem uma rotina q calcula o digito de conta-corrente e agencia bancaria ?

Ja tentou recriar o arquivo com os indices ? Talves o arquivo esta com algum defeito !!!