Página 1 de 2
Preenchimento de lacunas em um texto no clipper
Enviado: 20 Jun 2007 11:26
por 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...
Enviado: 20 Jun 2007 11:44
por 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
Enviado: 20 Jun 2007 12:29
por 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.
Enviado: 20 Jun 2007 13:10
por 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
Enviado: 20 Jun 2007 14:25
por 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
Enviado: 20 Jun 2007 14:50
por 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
Enviado: 20 Jun 2007 15:11
por Maligno
marbio escreveu: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.
Enviado: 20 Jun 2007 21:01
por 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
Enviado: 20 Jun 2007 22:31
por 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.
Enviado: 21 Jun 2007 13:37
por 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
Enviado: 21 Jun 2007 15:00
por Maligno
Tem certeza?
Enviado: 21 Jun 2007 18:13
por sygecom
marbio escreveu: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
Enviado: 22 Jun 2007 13:23
por 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
Enviado: 22 Jun 2007 16:33
por 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).
Enviado: 22 Jun 2007 17:14
por 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