Ir para conteúdo
  • Cadastre-se

Léo

Membros Pro
  • Total de ítens

    131
  • Registro em

  • Última visita

Tudo que Léo postou

  1. Boa tarde Juliomar !, Tive este mesmo problema e resolvi com a seguinte alteração abaixo, comentando a parte em vermelho e incluindo o comando em azul, veja abaixo parte do codigo EnviarEmailEvento da unit ACBrNFe: segue anexo unit ACBrNFe.pas, para analise e posterior versionamento para correção deste problema. // AnexosEmail.Add(''); if (EnviaPDF) then begin if DANFE <> nil then begin ImprimirEventoPDF; // NomeArq := StringReplace(EventoNFe.Evento[0].InfEvento.id,'ID', '', [rfIgnoreCase]); { NomeArq := Copy(EventoNFe.Evento[0].InfEvento.id, 09, 44) + Copy(EventoNFe.Evento[0].InfEvento.id, 03, 06) + Copy(EventoNFe.Evento[0].InfEvento.id, 53, 02); } NomeArq := Copy(EventoNFe.Evento[0].InfEvento.id, 3, 52); NomeArq := PathWithDelim(DANFE.PathPDF)+NomeArq+'evento.pdf'; AnexosEmail.Add(NomeArq); end; end; ACBrNFe.pas
  2. Bom dia italojjr !, Segue solução para isso abaixo: fiz a alteração nas seguintes linhas da unit ACBrNFeDANFEFRDM.pas na procedure CarregaFatura abaixo marcadas em azul. gostaria que os moderadores analisem a alteração que fiz e submetam para que na proxima atualização não apresente o mesmo problema. com esta alteração resolve o problema citado acima. OBS:FIZ ESTA ALTERAÇÃO PARA O FASTREPORT, MAS ACREDITO QUE SERVE PARA AS OUTRAS VERSÕES. procedure TdmACBrNFeFR.CarregaFatura; begin with cdsFatura do begin Close; CreateDataSet; if Self.ExibeCampoFatura then //Incluido por Fábio Gabriel - 22/05/2013 begin Append; if FNFe.Ide.indPag = ipVista then FieldByName('Pagamento').AsString := 'PAGAMENTO À VISTA' else if FNFe.Ide.indPag = ipPrazo then FieldByName('Pagamento').AsString := 'PAGAMENTO A PRAZO' else FieldByName('Pagamento').AsString := ''; if DFeUtil.NaoEstaVazio(FNFe.Cobr.Fat.nFat) then begin with FNFe.Cobr.Fat do begin FieldByName('nfat').AsString := nFat; FieldByName('vOrig').AsFloat := DFeUtil.StringToFloatDef(FloatToStr(vOrig), 0); FieldByName('vDesc').AsFloat := DFeUtil.StringToFloatDef(FloatToStr(vDesc), 0); FieldByName('vLiq').AsFloat := DFeUtil.StringToFloatDef(FloatToStr(vLiq), 0); end; end; Post; end; end; end;
  3. Bom dia Franciscon !, É por ai mesmo, para alguns casos, o jeito é fazer várias combinações destes parâmetros até encontrar o ideal para o caso. Para outros casos é mais simples. att. Léo
  4. Bom dia Douglas !, Tenho rodando a minha aplicação com NF-e e NFS-e e CT-e com ACBr em todas as versões do windows e consegui resolver os casos do retorno vazio com aquelas configurações do Painel de controle que citei acima. em alguns casos tive que marcar e desmarcar fazer várias tentativas e tal, mas sempre consegui resolver. já tentou fazer alguns testes com a aplicação exemplo do ACBr ?. att. Léo
  5. Douglaswf, você verificou na pasta logs se retornou alguma mensagem do webservice ?
  6. Somente a titulo de informação o SEFAZ PR, voltou a operar normalmente.
  7. Bom dia AlexandreADC, para o seu caso de retorno vazio tente o seguinte: No Painel de Controle "Opções da Internet" clique na aba "Avançadas" desça a barra de rolagem até o fim. - desmarque "Verificar revogação de certificados do servidor*" - desmarque "Verificar se há revogação de certificados do editor". - desmarque "usar SSL 3.0" caso esteja marcado - marque "usar SSL 2.0" caso não esteja marcado, - marque "usar TLS 1.0" caso não esteja marcado,
  8. Bom dia !, No caso do Paraná, eles não estão autorizando "Temporariamente", retorna na consulta logo após o envio. mas o status de retorno do ACBr está retornando "0" (Zero).
  9. Realmente anfm, É isso mesmo que está acontecendo, eu estava populando o campo "NFe.Emit.EnderEmit.xPais" , com o conteúdo do campo pais do meu cadastro de empresa, mas ele estáva vazio. Acabou o Mistério. Obrigado anfm.
  10. Estou gerando o ORIGINAL pelo ACBr sim. por isso que é estranho. Como é feito: É criado e autorizado o arquivo pelo ACBr, quando recebo o retorno do xml do SEFAZ OK, salvo no meu BD, quando eu vou enviar o email recupero do BD pela função LoadfromString. e executo a função EnviarEmail(). sempre funcionou até alguns dias atrás que alguns clientes começaram a reclamar. Até então estava funcionando ok.
  11. Ola dalpiaze !, Também já testei desta forma que vc sugeriu mas não mudou nada. segue anexo xml´s xml gerado pela função enviarEmail(..): 42140482809666000150550010000005911000005913-NFe.xml xml anexo por mim para enviar juntamente com a função enviaremail(..) NFe42140482809666000150550010000005911000005913nfe.xml
  12. Ola Juliomar !, Acho que o servidor de email não está modificando o anexo, pois fiz o seguinte teste: peguei o xml que tenho gravado no meu Banco de dados e enviei em anexo juntamente com o xml gerado pelo gerado pela função enviaEmail. Resultado: o xml que enviei em anexo está ok, enquanto o xml gerado pela função enviaEmail fica com a "Assinatura Digital Invalida". Obs: o arquivo xml ORIGEM é o mesmo, acredito que o problema está em algum momento quando o ACBr monta o xml novamente. Isto vem acontecendo recentemente.
  13. Bom dia !, O Mesmo problema de "Assinatura Invalida", está acontecendo para mim, com xml gerado e autorizado pelo ACBr, e quando utilizao a função ACBrNFe.NotasFiscais.Items[0].EnviarEmail(...), o cliente recebe o xml com este problema. alguém ja passou por este problema ?.
  14. Bom dia Marildo !, seguinte: o Campo "CRT" que define a Situação tributaria do Emissor. você informa a tag "CRT" ( Possiveis valores = 1-Simples Nacional 2-Simples Nacional Excess sublimite 3-Normal). que não tem nada a ver com a Origem do item o qual sim faz parte juntamento do CSOSN. as possiveis origens de mercadorias ou Produtos são. 0 - Nacional - Exceto as indicadas nos códigos 3 a 5 1 - Estrangeira - Importação direta, exceto a indicada no código 6 2 - Estrangeira - Adquirida no mercado interno, exceto a indicada no código 7| 3 - Nacional - Mercadoria ou bem com Conteúdo de Importação superior a 40%| 4 - Nacional - Cuja produção tenha sido feita em conformidade com os processos produtivos básicos de que tratam as legislações citadas nos Ajustes 5 - Nacional - Mercadoria ou bem com Conteúdo de Importação inferior ou igual a 40% 6 - Estrangeira - Importação direta, sem simular nacional, constante em lista da CAMEX 7 - Estrangeira - Adquirida no mercado interno, sem similar nacional, constante em lista CAMEX então é o seguinte: Quando o enquadramento for (1-Simples Nacional 2-Simples Nacional Excesso sublimite) você utiliza por exemplo: as tags ficam assim o CRT será 1 ou 2 e a orig = 0 o CSOSN = 000 0 - Nacional - Exceto as indicadas nos códigos 3 a 5 + o CSOSN = 0 + 000 1 - Estrangeira - Importação direta, exceto a indicada no código 6 + CSOSN = 1 + 000 e assim por diante Quando o enquadramento for (3-Normal) você utiliza por exemplo: o CRT será 3 a orig = 0 o CST = 00 0 - Nacional - Exceto as indicadas nos códigos 3 a 5 + o CST = 0 + 00 1 - Estrangeira - Importação direta, exceto a indicada no código 6 + CST = 1 + 00 e assim por diante att.
  15. Bom dia Fábio !, De uma olhada neste tópico: e também leia a NT 2012/002. trata desde assunto. att Léo
  16. Ola Fabio !, Não consegui fazer nada falta tempo para fazer estas implementações, mas se você iniciou e se eu puder ajudar conte comigo. att. Léo
  17. Bom dia !, Utilizo o FastReport para gerar o DACTe, mas os eventos ainda não foram implementado para FastReport. estou estudando para implementar. na DANFE para fastReport, tem duas propriedades "FastFile" e "FastFileEvento", mas não encontrei a propriedade "FastFileEvento" no componente DACTE para FastReport. gostaria de saber vai ter um tratamento diferente ou não ?. Léo
  18. Bom dia Italo !, Baixei a atualização e deu certo. Percebi um problema na hora de imprimir o Dacte para FastReport para esta situação. mas vou fazer o ajuste e posto aqui a alteração para vocês analisar. att.
  19. Boa tarde !, Estou com a ultima versão do Componente do ACBrCTe e também dos esquemas da pasta: C:\ACBr\Exemplos\ACBrCTe\Delphi\Schemas\V200 arquivo: PL_CTe_200a_NT2013_013.rar ao validar um CT-e com Tipo CT-e : 0 - Normal Tipo Serviço: 3 - Redespacho Intermediario. e não informar o (infDoc) acusa o seguinte: Conforme o MOC 2.0 a seguinte validação deveria deixar passar. anexo XML Gerado: 42131001799612000159570010000000791000000790-cte.xml
  20. Boa tarde !, Quanto a impressão dos eventos de CC-e e Cancelamento de CT-e ?. para o caso das pessoas que utilizam o FastReport ?. alguém sabe sobre isso ?. Att. Léo
  21. Boa tarde !, Acabei de encontrar o problema, estava descomentado as linhas para utilizar OpenSSL no arquivo ACBR.inc. somente comentei as linhas e funcionou. ja está resolvido. Obrigado !!!.
  22. ao Abrir o Delphi ele apresenta a seguinte mensagem:
  23. Boa tarde ! O Proprio ACBRInstall está criando está pasta "c:\Users\BOITA\Documents\Borland Studio Projects\Bpl\4.0\". a poucos minutos atrás baixei através do SVN o ACBrInstall e executei, ai aprasentou um erro ao compilar o pacote ACBrNFSeDanfseFRpkg.dpk(47) Error: E2199 Packages 'ACBr_NFSe' and 'ACBrOpenSSL' both contain unit 'libxmlsec' ACBrNFSeDanfseFRpkg.dpk(47) Fatal: F2220 Could not compile package 'ACBr_NFSe' segue anexo o log da instalação executado a pouco. log_Delphi_2006.txt
  24. Bom dia !, Pessoal estou com o mesmo problema segui os passos acima descritos pelo Régys, mais não deu certo. o Meu Delphi 2006 é registrado. o windows é 64, e estou executando o ACBrinstall como Administrador. imagem dos erros abaixo: não sei mais o que fazer. por favor alguém me de uma luz. Obrigado.
  25. Bom dia !, Sobre o FCI alguma novidade ? att.
×
×
  • 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.

The popup will be closed in 10 segundos...
The popup will be closed in 10 segundos...