Criacao de arquivo com Set printer to

[augflavio]

Boa tarde pessoal,

há como o comando set printer to (arquivo.) criar um arquivo com mais de 8 caracteres ?
Estou tentando mais não consegui sair do limite do DOS.

[Maligno]

há como o comando set printer to (arquivo.) criar um arquivo com mais de 8 caracteres ?

Não tenho certeza, mas acredito que a única forma é através da biblioteca LFN. Subi pro meu site na área pública, diretório Clipper+Libs.

[sygecom]

Boa tarde pessoal,

há como o comando set printer to (arquivo.) criar um arquivo com mais de 8 caracteres ?
Estou tentando mais não consegui sair do limite do DOS.

Nos diga pq quer fazer isso talvez podemos encontrar outra solução...

Abraços
Leonardo Machado

[Toledo]

Segue abaixo o link para a lib LFN e um pequeno exemplo:

http://www.engwall.com/clipper/lfnlib.htm

Código: Selecionar todos

vArq:="arquivo.prn"
vArqNovo:="Arquivo_com_nome_longo.prn"

SET PRINTER TO (vArq)
SET DEVICE TO PRINT
@ 01,01 SAY "Fazendo um teste com a LIB LFN"
@ 02,01 SAY "Aqui voce vai montar o seu arquivo"
SET DEVICE TO SCREEN
SET PRINTER TO
LF_FRENAME(vArq,vArqNovo)
RETU

Para linkar, além da lib LFN.LIB, você vai ter que usar a NANFOR52.LIB que você pode copiar no link abaixo:

https://pctoledo.org/download/nanfor52.zip

Abraços,

[augflavio]

Preciso gerar algumas informações para um outro programa, e este não me permite escolher o arquivo, ele simplemente me informa a estrutura que o nome deve ter, nocado ctblctos????.txt

[Pablo César]

Eu acho que não seja possível em Clipper puro. Existe duas funções da dbLFN.LIB que poderiam resolver esse caso. Copiar o arquivo gerado (com 8 digitos) com LFCOPY() ou renomear o arquivo (com 8 digiitos) para LOGN FILE NAME com LF_FRENAME().

Mas confesso que estou curioso saber a finalidade disso, seria para alimentar outro sistema ?

[augflavio]

Exportar para outro programa o qual obriga o tamanho do arquivo de iportação.

[Maligno]

Exportar para outro programa o qual obriga o tamanho do arquivo de iportação.

Simples: exporte para um arquivo 8x3 e depois, usando a LFN, copie para o arquivo com o nome necessário.

[Pablo César]

Simples: exporte para um arquivo 8x3 e depois, usando a LFN, copie para o arquivo com o nome necessário.

Foi o que eu sugerí... ou então renomear o arquivo após gerado.

[augflavio]

Poderia me informar a sintaxe( nunca utilizei esse comando)? já baixaei lfn.lib na pasta lib do clipper

agradeço

[Toledo]

Veja exemplo na minha mensagem logo acima!

Abraços,

[Pablo César]

Com LF_RENAME(<aquivo old>,<arquivo novo>) para renomear me parece mais fácil e essa função retorna verdadeira ou falsa conforme a sua execução.

[augflavio]

Estarei testando, mas, diante mão agradeço a atenção

[augflavio]

PESSOAL,

Muito obrigado pela força. o Lf_rename resolveu tudo.

MUITO OBRIGADO A TODOS QUE RESPONDERAM

-------------------------------- 2ª mensagem ----------------

Valeu mesmo a sua atenção,

-----

Nota de Moderação:
por Pablo César: Esta mensagem foi emendada com uma segunda mensagem com o objetivo de evitar flooding (redundância de mensagens) conforme 4º item da Regra Geral do Fórum

[Hasse]

Boa noite galera.

Eu gravo o arquivo com 8 caracteres, e depois, com o comando RUN RENAME
posso mudá-lo para qualquer tamanho.

Espero quue ajude.