Danny

Bom dia Italo. Segue em anexo a unit. Obrigado. ACBrNFSeWebServices.pas

Pessoal, boa tarde. Estou implementando NFS-e para uma empresa de Tatuí. Para realizar o cancelamento tive que fazer a seguinte mudança em DoNFSeCancelarNFSe a partir da linha 1728: DE: if (TNFSeCancelarNfse(Self).FCNPJ = '') then if FProvedor = proDigifred then TNFSeCancelarNfse(Self).FCNPJ := SomenteNumeros(TNFSeCancelarNfse(Self).FNotasFiscais.Items[0].NFSe.Prestador.Cnpj) else TNFSeCancelarNfse(Self).FCNPJ := SomenteNumeros(TNFSeCancelarNfse(Self).FNotasFiscais.Items[0].NFSe.PrestadorServico.IdentificacaoPrestador.Cnpj); if (TNFSeCancelarNfse(Self).FIM = '') then if FProvedor = proDigifred then TNFSeCancelarNfse(Self).FIM := TNFSeCancelarNfse(Self).FNotasFiscais.Items[0].NFSe.Prestador.InscricaoMunicipal else TNFSeCancelarNfse(Self).FIM := TNFSeCancelarNfse(Self).FNotasFiscais.Items[0].NFSe.PrestadorServico.IdentificacaoPrestador.InscricaoMunicipal; PARA: if (TNFSeCancelarNfse(Self).FCNPJ = '') then begin if (FProvedor = proDigifred) or (FProvedor = pro4R) then TNFSeCancelarNfse(Self).FCNPJ := SomenteNumeros(TNFSeCancelarNfse(Self).FNotasFiscais.Items[0].NFSe.Prestador.Cnpj) else TNFSeCancelarNfse(Self).FCNPJ := SomenteNumeros(TNFSeCancelarNfse(Self).FNotasFiscais.Items[0].NFSe.PrestadorServico.IdentificacaoPrestador.Cnpj); end; if (TNFSeCancelarNfse(Self).FIM = '') then begin if (FProvedor = proDigifred) or (FProvedor = pro4R) then TNFSeCancelarNfse(Self).FIM := TNFSeCancelarNfse(Self).FNotasFiscais.Items[0].NFSe.Prestador.InscricaoMunicipal else TNFSeCancelarNfse(Self).FIM := TNFSeCancelarNfse(Self).FNotasFiscais.Items[0].NFSe.PrestadorServico.IdentificacaoPrestador.InscricaoMunicipal; end; Porém estou com problema no retorno deste cancelamento que estarei verificando logo mais. Vejam se é uma boa esta sugestão, testei aqui e funcionou. Um outro problema é que ao enviar os campos ValorISS e Aliquota obtenho o retorno que segue em anexo (E220 e E221). Será que esta informação deve contar em outros campos? Obrigado. 9-lista-nfse.xml

Olá pessoal, Alguns clientes meus também estão com o mesmo problema. Alguém sabe se esta dica abaixo do Italo também é válida para NFe ou se há alguma novidade sobre este problema? Obrigado.

Desculpa, testei aqui e ficou faltando alteração na unit ACBrEFDBloco_G_Class, trocando as 3 linhas: De: DFill( IND_PER_SAI, 4 ) + Para: DFill( IND_PER_SAI, 8 ) + Testei com esta alteração e funcionou conforme o esperado. Obrigado.

Boa tarde pessoal, No GUIA PRÁTICO DA ESCRITURAÇÃO FISCAL DIGITAL – EFDICMS/IPI consta a informação que as casas decimais do campo IND_PER_SAI deve ser de 8. Porém está gravando com 4 caracteres e para a solução do problema sugiro a seguinte mudança na linha 91 da unit ACBrEFDBloco_G.pas: Trocar de: property IND_PER_SAI: Double read fIND_PER_SAI write fIND_PER_SAI; /// Foi renomeado na versão 103 Para: property IND_PER_SAI: Extended read fIND_PER_SAI write fIND_PER_SAI; /// Foi renomeado na versão 103 Obrigado. Danny

Bom dia pessoal, Estou com o mesmo problema desde ontem para o GINFES do município de Itú/SP. Sei que já ocorreram vários problemas com este provedor. Alguém mais está com problema?

Olá Régys, Meus fontes estão atualizados. A questão agora é a diferença nessas Notas Técnicas. Por que a NT mais recente não informa que a DI deve ser validada?

Pessoal, bom dia. Fiz uma comparação entre as Notas Técnicas 2013.005 e 2013.005 v1.02. A validação do Numero do DI, da forma como o componente está fazendo, está na primeira versão. Já na v1.02 esta validação não consta mais e acredito que agora seja desnecessário "ValidaDIDSI" Tive que desativar manualmente a função DFeUtil.ValidaDIDSI para conseguir validar a NF-e de importação de um cliente meu. Me corrijam se eu estiver enganado. Obrigado. Danny

Bom dia pessoal. A imagem em anexo consta "problema" no canhoto. Antes, quando a Razão do emitente era muito grande, automaticamente era dividido em 2 linhas, impedindo este estouro nas margens direita e esquerda. Hoje estou vendo que existe a propriedade ExibirResumoCanhoto e acredito que ela acabou ocasionando isto. É possível fazer alguma alteração de modo que quando ExibirResumoCanhoto = False automaticamente dividir em 2 linhas caso a Razão seja grande? Obrigado.

Régys, O problema realmente era que não estava com o novo direcionamento. Obrigado!

Obrigado pelo esclarecimento Regys, Mencionei para esses clientes que não informando a Fonte e houver fiscalização ele será obrigado a justificar a Fonte e os números informados. Você disse que subiu a alteração. Acabei de baixar mas ainda não detectei nenhuma alteração no ACBrECF.pas. Até mais.

Pessoal, boa tarde. A NT2013.003 não menciona a obrigatoriedade da impressão da Fonte, somente o valor aproximado é obrigatório. Ocorreram algumas situações que clientes não querem que saia a fonte, porém se eu deixar o campo "InfoRodapeCupom.Imposto.Fonte" vazio o componente imprime automaticamente depois do imposto a palavra "Fonte: " simplesmente, sem nada na frente. Sei que posso utilizar o campo "InfoRodapeCupom.Imposto.Texto" para deixar da maneira como acho conveniente. Gostaria de sugerir uma alteração na função GetRodapeImposto do ACBrECF.pas trocando: Este: Result := 'Val.Aprox.Impostos R$' + FormatFloat(',#0.00', VlImposto) + FormatFloat('(,#0.00%)', VlPercentual) + ' Fonte:' + InfoRodapeCupom.Imposto.Fonte; Para: Result := 'Val.Aprox.Impostos R$' + FormatFloat(',#0.00', VlImposto) + FormatFloat('(,#0.00%)', VlPercentual) + ifThen(Trim(InfoRodapeCupom.Imposto.Fonte<>'',' Fonte:' + InfoRodapeCupom.Imposto.Fonte,''); O que vocês acham? Obrigado.

Ok Italo, Sobre o erro E160 enviei um e-mail para o atendimento da Ginfes. Qualquer novidade posto aqui. Muito obrigado.

Pessoal, Para que a NFSeRetorno.InfCanc.MsgRetorno.Count não seja igual a zero é necessário acrescentar a seguinte linha em ACBrNFSeUtil.pas na função RetirarPrefixos: AXML := StringReplace( AXML, 'ns5:', '', [rfReplaceAll] ); Quanto a erro E160 ainda não descobri o problema. Alguém mais tem passado por isso? Danny

Pessoal, boa tarde. Desde minha última postagem ainda não consigo cancelar NFS-e para o ambiente de Homologação da Ginfes na prefeitura de Itú. Tentei analisar o fonte do projeto, mas não consegui identificar onde poderia estar ocorrendo o problema. Hoje gerei uma NFS-e no ambiente de Homologação normalmente e tentei cancelar logo na sequencia. Deixei o Configuracoes.WebServices.Visualizar = true e na "function TNFSeCancelarNfse.Executar" o NFSeRetorno.InfCanc.MsgRetorno.Count = 0. Portanto a mensagem apresentada com o 'Numero da NFSe : ' e 'Data Hora..... : ', ambos os campos estão vazios. Diferentemente das tentativas anteriores o arquivo 77-can.xml o contém o erro E160 (Arquivo enviado fora da estrutura do arquivo XML de entrada.) Postei todos os XMLs do processo. Alguém poderia me ajudar? Obrigado. 77-nfse.xml 77-can.xml 77-can-c.xml 77-ped-can.xml 77-ped-can-c.xml 77-nfse.xml 77-can.xml 77-can-c.xml 77-ped-can.xml 77-ped-can-c.xml

Boa tarde JMarcal, Aqui no fórum tem tópico que trata deste assunto. Dê uma pesquisada... Todos os municípios, e seus respectivos provedores, estão relacionados no arquivo ACBr\Fontes\ACBrNFSe\pnfsConversao.pas Espero ter ajudado.

Bom dia Italo, Foi cancelada sim. Arquivos em anexo. Observei que o arquivo <num>-nfse.xml deveria ser sobreposto em "Arquivos.GetPathNFSe", correto? Obrigado. 75-can.xml 75-can-c.xml 75-ped-can.xml 75-ped-can-c.xml

Italo, boa tarde. Aparentemente este XML (*-nfse.xml) não é alterado, ficando exatamente como é quando criado após executar o método "Enviar". Segue em anexo. Obrigado. 75-nfse.xml

Olá pessoal, Ao cancelar uma NFS-e no ambiente de Homologação o componente o faz normalmente, gravando os arquivos "*-can.xml" e "*-can-c.xml" cuja tag Sucesso está como "True" e a tag Mensagem como "A NFSe foi cancelada com sucesso." No mesmo ambiente mês passado eu fazia o cancelamento e no final do arquivo "*-nfse-xml" era incluída a tag NfseCancelamento. Porém este mês tenho feito alguns testes e, de todos eles, ao imprimir a NFS-e depois do cancelamento não aparece a mensagem "NFS-e CANCELADA" porque não é mais gravado a tag NfseCancelamento no XML. Analisando o código fonte do componente observei que ao cancelar o "ConsultarNfseRPS" é realizado automaticamente e acredito que é através deste método que a tag deveria ser incluída. Observei que se não existir a tag "CompNfse" o "NotasFiscais.Items[x].NomeArq" não é substituído. Será que o problema é o Ginfes? Alguém poderia me ajudar? Obrigado.

Bom dia, Este erro ocorreu também comigo. Não sei te dizer se o PR está preparado para cancelamento por Evento. O procedimento que fiz foi adequar o sistema ao esquema anterior de cancelamento (ACBrNFe1.Cancelamento) apenas para emitentes do PR. Tive também que adaptar impressão do DANFE o envio de e-mail do XML e DANFE para este estado. Para os outros estados te tenho cliente não ocorreu problema ao tentar cancelar por evento. Até mais.

LeoSlander, Dá uma olhada neste link: viewtopic.php?f=6&t=7620&start=30 Acabei de atualizar os componentes ACBr via update SVN e até o momento a correção ainda não está no servidor. Portanto sempre que complico a aplicação tenho que mudar a linha na mão provisoriamente. Abraço!

Pessoal, consegui resolver o problema substituindo: este: EventoRave.SystemSetups:=DANFeRave.SystemSetups - [ssAllowSetup]; por: EventoRave.SystemSetups:=EventoRave.SystemSetups - [ssAllowSetup]; Espero ter contribuído. Abraço.

Pessoal do ACBr, Tem ocorrido "ERRO: Access violation at address..." quando imprime um evento, seja de CC-e ou de Cancelamento, na linha 554 da procedure ImprimirEventoRave do ACBrDANFeCBRave.pas (EventoRave.SystemSetups:=DANFeRave.SystemSetups - [ssAllowSetup]. Para não ocorrer este erro tenho que imprimir uma NF-e (pelo RaveCB, utilizando a procedure ImprimirDANFeRave) sempre que entro no sistema pela primeira vez. Logo que possível estarei comparando ambas as procedures para indicar exatamente onde está o erro. Imagino que o motivo do erro seja que na ImprimirDANFeRave alguma propriedade é carregada e utilizada na ImprimirEventoRave, que por sua vez não a está carregada. Até breve!

Obrigado Régys, Atualizado, testado e 100% resolvido. Agora vou alterar a aplicação de modo que não valide mais essa situação das aspas. Abraços!

Ops, descupa minha falha. São aspas duplo e não asterisco como eu havia mencionado. Obrigado pela correção.