ARQUIVO TXT DE 3 LINHAS

[Sergio Cabral]

Preciso criar arquivo TXT onde cada registro deve ter 1200 bytes dividos em 3 linhas. A questão é como dividir um só registro em 3 linhas dentro de um arquivo TXT pois quando se usa o comando SDF ele coloca tudo em uma linha só.

Se alguém souber, me ajude por favor!!!

[Alessandro]

Caro colega

Utilize as funções FCreate, FWrite e FClose.

Valeu

[MARINI]

Outra solução seria:

texto:=PADR('texto linha 1',400)+CHR(13)+CHR(10)
texto+=PADR('texto linha 2',400)+CHR(13)+CHR(10)
texto+=PADR('texto linha 3',400)+CHR(13)+CHR(10)

MEMOWRIT(NOME DO ARQUIVO,texto)

[gvc]

Outra-Outra solução seria:

set alternate to <nome do arquivo>
set alternate on

?? PADR('texto linha 1', 400)
? PADR('texto linha 2', 400)
? PADR('texto linha 3', 400)

set alternate off
set alternate to