SpeedTI

Prezados. É possível imprimir a nota carregando o fr3 por Stream (LoadFromStream) ao invés de setar a propriedade fastfile do componente de impressão? Gostaria de deixar o arquivo fr3 no banco de dados. Obrigado. Valdir

Olá Juliomar. Retomando o assunto, na verdade a solução do problema foi a reinstalação do pdf reader, uma vez que a fonte utilizada para confecção do arquivo era e ainda é a fonte Arial. O leitor de pdf estava com problemas. Mais uma vez agradeço pela atenção. Valdir

Boa tarde Juliomar. Na mosca. Obrigado!

Prezados. Ao realizar o envio do PDF e XML através do método EnviarEmail do componente ACBrNFe, o mesmo gera o pdf 99% ilegivel, conforme anexo. Contudo, se eu apenas realizar a impressão, a nota gerada no preview está normal. Alguém tem idéia do que pode ser isso? Att., Valdir pdfNota.pdf

Olá Italo. Descobri o motivo, é o NSU. Obrigado.

Olá Italo. Estou utilizando o código abaixo, para consultar as notas para manifestação, contudo não consigo visualizar todas as notas emitidas contra o cnpj. Por exemplo, a consulta não mostra as notas do mes 6 e 7. Vem apenas as notas do mes 4 e 5. Por favor, o que estou fazendo de errado? dmDados.NFe.DistribuicaoDFe(35,vCNPJ,'0',''); for I := 0 to dmDados.NFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Count-1 do begin if dmDados.NFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items.resNFe.chNFe<>'' then begin cdsNotas.Append; cdsNotas.FieldValues['data']:=dmDados.NFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items.resNFe.dhEmi; cdsNotas.FieldValues['chave']:=dmDados.NFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items.resNFe.chNFe; cdsNotas.FieldValues['emitente']:=dmDados.NFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items.resNFe.xNome; cdsNotas.FieldValues['valor']:=dmDados.NFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items.resNFe.vNF; cdsNotas.FieldValues['nf']:=copy(dmDados.NFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items.resNFe.chNFe,25,9); if dmDados.NFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items.resNFe.cSitNFe=snAutorizado then cdsNotas.FieldValues['status_nfe']:='AUTORIZADA' else if dmDados.NFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items.resNFe.cSitNFe=snDenegado then cdsNotas.FieldValues['status_nfe']:='DENEGADA' else if dmDados.NFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items.resNFe.cSitNFe=snCancelado then cdsNotas.FieldValues['status_nfe']:='CANCELADA' else if dmDados.NFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items.resNFe.cSitNFe=snEncerrado then cdsNotas.FieldValues['status_nfe']:='ENCERRADO'; cdsNotas.Post; end; end; Obrigado.

Olá Italo. A consulta funciona, contudo não sei se estou fazendo errado, mas o retorno não mostra todas as notas, por exemplo não tem as notas de Junho e Julho, neste caso, vejp apenas as notas de Abril e Maio. Abaixo o trecho de código: dmDados.NFe.DistribuicaoDFe(35,vCNPJ,'0',''); for I := 0 to dmDados.NFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Count-1 do begin if dmDados.NFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items.resNFe.chNFe<>'' then begin cdsNotas.Append; cdsNotas.FieldValues['data']:=dmDados.NFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items.resNFe.dhEmi; cdsNotas.FieldValues['nf']:=''; cdsNotas.FieldValues['chave']:=dmDados.NFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items.resNFe.chNFe; cdsNotas.FieldValues['emitente']:=dmDados.NFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items.resNFe.xNome; cdsNotas.FieldValues['valor']:=dmDados.NFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items.resNFe.vNF; cdsNotas.FieldValues['nf']:=copy(dmDados.NFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items.resNFe.chNFe,25,9); if dmDados.NFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items.resNFe.cSitNFe=snAutorizado then cdsNotas.FieldValues['status_nfe']:='AUTORIZADA' else if dmDados.NFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items.resNFe.cSitNFe=snDenegado then cdsNotas.FieldValues['status_nfe']:='DENEGADA' else if dmDados.NFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items.resNFe.cSitNFe=snCancelado then cdsNotas.FieldValues['status_nfe']:='CANCELADA' else if dmDados.NFe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Items.resNFe.cSitNFe=snEncerrado then cdsNotas.FieldValues['status_nfe']:='ENCERRADO'; cdsNotas.Post; end; end; Está faltando alguma coisa? Obrigado.

Olá Italo. Então pelo que entendi, o CEST deve apenas ser informado nos itens que tenham o CFOP de ST. É isso?