Nodosimp - Visualizar o relatório

Fórum sobre a linguagem CA-Clipper.

Moderador: Moderadores

Pedro Junior
Usuário Nível 1
Usuário Nível 1
Mensagens: 34
Registrado em: 20 Ago 2003 00:54
Localização: Recife/PE

Nodosimp - Visualizar o relatório

Mensagem por Pedro Junior »

Olá pessoal, o Wagner Nunes me mostrou como imprimir usando o Nodosimp. Agora estou com outro problema. É o seguinte :

Tenho relatórios que enviando direto para a impressora, são impressos normalmente, usando toda a folha.

quando uso o nodosimp e seleciono a opção de visualização ele me mostra a metade da folha impressa e depois passa pra outra folha e por aí vai. Mas todos os dados são impressos, porém de maneira diferente. É como se ele estivesse usando apenas 40 linhas e quebra a página.

Detalhe isso só acontece quando estou imprimindo um relatório de 130 colunas. quando mando visualizar um relatório que tem 80 colunas a impressão sai normalmente e ainda por cima utilizando toda a folha.


Alguém já passou por isto aquí ou sabe a solução ?
Um abraço
Pedro Junior
Avatar do usuário
vagucs
Membro Master
Membro Master
Mensagens: 1480
Registrado em: 10 Jul 2004 10:45
Localização: Ipanema - MG
Contato:

Mensagem por vagucs »

parece ser erro de programação.
Sem mais
Wagner Nunes
www.vagucs.com.br
Avatar do usuário
gvc
Colaborador
Colaborador
Mensagens: 1270
Registrado em: 23 Ago 2005 10:57

Mensagem por gvc »

Por favor, poste a linha de chamada ao nodosimp.
Vc esta passando os parâmentros corretos?
O tamanho de colunas por linha permitidos são 80, 96, 120, 140, 160.
"TRS-80/Sincler/Apple/PC - Clipper Winter 85, tlink 1.0 [pc 10 MHz - 640K] {NEZ 8000 2Kb RAM}"
{POG - Programação Orientada a Gambiarra}
Pedro Junior
Usuário Nível 1
Usuário Nível 1
Mensagens: 34
Registrado em: 20 Ago 2003 00:54
Localização: Recife/PE

Mensagem por Pedro Junior »

O negócio é o seguinte quando o relatório tem realmente 80 colunas, sem compressão, ele sai perfeito. Quando o relatório é em 130 colunas, uso a compressão para 80 colunas e chamo a função MostRel2("140") as margens ficam corretas mais a quantidade de linhas fica diferente. É como se ele estivesse usando apenas 44 linhas, não usa a folha(A4) toda.

Olhei o arquivo texto e está perfeito, fiz um teste imprimindo direto para a impressora, via Edit e saiu correto a impressão. Mas quando chamo este mesmo arquivo pelo nodosimp o problema em questão aparece.
Ainda tem um detalhe, quando mando imprimir este mesmo arquivo em modo paisagem ele sai perfeito no nodosimp.

Qualquer coisa enviou o arquivo texto para que vocês possam testar.


Segue o código :

A chamada da função :
MOSTREL2("140") // passo o parametro do tamanho

A função :
******************************************************************************
Function MostRel2(tamanho)
*******************************************************************************
Local tela

tela:=savescreen(00,00,24,79)

do while .t.
SETCOLOR("+w/gr,+w/n")

Janela(10,25,13,51,'Tipo do Relatorio',.t.,7)
@ 12,27 prompt " Retrato "
@ 12,39 prompt " Paisagem "
menu to mopcao

If mOpcao = 1
comando="nodosimp c:\temp\"+alltrim(x_usuario)+".txt " +tamanho +" pre/sel"
exit
Elseif mOpcao = 2
tamanho := "96"
comando="nodosimp c:\temp\"+alltrim(x_usuario)+".txt " +tamanho +" pre/sel/apa"
exit
Else
set cursor on
restscreen(00,00,24,79,tela)
return
Endif
Enddo

RUN &COMANDO
comando="c:\temp\"+alltrim(x_usuario)+".txt"
erase (comando)

set cursor on
restscreen(00,00,24,79,tela)

return
Um abraço
Pedro Junior
Avatar do usuário
gvc
Colaborador
Colaborador
Mensagens: 1270
Registrado em: 23 Ago 2005 10:57

Mensagem por gvc »

Se vc usar os mesmos comandos e arquivo, mandando imprimir por linha de comando (fora da aplicação), funciona ou dá o mesmo problema?

Eu verifiquei esta semana que tenho que o programa "come" a última linha do meu relatório. Como não tive tempo de testar corretamente, mando imprimir uma última linha, sabendo que ela será "morta".
"TRS-80/Sincler/Apple/PC - Clipper Winter 85, tlink 1.0 [pc 10 MHz - 640K] {NEZ 8000 2Kb RAM}"
{POG - Programação Orientada a Gambiarra}
Pedro Junior
Usuário Nível 1
Usuário Nível 1
Mensagens: 34
Registrado em: 20 Ago 2003 00:54
Localização: Recife/PE

Mensagem por Pedro Junior »

Se eu mando direto do meu programa ou de fora da minha aplicação sem passar pelo nodosimp, ele funciona perfeitamente.

Acho que o problema está no Nodosimp.

Se tenho um arquivo texto que é gerado e se eu mandar imprimir este arquivo texto direto pra impressora e imprime corretamete, venho a desconfiar do nodosimp.

Existe outros programas parecidos com o nodosimp que tem a opção de visualizar o relatório antes de imprimir ?

Se alguém souber , me indique.
Um abraço
Pedro Junior
Grings
Usuário Nível 3
Usuário Nível 3
Mensagens: 340
Registrado em: 18 Ago 2004 13:51

Mensagem por Grings »

Encontrei problemas no Nodosimp que manifestam-se de maneira diferente em impressoras com saída paralela e USB. Quando encerro o relatório tenho que colocar mais uma linha assim: @++nLin,nCol Say ´´. Se não fizer isso o Nodosimp "come" a última linha, mesmo colocando o comando Eject ou iniciando uma nova página dessa forma: @00,00 Say ´´.
Responder