PC Toledo

Até hoje nunca consegui mapear, no XP, além da LPT3, ou seja, LPT4, LPT5, etc, não funciona o mapeamento no XP. Pequisei na net e a reposta que obtive foi que essa limitação é o NTVDM.

Caro managercorp,
O link onde deveria estar o RTF.EXE está quebrado. Seria possível vc reativá-lo? Não sendo possível daria para me enviar via email (carlosleonam@oi.com.br). Se positivo, apenas lembre de zipar pois o servidor de email bloqueia anexos EXE.

:)Pos

Olá

Vamos ver, o que vc quer é saltar o GET mas que sejam feitos os processamentos desejados, certo?

Então porque não usar a cláusula WHEN para isso. Veja abaixo:


@ 14, 23 GET M->SALDO_REC PICTURE "@Z 999,999,999.99" WHEN DesligaGET("IFU03011 ...

Oi

Vou tentar explicar detalhadamente como eu faço (meu sistema imprime assim):

1) No micro onde está instalada a impressora serial (SERVIDOR), crie uma impressora no Windows e nas propriedades dela, na aba "Detalhes", selecione a COM na qual a impressora se encontra instalada.

2) Compartilhe ...

Olá

Crie uma impressora no micro onde está o sistema e habilite ela na porta COM desejada. Compartilhe e mapeie a LPT3 no outro micro (terminal) para essa nova impressora.

:xau

Oi

Como o Kiko falou, a oipção /XS é a sua solução.
Mas vc pode criar uma variável de ambiente:

SET RMAKE=/XS750
(ou valor maior se persistir o problema, o que não acredito, esse valor serviu para o meu sistema, e olhe que são 228 prgs.)

No seu autoexec.bat (ou .nt) e o rmake deverá funcionar ...

Oi amigo,

Não sei qual a sua estrutura de dados e os seus indices. Mas se no seu TABVEN tiver algum indice que tenha o campo PRODUTO como chave, tente dar um TABVEN->(DBSEEK(PRODUTO)) antes de efetuar o SUM.

Se não tiver o índice crie um com PRODUTO+DTOS(DATA) e faça um DBSEEK também com a DATA só ...

Olá Pessoal,

Onde posso conseguir a "MiniGUI Não Oficial Experimental".
Tentei pesquisar no fórum, mas não achei nenhuma referência.

Obrigado

Tentou dar um REFRESH no objeto BROWSE após a filtragem ?


:xau

Olá Josmar,

Vamos dar um toque mais prático a sua compilação. Crie um arquivo com o nome OFIC.RMK e coloque dentro dele o que segue abaixo:

.PRG.OBJ:
CLIPPER $*

OFIC.OBJ:OFIC.PRG
OFICFU1.OBJ:OFICFU1.PRG
OFICFU2.OBJ:OFICFU2.PRG

OFIC.EXE :
RTLINK FI OFIC,OFICFU1,OFICFU2 LIB RELOGIO


Depois, a ...

Se não me engano DBFCDX/1020 é "DATA TYPE ERROR".
O "WORKAREA NOT INDEXED" não é DBFCDX/1201. Ou eu estou errado?

Verifique se realmente as funções PERGUNTA, COR e MENU estão dentro do seu OFIC.PRG. Se não estão será necessário chamar o RTLINK como abaixo:

RTLINK FI OFIC, SeuOutroPRG LIB RELOGIO

Ah! Lembre que o RMK tem que referenciar o seu outro PRG.

:xau

DBCOMMITAL não é um arquivo mas uma função do clipper (DBCOMMITALL())

A referência que achei sobre esse erro foi:


19 NTX File Corrupted

This occurs when an index buffer is found to be corrupted when
attempting to update an index page and the index is non-UNIQUE.



Já tentou recriar os NTX ...

Tente o seguinte:

Após a linha

"CLOSE ALL"

que fica logo após o

"USE COTA EXCLUSIVE"

acresente um

"RETURN"

e no final das funções ORDENA, ORDENAP e ORDENAD coloque:
"RETURN NIL"

E veja se resolve.

:xau

Você poderia postar os fontes (use o botão "Code" - página "Responder" no início e fim do código, se ele for extenso) para que possamos analisar melhor. O erro apresentado pode estar associado a diversas razões.

:xau