Ir para conteúdo
  • Cadastre-se

windsoft

Membro Pro Verificado
  • Total de ítens

    422
  • Registro em

  • Última visita

  • Days Won

    1

Tudo que windsoft postou

  1. Tente rodar o apagaracbr.bat como administrador e depois tente instalar novamente.
  2. Se eu entendi sua pergunta. Sim você continua a numeração a partir do último número emitido em produção em qualquer outro sistema. Seja no emissor gratuito ou outro qualquer.
  3. Erro de IE não vinculado é porque a IE do destinatário realmente não pertence ao CNPJ. Faça uma consulta no Integra e verifique.
  4. Verifique como você está preenchendo o campo: Ide.IndPag Veja o exemplo abaixo: if ( cdsImpressaoNFCODVENC.AsString = '1' ) then // a Vista Ide.indPag := ipVista else if ( cdsImpressaoNFCODVENC.AsString = '2' ) then // a Prazo Ide.indPag := ipPrazo else Ide.indPag := ipOutras;
  5. Olá microdelta você percebeu que você está passando o valor unitário do produto utilizando a função round? Se o valor unitário for igual a 10,30 por exemplo a função round vai retornar apenas 10.00 Acredito que ai esteja o problema.
  6. Valeu meu amigo, boa noite!
  7. Na impressão do Danfe em fastreport não está sendo exibida a mensagem de DENEGAÇÃO DE USO quando o status da NFe é 301,302 ou 303, somente quando é 110. Fiz a alteração no trecho de código abaixo que resolveu o problema. if not (FNFe.Ide.tpEmis in [teContingencia, teFSDA, teSVCAN, teSVCRS, teSVCSP]) then begin //prioridade para opção NFeCancelada if (FDANFEClassOwner.NFeCancelada) or ((DFeUtil.NaoEstaVazio(FNFe.procNFe.nProt)) and (FNFe.procNFe.cStat in [101,151,155])) then FieldByName('Mensagem0').AsString := 'NFe Cancelada' else if ( FNFe.procNFe.cStat = 110 ) or ( FNFe.procNFe.cStat = 301 ) or ( FNFe.procNFe.cStat = 302 ) or ( FNFe.procNFe.cStat = 303 ) then FieldByName('Mensagem0').AsString := 'NFe denegada pelo Fisco' else if ((DFeUtil.EstaVazio(FDANFEClassOwner.ProtocoloNFe)) and (DFeUtil.EstaVazio(FNFe.procNFe.nProt))) then FieldByName('Mensagem0').AsString := 'NFe sem Autorização de Uso da SEFAZ' else if (FNFe.Ide.tpImp = tiSimplificado) then FieldByName('Mensagem0').AsString := 'EMISSÃO NORMAL' else FieldByName('Mensagem0').AsString := ''; end else FieldByName('Mensagem0').AsString := ''; A unit corrigida está anexo. Por favor disponibilizem esta correção no repositório para toda comunidade. Abraço e obrigado a todos. ACBrNFeDANFEFRDM.pas
  8. Opa esta foi rápida hein! Abraço
  9. Olá amigos boa tarde! Encontrei um pequeno problema na impressao de eventos utilizando fastreport. Ao pedir a impressão do evento em PRODUÇÃO aparece a mensagem: Variável ou campo de dados desconhecido HOMOLOGACAO, percebi que na unit ACBrCTeDACTEFRDM é passado uma variável chamada HOMOLOGACAO como True quando o evento está no ambiente de homologação, mas esta variável não é passada quando está em produção, ocasionando o erro. Para corrigir o problema alterei as seguintes linhas de código: case InfEvento.tpAmb of taProducao: begin FieldByName('tpAmb').AsString := 'PRODUÇÃO'; frxReport.Variables['HOMOLOGACAO'] := False; end; taHomologacao: begin FieldByName('tpAmb').AsString := 'HOMOLOGAÇÃO - SEM VALOR FISCAL'; frxReport.Variables['HOMOLOGACAO'] := True; end; end; e case InfEvento.tpAmb of taProducao: begin FieldByName('tpAmb').AsString := 'PRODUÇÃO'; frxReport.Variables['HOMOLOGACAO'] := False; end; taHomologacao: begin FieldByName('tpAmb').AsString := 'HOMOLOGAÇÃO - SEM VALOR FISCAL'; frxReport.Variables['HOMOLOGACAO'] := True; end; end; A unit corrigida está anexo. Por favor disponibilizem esta correção no repositório para toda comunidade. Abraço e obrigado a todos. ACBrCTeDACTEFRDM.pas
  10. Desculpem pessoal, ignorem este post. Observei melhor e verifiquei que a correção já está aplicada.
  11. Apos o commit da revisão 7791 realizada pelo Regys o arquivo DanfeRetrato.fr3 ficou com um BUG, ao tentar abrir o arquivo FR3 apresenta o erro: "The following erros(s) have occured: Cannot find class Datasets Cannot find class Formats Cannot find class Variables" Se você abrir o arquivo e salva-lo novamente ele resolve o problema mas ao tentar imprimir uma NF ocorre o erro: "memWatermark: Erro na expressão 'Parametros."Mensagem0": Identifier expected" Fazendo o revert para a revisão anterior: 7513 o problema foi resolvido. Um abraço e obrigado
  12. Olá Ragys, que honra receber uma resposta sua. Sou seu seguidor e fã. Testei em 3 computadores diferentes com 3 impressoras bematech Mp2100TH distintas. Todos os computadores rodando Win7 32 bits, UAC desativado, usuário administrador, DLLs registradas (utilizando o registra.bat) etc. A única pista que tenho é o arquivo de log gerado pela DLL da bematech (anexo) em que aparece erro na dll sign_bema.dll, mas a dll está na mesma pasta do aplicativo, atualizada e não há nenhuma outra versão no system32 ou outra pasta. BemaFI32-20140416.zip
  13. Olá pessoal, eu também estou tendo o mesmo problema relatado pelo nosso amigo. Quando utilizo a função gerar PafMF_GerarCAT52 gera os arquivos mas fora da pasta indicada, quando utilizo a função PafMF_MFD_Cotepe1704 ele gera o arquivo DOWNLOAD.MFD mas apresenta o erro "Erro ao executar xBematech_FI_ArquivoMFDPath" Já excluí todas as DLLs, INI, da pasta system32, verifiquei se havia alguma outra copia em qualquer outra pasta, estou utilizando a versão atualizada das dlls incluidas na pasta de instalação do ACBr. Pesquisei hoje a manhã toda no forum mas não encontrei nada, isso que me deixa mais intrigado. Estou utilizando apenas o componente ACBrECF, não estou utilizando nenhum outro componente (RFD, EAD ou outro). Quem puder me dar uma luz será muito bem vinda.
  14. Valeu Ítalo, acho que esta realmente é a única solução. Abraço e muito obrigado pela atenção mais uma vez. Agora que reparei, somos quase vizinhos ne?
  15. Olá Italo, obrigado pela ajuda. Neste caso não posso carregar no componente ao mesmo tempo, notas canceladas e não canceladas então? Att.
  16. Desculpe se for ignorancia minha, mas ainda não entendi como fazer para na impressão da NF voltar a sair a tarja de NFe cancelada. Alguem poderia me ajudar passando um exemplo de código? Na consulta da NFe já consegui verificar se ela possui evento de cancelamento e capturar o status (101) no caso de cancelemtno homologado, pegando como base o exemplo do amigo renato.pavan, mas ainda não consegui fazer com que a nf volte a aparecer como cancelada, e nem que o componente exporte os XMLs cancelados na pasta canceladas, pois como o cStat fica como 100 ele exporta a nota como autorizada. Agradeço pela atenção de todos.
  17. Isaque eu conheço bem o fastreport apesar de não utiliza-lo com o ACBr, na pasta \ACBr\Exemplos\ACBrNFe2\Delphi\Report não há nenhum arquivo com o mesmo nome que o nazarenoneto enviou "DANFeRetrato.fr3" mesmo assim eu comparei o arquivo que o nazarenoneto enviou com os arquivos existentes na pasta e o SVN me mostra muitas alterações no arquivo. Acabei ficando inseguro em validar o arquivo, me parece que os arquivos que estão na pasta do ACBR foram feitos com a versão 4.12 do FastReport enquanto o arquivo enviado pelo nazarenoneto está na versão 4.13, talvez seja por isso que o SVN acusa tantas modificações no arquivo. Abraço
  18. André, eu postei a correção acima conforme eu acredito estar certo, peço que você verifique se realmente eu tenho razão. Peço desculpas pela insistência mas o meu intuito é sempre colaborar com projeto como tenho sempre feito. Por isso não adotei simplesmente a solução de corrigir nos meus fontes. Agradeço pela atenção e coloco-me sempre à disposição no que for necessário.
  19. Na realidade ele está calculando sobre o valor total dos produtos, a coincidencia do percentual com o valor é porque no meu exemplo eu utilizei o valor de R$ 100,00 Abraço e obrigado pela atenção.
  20. Isaque obrigado pela atenção: Segue abaixo as linhas que precisam ser corrigidas no ACBrDANFeCBRavePaisagem.pas a partir da linha 859 if Total.ICMSTot.vTotTrib <> 0 then begin lVTotTrib :=DFeUtil.FormatFloat(Total.ICMSTot.vTotTrib); lVTotTrib :=lVTotTrib + '('+DFeUtil.FormatFloat((Total.ICMSTot.vTotTrib*100)/( Total.ICMSTot.VProd - Total.ICMSTot.VDesc ))+'%)'; Box([fsLeft],XPos,YPos,(x*4),aHeigthPadrao,'Val. Aprox. Tributos',lVTotTrib,taRightJustify); end; Já no ACBrDANFeCBRaveRetrato.pas a partir da linha 841 if Total.ICMSTot.vTotTrib <> 0 then begin lVTotTrib :=DFeUtil.FormatFloat(Total.ICMSTot.vTotTrib); lVTotTrib :=lVTotTrib + '('+DFeUtil.FormatFloat((Total.ICMSTot.vTotTrib*100)/( Total.ICMSTot.VProd - Total.ICMSTot.VDesc ))+'%)'; Box([fsLeft],XPos,YPos,(x*4),aHeigthPadrao,'Val. Aprox. Tributos',lVTotTrib,taRightJustify); end; O Danfe para fastreport está com o mesmo problema.
  21. Isaque e André, cara desculpe a insistência. Mas eu estou afirmando exatamente o que vocês afirmaram. O percentual médio deve ser calculado sobre o valor líquido e o ACBr está calculando sobre o valor bruto sem o desconto. Se eu tenho uma venda de R$ 100,00 eu pago R$ 29,84 Se eu tenho uma venda de R$ 90,00 eu pago R$ 26,86 Mas o percentual de impostos pagos, a carga tributária, é a mesma independente do valor da venda, ou seja, o percentual deve permanecer nos mesmos 29,84% não é isso?
  22. Olá Juliana, agora ficou perfeito. Obrigado! Obrigado Régys eu não tinha visto o tópico sobre a mudança do SVN. Um abraço
  23. Olá Regys aí você chegou onde eu queria, ele considera o campo Total.vTotTrib e aplica em cima do valor total, o correto seria em cima do valor dos produtos - o desconto. Faça um teste: Emita uma NF e coloque o valor de R$ 100,00 e escolha um produto qualquer (no meu caso utilizei um produto nacional com NCM 84672200), no meu caso a carga tributária na tabela IBPT foi de 29,84% no campo "Val.Aproximado do imposto" está informado o valor de R$ 29,84 e o ACBR calculou o percentual de 29,84% corretamente. Altere esta NF e conceda um desconto de R$ 10,00, o valor total da NF será de R$ 90,00 o valor da carga tributária será de R$ 26,86 e a carga tributária em percentual será de 26,86% o correto seria 29,84% como na nota anterior. Estou enviando anexo os arquivos de exemplo tanto em XML quanto em PDF para você dar uma olhada. Abraço e obrigado pela atenção Exemplo1.pdf Exemplo2.pdf Exemplo1.xml Exemplo2.xml
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.