Leonardo Gregianin

A sequencia do processo é esta mesmo. E a consulta do último número de RPS válido somente foi disponibilizada pelo padrão DSF.

Aprendiz_ce, tente "Gerar e enviar Lote". Ítalo, esta mensagem não ficaria melhor interpretada assim: "A funcionalidade Gerar NFSe não foi disponibilizada pelo provedor: x"

O programa exemplo é somente um exemplo de como se utiliza o componente. Nele vem default com o relatório com o QuickReport, este erro é do QuickReport. Você precisa apagar o componente do Quick e incluir o componente do Fortes.

Se você utiliza o FortesReport não tem necessidade de instalar o ACBrNFSeDanfseQRpkg, pois como o próprio nome diz, é o relátorio em QuickReport. Instale o pacote do relatório em Fortes com o próprio ACBrInstall.

Inicialmente você pode desmarcar do ACBrInstall o relatório em QuickReport (ACBrNFSeDanfseQRpkg) e concluir a instalação. Depois disso você pode instalar o ACBrNFSeDanfseQRpkg manualmente desde que tenha o QuickReport instalado no computador. Se já tiver instalado, entre no código fonte do pacote (ACBrNFSeDanfseQRpkg.dpk) e troque para versão do QuickReport que tenha, pois o padrão do NFSe é a versão 5.05.

Este erro pode ser de falha na conexão com a internet. Se utiliza proxy tente informar os dados de host, porta, usuário e senha. ACBrNFe1.Configuracoes.WebServices.ProxyHost := Host.Text; ACBrNFe1.Configuracoes.WebServices.ProxyPort := Porta.Text; ACBrNFe1.Configuracoes.WebServices.ProxyUser := User.Text; ACBrNFe1.Configuracoes.WebServices.ProxyPass := Senha.Text;

No diretório onde será instalado o ACBr deve ser algo assim: C:\Delphi\ACBr\trunk E a URL do repositório que realmente necessita é a trunk e não a branches, ou seja, não seria https://svn.code.sf.net/p/acbr/code/branches e sim https://svn.code.sf.net/p/acbr/code/trunk

Alguém utiliza este provedor? Recentemente houve mudanças no provedor e não consigo enviar os lotes. O endereço do webservice continua o mesmo para homologação http://201.57.87.179:92/ServicoNFSe.asmx e produção http://201.57.87.179:9292/ServicoNFSe.asmx

Tem certeza que não tem grupo IPI no único produto do XML ?

Bom dia, aproveitando o contato com o provedor poderia solicitar o endereço do webservice de todas as cidades que utilizam este provedor.

Talvez seja alguma limitação do FastReport pois não consigo acessar a aba "código" ela aparece mas não acesso ela. Tenho a versão 4.12.2 que vem junto com o Delphi XE2. Gravo a imagem no formato png 300 x 300 e a impressão com Stretch false sai errado e com Stretch true sai correto.

1 - A falta da logomarca não suprimiu o espaço no início da danfe. R.: Continua não suprimindo o espaço. procedure TdmACBrNFeFR.frxReportBeforePrint(Sender: TfrxReportComponent); begin if (NFe.Ide.modelo = 65) then begin if cdsParametros.FieldByName('Imagem').AsString = '' then begin frxReport.FindObject('ReportTitle1').Visible := False; frxReport.FindObject('Picture2').Visible := False; end else begin frxReport.FindObject('ReportTitle1').Visible := True; frxReport.FindObject('Picture2').Visible := True; end; end; end; 2 - A quantidade de itens não aparece nada, tenho que passar pelo código? Não poderia passar direto no FastReport com a função COUNT? R.: Resolvido. Faz a somatória automática. 3 - O total do valor pago não existe mais em comparação a sua primeira versão do DANFeNFCe.fr3 ? R.: Resolvido. Não existe mais o campo. 4 - O tamanho do Memo "Consumidor" não aumentou. Sugiro Memo46.Height = 1,85 R.: Continua do mesmo tamanho. No meu caso utilizo Height no mínimo com 1,55 senão corta informações do consumidor. ** Imagem QR Code: Com a propriedade "Stretched" sendo False corta a imagem e consequentemente não lê a imagem. ** O Memo12 e o Memo2 estão muito juntos, deveria separá-lo um pouco mais. ** Mem123 "VL.UNIT" está cortado.

Esta situação já está feita na Danfe em FastReport, falta corrigir na Danfe em Rave Code Base.

Bom dia Akai, Fiz o teste de cancelamento para o provedor ISSnet hoje (04/11/2013) com os fontes atualizados e não houve nenhum erro. Houve alteração para este provedor na rev. 6032 em 31/10/2013.

Uma pequena correção no ACBrNFSeDANFSeFRDM.pas pois o campo DataEmissao é DateTime: - FieldByName('DataEmissao').AsString := DFeUtil.FormatDateTime(DateToStr(DataEmissao)); + FieldByName('DataEmissao').AsString := DFeUtil.FormatDateTime(DateTimeToStr(DataEmissao));

Boa tarde, Segue anexo alteração na Danfse para FastReport, incluindo: * Complemento, Telefone e email para o prestador e para o tomador. * Campo "Sistema" no rodapé. * Opção para imprimir canhoto conforme propriedade do componente "ImprimeCanhoto".

Fábio, implementei o DPEC recentemente no meu sistema e somente com a lida de alguns tópicos deste fórum consegui fazer todo o processo. Régys, tem uma proposta simples de alteração do texto do Danfe para o DPEC gerado e o texto para DPEC enviado para Sefaz, poderia verificar se é possível subir ao svn?

Roberto está ficando muito bom, 1 - A falta da logomarca não suprimiu o espaço no início da danfe. 2 - A quantidade de itens não aparece nada, tenho que passar pelo código? Não poderia passar direto no FastReport com a função COUNT? 3 - O total do valor pago não existe mais em comparação a sua primeira versão do DANFeNFCe.fr3 ? 4 - O tamanho do Memo "Consumidor" não aumentou. Sugiro Memo46.Height = 1,85 5 - Ainda temos que arrumar a URL para ser carregada pelo componente conforme ambiente e UF.

Bom dia, Com os fontes atualizados está realmente com erro. Anexei a correção.

Roberto.Godinho, alguns apontamentos: 1- Teria como a Logomarca da empresa ser opcional? Eliminando também o espaço vago no danfe caso não houver imagem? 2- Quantidade de itens: Não seria melhor o FastReport fazer a contagem automática? 3 - Campo "Detalhado" é do tipo Boolean, portanto no seu exemplo seria Danfe.Detalhado := False; ou Danfe.Detalhado := True; 4 - O Memo46 com o conteúdo [Destinatario."Consumidor"] poderia ter a propriedade Height = 1,85 igual aos dados do emitente senão há cortes de informação. 5 - Diminuir o espaço no final do PageHeader "Emitente". 6 - O "vTotPago" não teria que diminuir o "vDesc": FieldByName('vTotPago').AsCurrency := FvTroco+FieldByName('VProd').AsFloat-FieldByName('VDesc').AsFloat; Obrigado por testar, vamos melhorando cada vez mais.

Na nota técnica não tem nada sobre isso, porém pela internet encontrei notícias sobre dois tipos diferentes: danfe detalhada (com produtos) e danfe "ecológica" (sem os produtos). Eu criei outro arquivo "DANFeNFCe.fr3" e setei a propriedade "Visible" para "False" no GroupHeader DadosProdutosHeader e no MasterData DadosProdutos. Deve haver uma forma melhor de programar isso mas não encontrei.

Você tem que substituir os arquivos ACBrNFeDANFEFRDM.pas e ACBrNFeDANFEFRDM.dfm da pasta \Fontes\ACBrNFe2\ para os que postei

Também estou com erro de memória quando faço várias consultas. Comentei a linha "FListaNfse.Free;" do destructor TretNfseRps.Destroy na unit pnfsConsNfseporRpsResposta e não ocorreu nenhum problema no Enviar, ConsultarSituacao, ConsultarLoteRps, ConsultarNFSeporRps, ConsultarNFSe, CancelarNFSe.

Bom dia a todos, Somente agora atualizei os fontes e estou a testar o provedor ISSNet, encontrei os seguintes problemas: 1 - O problema e a solução passada é necessária (ACBrNFSeWebServices.pas). 2 - O erro "Arquivo enviado fora da estrutura do arquivo XML de entrada." relatada também acontece, e deve ser incluída a condição "DFeUtil.SeSenao((VersaoXML = '2') or (AProvedor = proISSNet)," em todos os métodos e somente estava no Gera_DadosMsgEnviarLote (pnfsNFSeG.pas). 3 - Incluída a restrição para o ISSNet não consultar o RPS após o cancelamento (ACBrNFSeWebServices.pas). Vou anexar minhas alterações.

Olá Régys, Vou anexa a unit e a imagem de quatro testes que fiz, com letras maiúsculas ou somente capitalizado a primeira de cada palavra. Espero que ajude.