Ir para conteúdo
  • Cadastre-se

ramsolution

Membros Pro
  • Total de ítens

    38
  • Registro em

  • Última visita

Tudo que ramsolution postou

  1. Boa noite, removi tudo e reinstalei, porem automático não deu certo pelo Acbr install, tive que realizar a instalação dos pacotes manualmente, mas deu certo. Obrigado pela ajuda!
  2. Não recompilei com o ACBrInstall, vou fazer, não vai perder nada? Apenas confirmado a pergunta anterior, utilizando o demo tb, N02|0|00|3|100.00|18.0000|18.00 Erro ao compilar o pacote "ACBr_synapse.dpk". Abortando... Ocorreram erros na compilação dos pacotes.
  3. Uma coisa que notei é o .dcu deste arquivo ainda está com a data antiga, normal? Isso mesmo?
  4. Boa tarde, Está assim. Gerador.wCampo(tcDe2, 'NA09', 'pICMSInter ', 01, 05, 1, nfe.Det.Imposto.ICMSUFDest.pICMSInter, DSC_PICMSINTER); Obrigado
  5. Bom dia, já realizei a pasta ACBr e o fonte pcnNFeW ficou com a data hoje mas mesmo assim continua gerando o XML com o campo pICMSInter formatado em 4 casas decimais. Tem alguma solução sem ter que reinstalar o pacote ACBr? "Falha na validação dos dados da nota: 99 '12.0000' violates enumeration constraint of '4.00 7.00 12.00'. The element '{http://www.portalfiscal.inf.br/nfe}pICMSInter' with value '12.0000' failed to parse." Obrigado .
  6. Bom dia, não utilizo o acbr plus, segue abaixo meu código. Realizei a atualização do repositório no dia 20/01/2016. with ACBrNFe1.NotasFiscais.Items[n].NFe.Det.Items[t].Imposto.ICMSUFDest do begin ACBrNFe1.NotasFiscais.Items[n].NFe.Det.Items[t].Imposto.ICMSUFDest.vBCUFDest := FormatarFloat(CasasDecimaisNFe,ACBrNFe1.NotasFiscais.Items[n].NFe.Det.Items[t].Prod.vProd); ACBrNFe1.NotasFiscais.Items[n].NFe.Det.Items[t].Imposto.ICMSUFDest.pFCPUFDest := FormatarFloat(2,CDS_UF_IMP.FieldByName('pFCPUFDest').AsFloat); ACBrNFe1.NotasFiscais.Items[n].NFe.Det.Items[t].Imposto.ICMSUFDest.pICMSUFDest := FormatarFloat(2,CDS_UF_IMP.FieldByName('PICMSUFDEST').AsFloat); ACBrNFe1.NotasFiscais.Items[n].NFe.Det.Items[t].Imposto.ICMSUFDest.pICMSInter := FormatarFloat(2,CDS_UF_IMP.FieldByName('PICMSINTER').AsFloat); //Percentual provisório de partilha do ICMS Interestadual if StrToInt(FormatDateTime('yyyy',CDSNF.FieldByName('NF_EMISSAO').AsDateTime)) = 2016 then ACBrNFe1.NotasFiscais.Items[n].NFe.Det.Items[t].Imposto.ICMSUFDest.pICMSInterPart := 40; if StrToInt(FormatDateTime('yyyy',CDSNF.FieldByName('NF_EMISSAO').AsDateTime)) = 2017 then ACBrNFe1.NotasFiscais.Items[n].NFe.Det.Items[t].Imposto.ICMSUFDest.pICMSInterPart := 60; if StrToInt(FormatDateTime('yyyy',CDSNF.FieldByName('NF_EMISSAO').AsDateTime)) = 2018 then ACBrNFe1.NotasFiscais.Items[n].NFe.Det.Items[t].Imposto.ICMSUFDest.pICMSInterPart := 80; if StrToInt(FormatDateTime('yyyy',CDSNF.FieldByName('NF_EMISSAO').AsDateTime)) >= 2019 then ACBrNFe1.NotasFiscais.Items[n].NFe.Det.Items[t].Imposto.ICMSUFDest.pICMSInterPart := 100; //Valor do ICMS relativo ao Fundo de Combate à Pobreza (FCP) da UF de destino if ACBrNFe1.NotasFiscais.Items[n].NFe.Det.Items[t].Imposto.ICMSUFDest.pFCPUFDest > 0 then ACBrNFe1.NotasFiscais.Items[n].NFe.Det.Items[t].Imposto.ICMSUFDest.vFCPUFDest := (ACBrNFe1.NotasFiscais.Items[n].NFe.Det.Items[t].Imposto.ICMSUFDest.pFCPUFDest/100)*FormatarFloat(CasasDecimaisNFe,ACBrNFe1.NotasFiscais.Items[n].NFe.Det.Items[t].Prod.vProd); //Valor do ICMS Interestadual para a UF de destino ACBrNFe1.NotasFiscais.Items[n].NFe.Det.Items[t].Imposto.ICMSUFDest.vICMSUFDest := (FormatarFloat(CasasDecimaisNFe,ACBrNFe1.NotasFiscais.Items[n].NFe.Det.Items[t].Prod.vProd)*((ACBrNFe1.NotasFiscais.Items[n].NFe.Det.Items[t].Imposto.ICMSUFDest.PICMSUFDEST-ACBrNFe1.NotasFiscais.Items[n].NFe.Det.Items[t].Imposto.ICMSUFDest.PICMSINTER)/100)*(ACBrNFe1.NotasFiscais.Items[n].NFe.Det.Items[t].Imposto.ICMSUFDest.pICMSInterPart/100))+ACBrNFe1.NotasFiscais.Items[n].NFe.Det.Items[t].Imposto.ICMSUFDest.vFCPUFDest; //Valor do ICMS Interestadual para a UF do remetente if StrToInt(FormatDateTime('yyyy',CDSNF.FieldByName('NF_EMISSAO').AsDateTime)) < 2019 then ACBrNFe1.NotasFiscais.Items[n].NFe.Det.Items[t].Imposto.ICMSUFDest.vICMSUFRemet := (FormatarFloat(CasasDecimaisNFe,ACBrNFe1.NotasFiscais.Items[n].NFe.Det.Items[t].Prod.vProd)*((ACBrNFe1.NotasFiscais.Items[n].NFe.Det.Items[t].Imposto.ICMSUFDest.PICMSUFDEST-ACBrNFe1.NotasFiscais.Items[n].NFe.Det.Items[t].Imposto.ICMSUFDest.PICMSINTER)/100)*(1-(ACBrNFe1.NotasFiscais.Items[n].NFe.Det.Items[t].Imposto.ICMSUFDest.pICMSInterPart/100))) else ACBrNFe1.NotasFiscais.Items[n].NFe.Det.Items[t].Imposto.ICMSUFDest.vICMSUFRemet := 0; ACBrNFe1.NotasFiscais.Items[n].NFe.Total.ICMSTot.vFCPUFDest := ACBrNFe1.NotasFiscais.Items[n].NFe.Total.ICMSTot.vFCPUFDest + ACBrNFe1.NotasFiscais.Items[n].NFe.Det.Items[t].Imposto.ICMSUFDest.vFCPUFDest; ACBrNFe1.NotasFiscais.Items[n].NFe.Total.ICMSTot.vICMSUFDest := ACBrNFe1.NotasFiscais.Items[n].NFe.Total.ICMSTot.vICMSUFDest + ACBrNFe1.NotasFiscais.Items[n].NFe.Det.Items[t].Imposto.ICMSUFDest.vICMSUFDest; ACBrNFe1.NotasFiscais.Items[n].NFe.Total.ICMSTot.vICMSUFRemet := ACBrNFe1.NotasFiscais.Items[n].NFe.Total.ICMSTot.vICMSUFRemet + ACBrNFe1.NotasFiscais.Items[n].NFe.Det.Items[t].Imposto.ICMSUFDest.vICMSUFRemet; end;
  7. Olá pessoal, já realizei o update da pasta ACBr mas mesmo assim estou com erro no campo <pICMSInter>12.0000</pICMSInter, está gerando com 4 dígitos. Tem algum lugar para alterar manualmente? Obrigado Rodrigo
  8. Olá pessoal, estou precisando de uma ajuda. Estou realizando um projeto aqui na empresa e preciso saber se é possível imprimir na Impressora Zebra ZT410 - 203 DPI código DataMatrix? Se sim, possível, como? Obrigado.
  9. Olá pessoal, resolvido! Criei um item como complemento de icms, preenchi a base de calculo e valor icms, qtd = 0, unitário = 0. Transmitido e autorizado. Obrigado.
  10. Olá, estou tentando transmitir uma NFe na versão 3.10, nota fiscal de complemento de valor porém esta dando o erro "total is unexpected according to content model of parent element" '{http://................../nfe}infNfe'. Estou com os arquivos de schemas atualizados. Segue em anexo xml e print. Alguém já passou por este erro. 35150414027308000135550010000000081000000081-nfe.xml
  11. Consegui obrigado pela ajuda. Também tive que remover do Path o caminho do XE5. Obrigado mesmo Régys!
  12. Olá, Régys isso mesmo, encontrei os arquivos na pasta bpl dentro de projetos da pasta delphi 7, removi e agora o erro mudou segue abaixo. O que posso realizar para ajustar? Obrigado! [Error] pcnNFeW.pas(749): Undeclared identifier: 'ValidaNVE' [Error] pcnNFeW.pas(779): Undeclared identifier: 'ValidaRECOPI' [Error] pcnNFeW.pas(793): Undeclared identifier: 'ValidaDIDSI' [Error] pcnNFeW.pas(835): Undeclared identifier: 'ValidaDrawback' [Error] pcnNFeW.pas(852): Undeclared identifier: 'ValidaDrawback' [Error] pcnNFeW.pas(859): Undeclared identifier: 'ValidaRE' [Fatal Error] PCN2.dpk(70): Could not compile used unit '..\..\..\Fontes\PCN2\pcnNFeW.pas'
  13. Boa tarde, estou com o mesmo erro, já deletei a pasta Acbr para realizar o download de todos os fontes atualizados mas mesmo assim esta dando o erro: [Error] ACBrNFeConfiguracoes.pas(138): Undeclared identifier: 'TpcnVersaoDF' [Error] ACBrNFeConfiguracoes.pas(163): Undeclared identifier: 've200' [Fatal Error] ACBrNFe.pas(53): Could not compile used unit 'pcnCCeNFe.pas' O que devo realizar? Só falta instalar o componente AcbrNFe e o CTe. Obrigado Rodrigo
×
×
  • 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.