Agnaldo Prates

Bom dia. No site da sefaz/mg tem todo um mecanismo para isso. http://www.fazenda.mg.gov.br/empresas/sistemas/siare/CDFA/cancelamento_docs.htm

Você já analisou se o arquivo nfse.xsd e xmldsig-core-schema20020212.xsd são os mesmos do trunk2? Tenho clientes que trabalha com a Fiorilli e não estou tendo estes problemas, pelo menos até agora.

Henrique bom dia. Para notas de crédito de CIAP, não sei como está no seu xml, mas, alguns aspectos devem ser observados. A finalidade deve ser fnAjuste, Ide.finNFe := fnAjuste; A tag, indTot deve ser itNaoSomaTotalNFe, Prod.IndTot := itNaoSomaTotalNFe; Isso deve resolver o seu problema.

Isso mesmo, somente o primeiro link é que estão informando que serão paralisados dos serviços no dia 02/02. Só pra você ver como eles tem um cuidado em divulgar as informações. Isso é coisa do governo.

Graça, eu tenho o RXLib que roda até o XE3. Caso haja interesse lhe envio por pvt.

Veja o comunicado da SEFAZ. https://www.sefaz.rs.gov.br/Site/index.aspx https://www.sefaz.rs.gov.br/Site/NoticiaDetalhes.aspx?NoticiaId=4440

Bom dia. Eu não entendi muito bem a situação. Após finalizar a venda o sistema não transmitiu a nota? Se transmitiu, o cliente jamais poderia excluir um item da venda, haja visto que esta já tornou-se um documento público, Nota fiscal. Se ainda não foi transmitido, e estamos diante de uma pre-venda, não há nenhum problema quanto à exclusão de itens. O agravante neste caso é que, o cliente recebeu do consumidor, e posteriori, apagou os itens, isso caracteriza fraude, podendo este ser autuado pela via administrativa estadual. Penso que você deve analisar a possibilidade de, ao finalizar a venda, se for venda, transmitir a nota fiscal imediatamente, sob pena de poder ser também responsabilizado de forma solidária com seu cliente, ainda que toda a ação foi executada por ele.

Somente para constar, é correta a sua informação @Isaque Pinheiro, realmente no d2010 está funcionando tranquilamente. Oportuno salientar que, no D7 conforme antes por mim citado, já há uma incompatibilidade entre o AcbrBoletoDemo com o Delphi 7. Pelo menos aqui, comigo está ocorrendo. Penso que, diante do fim do suporte para do D7 previsto no tópico Fim de suporte ao Delphi 7 e outras versões que não suportam UNICODE, creio que os demais desenvolvedores que ainda não iniciaram as suas migrações, o faça o quanto antes.

Bom dia Isaque. Obrigado pela resposta. Em relação ao erro que reportei aqui neste tópico, imaginei que poderia ser algo mesmo em relação ao Delphi ou o FastReport. Removi todos eles, Delphi e componentes, pastas e tudo que havia relação entre ambos. Instalei tudo novamente, inclusive, o ACBr, eu já havia atualizado, mas, para ter certeza absoluta, apaguei toda a pasta e baixei novamente. Após instalar o Delphi e todos os respectivos componentes, iniciei a bateria de testes. O primeiro deles foi sem dúvidas o AcbrBoletoDemo. Para minha surpresa, o erro continua ocorrendo no mesmo patamar, e o que é pior, agora não há necessidade de no demo incluir o boleto no FastReport, Basta um CTRL + F9 e pronto, já ocorre o erro. Diante desta dificuldade, foi testar então o meu sistema, inclusive, antes de tudo apaguei todos os .dcu’s, para ter certeza que haveria nova compilação, mas, simplesmente o sistema compilou e funcionou sem nenhum problema, e, no meu formulário tem as opções de impressão tanto em Fast quanto em Fortes. Bem, aqui tenho um backup do AcbrBoletoDemo que modifiquei, para ter a escolha de qual gerenciador de relatório utilizar, então, resolvi compilar este demo, para minha surpresa, o demo funciona sem problema nenhum, compila e roda na hora. Estou imaginando que possa haver alguma incompatibilidade desta versão AcbrBoletoDemo que está no repositório com a versão do Delphi7, tendo em vista que, os formulários do meu sistema e do backup do AcbrBoletoDemo estão em Delphi7. Então iniciei uma nova aplicação, coloquei os componentes ACbrBoleto, ACBrBoletoFCFR1, ACBrBoletoFCFortes1 e novamente a compilação ocorreu normalmente. Diante da bateria de testes, há indícios de incompatibilidade entre o AcbrBoletoDemo que está no repositório com o Delphi7 que tenho aqui, esta foi a conclusão que cheguei.

Boa noite pessoal. Atualizei todo o ACBr e, consequentemente o AcbrBoleto. Ocorre que o mesmo compila sem problemas, todavia, ao inserir o ACBrBoletoFCFR1 no demo, o mesmo não compila, ocorre demonstrado na imagem. Por um acaso, alguém também deparou com esta informação?

Veja uma coisa Zoe, agora a pouco eu alterei a unit referente a este erro, mas, por recomendação do @Juliomar Marchetti eu a removi do tópico. Acontece que, eu removi todos os componentes do Acbr do Delphi, apaguei tudo que tinha relacionado ao mesmo no meu hd. Baixei novamente e instalei, o erro realmente não ocorreu. Acredito que você possa estar com algum problema neste sentido, então, recomendo que você remova os componentes limpe seu micro, baixe novamente instale que provavelmente vai funcionar.

Oi Juliomar. Vou remover mais uma vez todo ACBr e consequentemente a respectiva pasta. Baixar novamente e testar.

Não sei se vai resolver mas, de repente a unit que alterei no tópico listado abaixo vai resolver seu problema. http://www.projetoacbr.com.br/forum/topic/27652-fundo-de-combate-%C3%A0-pobreza-fcp/#comment-181555

Bom, este erro, não exatamente este, aconteceu depois que atualizei, não importando qual o gerador do relatório. Estava recebendo a mensagem: LocalImpCanhoto not exists, observei que o componente estava conservando esta propriedade, removi todos, dei u clean up e instalei novamente, e, ainda assim o erro persistia. Resolução, abri a unit ACBrNFeDANFEClass.pas e adicionei a variável FLocalImpCanhoto:Integer e consequentemente suas propriedades. Recompilei o sistema e tudo voltou o normal. Possivelmente muitos erros reportados em outros tópicos podem estar relacionado com este. Segue a unit alterada.

Vou tentar reproduzir este erro aqui.

Pode estar relacionado com a versão do seu FastReport. Por qui está compilando e imprimindo tranquilamente.

Qual erro do ACBrECFVirtualNFCe ?

Dependendo do modelo de NF este campo é obrigatório, ex: 55 NF-e. No seu caso NFCe não.

Sobre a analise dos arquivos .fr3 supra. Ao analisar os dois .fr3, notei que o Boleto_beneficiario.f3 está errado. Se analisado ao abrir o formulário, aparentemente está correto, mas, ao analisar o Script, o mesmo coloca os dados da agencia/conta/CodigoCedente exatamente no local onde estaria o CNPJ do beneficiário, porem, tal situação ocorre em que os números das agencias sejam maiores ou igual a 104, ou seja, é uma condição que está explicita dentro do .fr3, que seta tais valores para as variáveis CedenteAgencia2 e CedenteAgencia3, que consequentemente são as variáveis onde são mostrados o CNPJ. procedure MDOnBeforePrint(Sender: TfrxComponent); begin (...) if <Banco."Numero"> = '104' then begin CedenteAgencia.Text := <Titulo."CodCedente">; CedenteAgencia2.Text := <Titulo."CodCedente">; CedenteAgencia3.Text := <Titulo."CodCedente">; end else begin CedenteAgencia.Text := <Cedente."Agencia">+'-'+<Cedente."AgenciaDigito">+'/'+<Cedente."CodigoCedente">; CedenteAgencia2.Text := <Cedente."Agencia">+'/'+<Cedente."CodigoCedente">; CedenteAgencia3.Text := <Cedente."Agencia">+'/'+<Cedente."CodigoCedente">; end; end; Porém, no BoletoFR.fr3 existe a mesma instrução, mas neste ultimo caso, as variáveis do CNPJ são, Memo80 e Memo139 respectivamente. procedure MDOnBeforePrint(Sender: TfrxComponent); begin (...) if <Banco."Numero"> = '104' then begin CedenteAgencia.Text := <Titulo."CodCedente">; CedenteAgencia2.Text := <Titulo."CodCedente">; CedenteAgencia3.Text := <Titulo."CodCedente">; end else begin CedenteAgencia.Text := <Cedente."Agencia">+'/'+<Cedente."CodigoCedente">; CedenteAgencia2.Text := <Cedente."Agencia">+'/'+<Cedente."CodigoCedente">; CedenteAgencia3.Text := <Cedente."Agencia">+'/'+<Cedente."CodigoCedente">; end; end; Portanto, resta clarividente que, razão assiste ao Juliomar, ao afirmar que não há no repositório o arquivo Boleto_beneficiario.fr3. Ao que parece, o arquivo supra citado por parte do colega, salvo melhor juízo, está desatualizado, devendo o mesmo, em caso outro, apagar o Boleto_beneficiario.fr3 e copiar o BoletoFR.fr3 para o nome desejado, devendo ser feito este procedimento a cada atualização.

A tarde vou testar um software de boleto dai eu vou analisar os dois .fr3 para saber exatamente o que está ocorrendo e posto aqui o result.

Tres perguntas: - Qual versão trunk ou trunk2, - No caso do trunk2, está atualizado? - Testou a impressão no Fortesreport ou FastReport?

http://www.projetoacbr.com.br/forum/applications/core/interface/file/attachment.php?id=21107 Está neste tópico mesmo.

Já tentou desse modo? ACBrNFSe1.Gerar(StrToInt(vNumRPS)); sNomeArq := ACBrNFSe1.NotasFiscais.Items[0].NomeArq; ACBrNFSe1.NotasFiscais.Clear; ACBrNFSe1.NotasFiscais.LoadFromFile(sNomeArq); ACBrNFSe1.NotasFiscais.ImprimirPDF; Aqui envia e não imprime, apenas salva o PDF. De repente isso pode lhe ajudar.

Bem, o erro “is not a invalid integer value” está ocorrendo no caso do FastReport em decorrência da falta de valor no código do município no parâmetro Servico. with Servico do begin FieldByName('CodigoMunicipio').AsString := IfThen( CodigoMunicipio <> '', CodCidadeToCidade(StrToInt(CodigoMunicipio)), '0'); FieldByName('ExigibilidadeISS').AsString := ExigibilidadeISSDescricao(ExigibilidadeISS); FieldByName('MunicipioIncidencia').AsString := CodCidadeToCidade(StrToIntDef(CodigoMunicipio, 0)); end; Neste momento, o código do município chega em branco, e, consequentemente ao tentar converter para inteiro, ocorre o erro. Importante ressaltar que, este erro eu apenas consegui reproduzi-lo ao tentar “Imprimir Danfe”, se for gerado uma NFSe, e imprimir, o erro não ocorre. O fato é que, como na leitura do arquivo xml, o campo relativo ao Código do Município não é alimentado, assim, ao chamar o método de conversão para inteiro, o erro é disparado. Sugestão. No Demo, procedi a seguinte alteração no momento que vou imprimir o DANFE, uma vez carregado o arquivo XML alimentando o componente, realizo as verificações abaixo: if ACBrNFSe1.NotasFiscais.Items[0].NFSe.Servico.CodigoMunicipio='' then ACBrNFSe1.NotasFiscais.Items[0].NFSe.Servico.CodigoMunicipio := edtCodCidade.Text; if ACBrNFSe1.NotasFiscais.Items[0].NFSe.OrgaoGerador.CodigoMunicipio='' then ACBrNFSe1.NotasFiscais.Items[0].NFSe.OrgaoGerador.CodigoMunicipio := edtCodCidade.Text; Mas é claro, isso é uma solução paliativa para evitar o erro, antes porem se faz necessário identificar os motivos em que a variável CodigoMunicipio está ficando em branco, depois com mais tempo vou analisar o código para saber exatamente o que é.

Na linha 706 do arquivo ACBrNFSeDANFSeFR.pas, proceda a seguinte alteração: FieldByName('CodigoMunicipio').AsString := CodigoMunicipio; // FieldByName('CodigoMunicipio').AsString := IfThen(CodigoMunicipio <> '', CodCidadeToCidade(StrToInt(CodigoMunicipio)), ''); Isso resolve o seu problema.