Jump to content
Notícias do ACBr

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png

consultoria_sticker.png

Conteúdo para desenvolvedores
 ao vivo de terça a quinta!
Saiba mais

dev.png

logo_acbr_paygo.png

TEF ACBr PayGo
Seja um revendedor e ofereça uma solução completa para seu cliente.


botao.png

beneficios.png

julioaguilar

Membros
  • Content Count

    32
  • Joined

  • Last visited

  • Days Won

    1

julioaguilar last won the day on April 2 2016

julioaguilar had the most liked content!

Community Reputation

9 Neutral

About julioaguilar

  • Rank
    Membro
  • Birthday 07/31/1882

Profile Information

  • Sexo
    Masculino
  • Location
    Marília

Recent Profile Visitors

1,225 profile views
  1. Está ocorrendo erro na validação do MDF-e mesmo informando um valor válido na latitude e na longitude (tags: infLocalCarrega, infLocalCarrega, infLocalDescarrega e infLocalDescarrega) TAG: latitude (Latitude) - Tamanho maior que o máximo permitido [-22,186414]. TAG: longitude (Longitude) - Tamanho maior que o máximo permitido [-49,934715]. TAG: latitude (Latitude) - Tamanho maior que o máximo permitido [-22,212769]. TAG: longitude (Longitude) - Tamanho maior que o máximo permitido [-49,666054]. O erro ocorre pois na unit pmdfeMDFeW quando chama a procedure: Gerador.
  2. Está ocorrendo o seguinte erro na impressão da inutilização da numeração do CT-e com o Fastreport. "Access violation at address ..." Para corrigir alterei a unit ACBrCTeDACTEFR e modifiquei o arquivo DACTE_INUTILIZACAO.fr3 utilizado para a impressão do mesmo. Segue em anexo os arquivos com as alterações: ACBrCTeDACTEFR.pas DACTE_INUTILIZACAO.fr3 xml de inutilização para teste: teste-ProcInutCTe.xml
  3. No Delphi 2010 o trecho de código abaixo não funciona: {$IFDEF CompilerVersion >= 18} //Delphi 2006+ vRows.StrictDelimiter := True; vRows.DelimitedText := AString; {$ELSE} vRows.DelimitedText := '"' + StringReplace(AString, ADelimiter, '"' + ADelimiter + '"', [rfReplaceAll]) + '"'; {$ENDIF} Está entrando no else, mesmo com o CompilerVersion sendo 21.0. Se alterar a diretiva de compilação para "{$IF CompilerVersion >= 18}" ai passa a funcionar. Ainda não descobri o motivo, se alguém souber poderia explicar a diferença entre {$IFDEF} e {$IF} no Delphi 2010.
  4. Fiz o teste e está tudo ok, muito obrigado Ítalo.
  5. Ao carregar o arquivo xml em anexo e transmitir ocorre o erro “Rejeição: IE do Remetente não informada”. Verificando o código do Acbr na unit pcteCTeW em GerarRem no seguinte trecho if (Trim(CTe.Rem.IE) <> '') then begin if (CTe.infCTe.versao >= 3) then begin if (CTe.ide.Toma03.Toma = tmRemetente) then begin if (CTe.ide.indIEToma <> inNaoContribuinte) then GeraIE; end else GeraIE; end else GeraIE; end; Nesse meu caso está ocorrendo a seguinte situação: O tomador do serviço é outros
  6. Ao utilizar a função BuscarPorCEP do componente TACBrCEP, utilizando o WebService dos correios não está retornando o código do IBGE do município (IBGE_Municipio). ACBrCEP.WebService := wsCorreios; ACBrCEP.BuscarPorCEP('05048000'); Possível solução: Quando o componente busca o código do IBGE na unit "ACBrIBGE" em "HTTPGet(CIBGE_URL + '?nome='+Param ) ;" a constante CIBGE_URL está definida com o valor "http://www.ibge.gov.br/home/geociencias/areaterritorial/area.php", se mudar de http para https, passa a retornar corretamente o código do IBGE.
  7. Testei com o DANFeRetratoNovo.fr3 e também ocorre o erro. Segue em anexo o DANF em pdf e xml. 35161201055651000141550010007282741000001016-nfe.xml Danfe.pdf
  8. Alterei somente o arquivo DANFeRetrato.fr3. Segue em anexo. DANFeRetrato.fr3
  9. Na impressão do DANFE, quando a NF-e possui apuração de ICMS e IPI os valores da alíquota estão saindo errado (ver imagem em anexo). No meu caso a alíquota do ICMS é 12,00% e do IPI 10,00%. Obs: Não sei se está correto mas resolvi da seguinte forma: Os valores impressos nos campos PICMS e PIPI já estão formatados, removi a formatação nos MemoView Memo144 e Memo145 do layout do fast (DANFeRetrato.fr3) e passou a imprimir corretamente.
  10. Estou tentando carregar um xml (CF-e-SAT), para o componente do Acbr (TACBrSAT) e não está carregando os itens. Percebi que na tag <det nItem> do meu xml o valor está com 0 (zero) a esquerda (ex: <det nItem="001">), por esse motivo não carrega os itens. Na unit pcnCFeR na função LerXml está utilizando o seguinte trecho de código para extrair os itens: Leitor.rExtrai(1, 'det nItem=' + Aspas + IntToStr(nItem) + Aspas, 'det'); // Linha 195 ele não encontra o item pq está passando como parâmetro em rExtrai o valor "1" (IntToStr(nItem)) que é direrente
  11. Tem razão Régys Silveira, estava utilizando o Trunk1, fiz a migração do meu projeto para o Trunk2 e está correto. Muito obrigado.
  12. Sim, estou setando a propriedade FastFileEvento, mas repare que na hora de verificar se a extensão do arquivo é fr3, está utilizando no método "copy" a propriedade FastFile e não a FastFileEvent, que seria o correto. "if not (uppercase(copy(FastFile,length(FastFileEvento)-3,4))='.FR3') then" O erro acontece quando imprimo o DANF e em seguida a carta de Correção. Tente passar a propriedade FastFile e FastFileEvent com caminho diferentes.
×
×
  • Create New...