PORTARIA CAT-102

[reinaldo]

Olá amigos
Estou terminando esse serviço e tenho algumas dúvidas.
Estou gravando o arquivo texto da seguinte maneira:

SET PRINTER TO nfs.txt
@PROW(), 0 SAY "10"│"1,00│12345678000112│01/02/2008│29/02/2008
@PROW()+1,0 SAY "20"│I│VENDAS│1│007605│01/02/2008 00:00:00│
29/02/2008 00:00:00│1│5102│││23456789000178│EMPRESA│
ENDERECO│000│BAIRRO│CIDADE│SP│11100000│BRASIL││
... e assim por diante

Quanto ao caracter separador estou usando ALT 179 │

Estou fazendo certo?

Agradeço pela ajuda

abraços

Reinaldo

[alaminojunior]

Só um detalhe: Direcionando a saída de impressão para gerar o arquivo, talvez ele saia com alguns caracteres estranhos.
Pessoalmente utilizo as funções de baixo nível, Fcreate, Fwrite, Fopen, e outras mais. Elas te dão um controle maior do que vai ser colocado no arquivo.

[reinaldo]

Alamino

E o caracter separador │ ALT179; é esse mesmo??

Reinaldo

[alaminojunior]

Me parece que é esse mesmo.
Só que para incluir ele no arquivo, vc tem que usar CHR(179).

[alaminojunior]

OPA !!! FALHA NOSSA !!!
O caracter correto é o CHR(124)

[pringles]

Aproveitando o tópico, alguém sabe se as NFs de serviço precisarão ser enviadas também? Como a prestação de serviço não gera IMCS, acredito que não seja necessária sua transmissão, mas queria confirmar com os colegas.

[Mário Isa]

Creio que notas de serviço NÃO!
Somente notas fiscais modelo 1 e 1-A.
Se alguem souber diferente favor informar-nos.
Mário

[reinaldo]

Alamino
ainda bem que vc corrigiu sua informação;
Ja tinha feito o programa usando CHR(179) e o resultado foi um desastre.
Refiz usando CHR(124) e ficou perfeito.
Agora e enviar para o site da Fazenda e rezar...
Obrigado

Reinaldo

[gransoft]

Alamino
(...)
Agora e enviar para o site da Fazenda e rezar...
(...)
Reinaldo

UBERLÂNDIA-MG, 4 de março de 2008.

Prezado Reinaldo,

Reze! Para o site estar operante, sem mensagens de erros desconexas...

Mas, tem um pequeno detalhe, que tenho certeza de que você não se esqueceu:

Portaria CAT- 102, de 9-11-2007
(..)
1.1 - Formato do arquivo: texto (Text Encoding = UTF-8);
1.2 - Tamanho máximo do arquivo: 1 megabyte;
... etc ...
(...)

Atenciosamente,
Janis Peters Grants.

[reinaldo]

Janis
Obrigado pela lembrança, mas não esqueci desses detalhes.
O que não achei prático é obrigar o usuario ler o arquivo .TXT no Bloco de Notas e regravá-lo em UTF-8.
Você sabe se existe alguma maneira de gravar direto em UTF-8 pelo Clipper?
Obrigado

Reinaldo