Preenchimento de lacunas em um texto no clipper

[marbio]

Ola galerinha....

Estou com um problema grande, um cliente me pediu o seguinte, Entra no sistema faz o cadastro, manda para a impressão, tem como fazer o preenchimento das lacunas já no texto digitado pelo clipper.


Desde já agradeço sua atenção...

[sygecom]

Estou com um problema grande, um cliente me pediu o seguinte, Entra no sistema faz o cadastro, manda para a impressão, tem como fazer o preenchimento das lacunas já no texto digitado pelo clipper.

Tche, explica melhor o que vc quer fazer......hj o tico e o teco....não estão trabalhando junto....resumindo não entendi se vc quer imprimir completando com alguma coisa...ou se quer digitar jah pedindo auto-completar...

Abraços
Leonardo Machado

[marbio]

entao ne, vamos la....



Tem como fazer o preenchimento das lacunas em um texto?


* no sistema cadastro de cliente, vc faz o cadastro deste cliente com os dados.

* quando vc for imprmir o texto(contrato) ja vem preenchimento com as informaçoes feita no cadastro.

a duvida e essa em como fazer o programa levar as informaçoes para fazer o preenchimento em um determinado arquivo TXT ou DOC ou HTML etc...

o meu cliente ta me sufocando com isso.

t+

abraços.

[sygecom]

Tche,...caiu a ficha....e entendi...claro que tem como fazer isso sim...mas vc tem que saber qual o Layout desse arquivo.....ex: vc tem que saber onde exatamente vc deve fazer os preenchimento.....com seus dados.....ex:
meutxt.txt

Comunicamos que por motivo de ordem particular, a partir de &01 nao necessitaremos mais de seus servicos. Servindo esta de aviso previo indenizado de 30 dias, conforme determina a CLT.

____________________________________

&02

Tche, no exemplo acima o &01 é a DATA e o &02 é a assinatura....Tche, isso seria um arquivo texto jah pre-preenchido e depois é só usar a FOPEN() para abrir e FWRITE() para preencher...

Obs: Não sei se funciona em DOC...jah em HTML vc tera que preencher dentro das devidas TAG que vc jah vai ter que saber....quais são.....

Abraços
Leonardo Machado

[marbio]

Fio,

Tem camo vc me dar mais detalhes, para arquivo TXT, ja me ajuda muito. com uma rotina.
blz

desde ja agradeço.

flow

[sygecom]

Tche, assim que eu chegar no meu micro te mando um exemplo....mas dando uma olhada aqui no forum mesmo...vc acha um monte de exemplo...olha o otimo exemplo que o Eolo Postou....
https://pctoledo.org/forum/viewto ... ght=fwrite

Abraços
Leonardo Machado

[Maligno]

Tem camo vc me dar mais detalhes, para arquivo TXT, ja me ajuda muito. com uma rotina.

Se voc6e ler o help do Word a respeito de mala direta verá como é fácil gerar um arquivo texto para preenchimento de DOC. Faça um exemplo nele pra começar a ver como ele usa arquivos texto pra isso.

[marbio]

Ola turma....

To na area fiquei o dia todo mexendo, nao deu resultado, nao consigo fazer o clipper preencher as lacunas no arquivo texto para impressao depois.

vou ficar pirado..........

kkkkk

[Maligno]

Se não deu certo não foi por falta de tentativa, pelo menos.

Mostre o código que já desenvolveu. Às vezes é coisa simples. Com o cansaço é possível que você tenha deixado escapar alguma coisa.

Mas por favor, manda o código indentado. Senão não dá pra ler. Se for grande e não estiver indentado, tem gente que nem lê. Eu, por exemplo.

[enfosoft]

tente assim

clear

nome := 'enfosoft' // variavel veio do cadastro

string = ' NOME DO CLIENTE: &NOME ' // linha lida do teu arquivo texto

@ 10,10 say string


valew
Enio

[Maligno]

Tem certeza?

[sygecom]

Ola turma....

To na area fiquei o dia todo mexendo, nao deu resultado, nao consigo fazer o clipper preencher as lacunas no arquivo texto para impressao depois.

vou ficar pirado..........

kkkkk

Posta seu fonte e Vamos ver seus exemplos e vamos Passo a Passo...!!!

Abraços
Leonardo Machado

[enfosoft]

Nao Sei se entendi errado, mas ai vai um exemplo de como eu faco para preencher um contrato.

Código: Selecionar todos

clear
sele 1
use  file

FSTRING = MEMOREAD('texto.txt')
LINHAS = MLCOUNT(FSTRING,70)

l = 1

do while !eof()

anome = ALLTRIM(nomcli) // campo do dbf com o nome 
aende = ALLTRIM(endcli)  // endereco
acida = ALLTRIM(cidcli)   // cidade

for i = 1 to linhas
    XLINHA = MEMOLINE(FSTRING,74,I) 

    alinha = "&xlinha"

    @ l,00 say alinha
    l++
next

l+=10
skip
enddo

O Arquivo texto.txt seria assim:

• CONTRATO DE BLA
  
  EU &anome ENDERECO &aende NA CIDADE DE &acida
  ESTOU FAZENDO ESTE TESTE PARA PREENCHIMENTO DE
  BLAVL ......

O resultado seria alguma coisa assim:

• CONTRATO DE BLA
  
  EU Enio ENDERECO Rua 25 de fevereiro NA CIDADE DE nova araca
  ESTOU FAZENDO ESTE TESTE PARA PREENCHIMENTO DE
  BLAVL ......

Note que Enio e Rua 25 de fevereiro e nova araca sao dados que estao no arquivo dbf.

as variaveis anome aende acida estao precedidas de um & (e comercial) no arquivo texto.
Espero ter ajudado
Abraco
Enio

[Pablo César]

Marbio, ja que teu cliente exige tanto esse recurso e sabendo que a roda ja foi inventada... (tenho as minhas restrições quanto a isto). Sabemos que o editor WORD, tem muitos recursos, como ja disse o Maligno, que existe a mala-direta no próprio WORD. Utilize então os recursos do próprio WORD que tem melhor apresentação e pode ainda ler o teu arquivo DBF. Eu prepararia um DBF específico (ja filtrado) com os campos que o cliente quer deixando-lo disponível na pasta "Meus Documentos" para que o Word a utilize. Claro que se o seu cliente não souber utilizar a mala-direta do Word (que acho uma barbaridade qualquer um não saber nestes tempos) você então ensine e fale que essas lições são aparte (não fazem parte do sistema... hehehe).

[sygecom]

Tche, Pablo...até entendo o colega.....Marbio....tem coisas...que o cliente quer que o sistema faça e não o word.....principalmente aqueles que pagam e pagam bem....ai sim ....esses querem tudo pelo sistema e com razão...estão pagando....agora se isso é feito por troco de banana....qualquer solução é bem vinda......
Obs:Eu por exemplo tenho diversos clientes que trabalham com maquinas burras.....sem OFFICE,sem internet..sem nd...somente o meu sistema...

Abraços
Leonardo Machado