Agnaldo Prates

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.

Boa tarde. Está normal sim, segue o Danfe em Fortesreport. Com absoluta certeza seu Fast deve estar com algum problema. NFS-e.pdf

Isso ocorre em qual Report?

Leia isso http://www.projetoacbr.com.br/forum/topic/17100-infidelidade-de-layout-x-arquivo-de-remessa/#comment-106732 Isso nada mais é do sacanagem destes "bancos".

Não sei se pode ser o caso, mas, antes de qualquer procedimento com ACBrNFe, eu utilizo: Limpo todas as variáveis, inclusive a chave = ''; ACBrNFe.EventoNFe.Evento.Clear; Informo os novos dados normalmente e não tenho recebido nenhuma mensagem de erro. Penso ser importante dar uma reisada nas variáveis, especialmente a que armazena a chave.

Imagino que seja uma questão na lógica do seu código. if (frmPDV.LB_CPF.Caption <> 'C.P.F.') and (frmPDV.LB_CPF.Caption <> ' ') then begin Dest.CNPJCPF:= frmPDV.LB_CPF.Caption; if frmPDV.LB_NOME.Caption <> '' then Dest.xNome := frmPDV.LB_NOME.Caption; // Se não form CPF e não for em branco // Vai salvar no CPF o que está no frmPDV.LB_CPF.Caption end else begin // Mas, se for CPF então faz Dest.CNPJCPF := '', ai não imprime mesmo Dest.CNPJCPF := ''; Dest.xNome := ''; end;

Importante anexar o xml, somente pela imagem não será possível saber exatamente o que está ocorrendo.

Bom dia. Penso que é melhor você criar um instalador próprio seu, com base no instalador oficial do ACBr. Antes porem, deixe o instalador do ACBr intacto, adicionando nele apenas as suas classes, assim, quando você compilar este "seu" instalador, não muda em nada o ACBr, e, de quebra compila as atualizações alem das suas classes.

Bom dia. Eu desenvolvi a muito tempo atras um software para ler o peso de uma balança Filizola 80T, mas, não quero lhe desanimar, só consegui depois de dentro da minha aplicação chamar o arquivo lepeso.exe da própria Filizola, e, diga-se de passagem ficava obrigatoriamente na raiz do so, c:\, não poderia ser outra unidade. Depois de chamar este arquivo, dai eu fazia a leitura dos dados gerados no arquivo peso.txt ou lepeso.txt não me lembro exatamente qual era o nome. Não sei por qual motivo não consegui realizar a leitura diretamente na porta COM, acredito que tem algo a mais que a filizola não passa. Att.

Quem sabe existe algo neste tópico que lhe ajude! http://www.projetoacbr.com.br/forum/topic/17611-acbrnfc-e-requisi%C3%A7%C3%A3o-n%C3%A3o-enviada/ Pode ser que seja algum dos motivos nele discutido. att.

Exatamente como o Regys e o Juliomar informaram. Porem no item 11, no link informado, está expresso: "11. O contribuinte que optar pela NFC-e de forma voluntária poderá utilizar também o Cupom Fiscal por meio do ECF ou a Nota Fiscal Modelo 2? Enquanto não sobrevier a obrigatoriedade prevista no artigo 27 da Portaria CAT 147/2012, o contribuinte poderá utilizar os documentos fiscais Cupom Fiscal por meio do ECF ou a Nota Fiscal Modelo 2, porém se optar por utilizar a NFC-e em algum dos pontos de venda do estabelecimento deverá ter o SAT como contingência." Observe que o termo Deverá é no sentido de obrigatoriedade, e não de opcionalidade. Att.

Bom dia. Quanto à alteração na tributação do produto, este pode e deve ser feita o quanto antes. Após a devida alteração, é necessário que o “contador” faça um levantamento do quantum foi realmente pago ao fisco e, através de um processo administrativo pedir a restituição do valor indevidamente pago. Tal procedimento é simples sem grandes complicações, no próprio Código Tributário Nacional há essa previsão, denominado “Repetição do Indébito” estabelecida em seu Art. 168, in verbis: “Art. 165. O sujeito passivo tem direito, independentemente de prévio protesto, à restituição total ou parcial dotributo, seja qual for a modalidade do seu pagamento, ressalvado o disposto no § 4º do artigo 162, nos seguintes casos: I - cobrança ou pagamento espontâneo de tributo indevido ou maior que o devido em face da legislação tributária aplicável, ou da natureza ou circunstâncias materiais do fato gerador efetivamente ocorrido; II - erro na edificação do sujeito passivo, na determinação da alíquota aplicável, no cálculo do montante do débito ou na elaboração ou conferência de qualquer documento relativo ao pagamento; III - reforma, anulação, revogação ou rescisão de decisão condenatória”. grifei. Att.

Igor bom dia. Não. O estado não mudou a base de cálculo, adicionou o FCP à alíquota estadual. " Quando houver a incidência do adicional de alíquota previsto no § 1º do art. 82 do ADCT (2%), denominado neste estado de Fundo de Erradicação da Miséria (FEM), o valor do adicional será calculado juntamente com o ICMS relativo ao diferencial de alíquota, conforme afirmado acima" O que é vedado pela Constituição Federal Brasileira. Observe que, o FCP passou a chamar-se FEM, isso é meio não idôneo para sangrar aos contribuintes, visto que, o disposto na Orientação Tributária disponível em http://www.fazenda.mg.gov.br/empresas/legislacao_tributaria/orientacao/orientacao_002_2016.pdf, estabelece no tópico 1.3.1 item 1º que, deve ser excluído do valor da operação o diferencial de alíquota, perfeito! Se não fosse os tópicos seguintes. Veja o tópico 3. "Aplicar a alíquota interna a consumidor final estabelecida para a mercadoria neste Estado sobre a base de cálculo do diferencial de alíquota acima citada, inclusive o adicional de alíquota previsto no § 1º do art. 82 do ADCT, quando houver, de forma que o valor do imposto devido a este Estado será a diferença positiva entre o resultado do cálculo demonstrado e a parcela do imposto devida à unidade da Federação de origem, correspondente à utilização da alíquota interestadual". Ora, estamos diante de um contrassenso e o que é pior, esta orientação deve ser objeto de questionamento judicial uma vez que, é contrária à norma federal em especial do CTN, descumpre a Constituição Federal em matéria Tributária e, alem de tudo é contraditória, no seu escopo. Por estes motivos, é que penso que, apesar de ter competência legislativa plena naquilo que a união não disciplinar, o estado não pode contrariar norma Federal. Agora eu fico imaginando. Para é que serve as tão famosas Federações do Comércio, Federação das Indústrias, Ministério Público, CDL, em fim, um monte de entidades que, a meu ver se não existissem certamente não seria necessário a edição de normas mirabolantes para tapar crateras financeiras criadas por administrações desastrosas e sem nenhum planejamento.