Victor H. Gonzales - Panda

checa se não é alguma informação que você está passando errado, exemplo carteira 017 e passar 17 ou a variação 019 e era 19, dai a string está ficando fora de posição, algo do gênero, isso são exemplos, teria que verificar campo a campo teu para validar se todos estão corretos; Checa todos os campos antecessores se estão com o domínio correto, uso banco do brasil com CNAB400 e não tenho esse problema

Boa tarde, Estou com um arquivo de retorno do Branco do Brasil convenio 7 posições, e ao utilizar o parametro leCedenteRetorno o sistema não está identificando o convenio e está caindo no processamento de 6 posições e não está realizando o processamento do retorno; Na unit ACBrBancoBrasil na procedure TACBrBancoBrasil.LerRetorno400(ARetorno: TStringList) realizei algumas modificações que submeto a moderação avaliar; procedure TACBrBancoBrasil.LerRetorno400(ARetorno: TStringList); var TamConvenioMaior6: Boolean; rConvenioLider : String; begin if ACBrBanco.ACBrBoleto.LeCedenteRetorno then begin if NaoEstaZerado(StrToInt64Def(Copy(ARetorno[0],41,6),0)) then rConvenioLider := Trim(Copy(ARetorno[0],41,6))//CBR643 convenio 6 posicoes else rConvenioLider := Copy(ARetorno[0],150,7); //CBR643 convenio 7 posicoes ACBrBanco.ACBrBoleto.Cedente.Convenio := rConvenioLider; end; TamConvenioMaior6:= Length(trim(ACBrBanco.ACBrBoleto.Cedente.Convenio)) > 6; if TamConvenioMaior6 then LerRetorno400Pos7(ARetorno) else LerRetorno400Pos6(ARetorno); end; Desde já muito obrigado; ACBrBancoBrasil.pas

Boa tarde, Surgiu a demanda na hora da exportação do boleto utilizando fastreport em PDF o sistema gerar com o nome personalizado, exemplo (número da carteira, data hora, nome do cliente,etc) personalizável por parte do consumidor (parametrizável nas configuração do sistema); Desta forma somente usando o filtro fiPDF estava conseguindo chegar no resultado desejado, mas com isso eu não conseguia fazer a pré-visualização, ele gerava o trabalho de pdf diretamente. Então utilização filtro fiNENHUM : 1) Na exportação estava vindo como padrão desmarcado para embarcar as fontes no pdf, assim gerando em alguns máquinas problemas de abertura do arquivo do boleto no leitor de pdf, por mais que no componente acbrboleto estive-se marcado para embarcar; 2) Devido a demanda da personalização do nome do arquivo por runtime e a utilização do filtro fiNENHUM, pois preciso deixar o trabalho de impressora e a pessoa exportar manualmente, precisei alterar o arquivo ACBrBoletoFCFR. ficando as linhas 334 : fiNenhum: begin if (MostrarPreview) and (not FModoThread) then begin frxPDFExport.Keywords := frxPDFExport.Title; frxPDFExport.Background := IncorporarBackgroundPdf;//False diminui 70% do tamanho do pdf frxPDFExport.EmbeddedFonts := IncorporarFontesPdf; frxReport.Engine.Report.FileName := NomeArquivo; //nome do arquivo a ser exportado frxReport.ShowReport(false) end else frxReport.Print; end; Estou enviando o arquivo para apreciação e verificação da moderação; Grato desde já; ACBrBoletoFCFR.pas

Boa tarde, Existe como "manipular" o campo mensagem0 para passar uma mensagem de ambiente, exemplo imprimir o literal "NFSe emitida em ambiente de homologação" no danfse; Só a fim de evitar circulação de documentos impróprios, similar ao que temos hoje com a NFe onde sai impresso quando o documento está transmitido para ambiente de homologação; Desde já obrigado; Fraterno abraço;

Bom dia @licerio Eu estou pensando em ir para VCP de Azul, lá tem um ônibus que faz a ligação entre as cidades da própria companhia Azul, foi o melhor que achei até o momento; Também não conheço muito bem o trecho, mas é o mais próximo que cheguei; Ou ir até VCP ou GRU e ir de taxi/ônibus até Sorocaba;

Mesma situação em São José do Rio Preto - SP E358 Falei tambem na GINFES em São Paulo (11) 2175-1145 Suporte, a mesma informa que está com problemas em seus servidores e ainda não sabe a extensão do problema, não há previsão de normalização.

Parabens pela iniciativa, final do ano estaremos lá

Bom dia, A Capcom foi descontinuada pela microsoft a muito tempo, por isso é recomendável remover, mas ela trabalha com STORE, funciona para certificados modelo A1 e A3; A OpenSSL tu vai conseguir trabalhar com arquivos PFX diretamente sem o uso das STORE; O Wincrypt tu vai conseguir trabalhar com STORE de certificados igual a capcom, tanto para modelo A1 e A3; eu particularmente eu removi toda a dependência do capcom e da openssl dos meus sistemas, portanto uso o (Wincrypt + MSXML), se usar (Wincrypt + libXML2 ) ele vai te pedir a dependência do OpenSSL Abraços

Por telefone na elgin, falaram que isso deve sair nos meses 07/08-2018

Boa tarde, A distribuição da DFe até a parte do resumo funciona normalmente, mas na etapa 4 que tem que registrar o evento para a distribuição da nota fiscal vir completa é onde ocorre o erro CSTAT 282 - Rejeicao: Certificado Transmissor sem CNPJ, como é o fluxo normal para a nota fiscal quando PJ; Deveria ter uma forma de recuperar esses XML de PF igual é o de PJ; Não estou falando que a ACBr está com erro, visto que isso é retorno do WS; Obrigado XMLs.rar

Boa tarde @Daniel Simoes A implementação atendeu com excelência, pelo que vi na implementação irá atender quem usa a diretiva desativada xsMsXML e quem usa a diretiva LIBXML2 irá utilizar xsLibXML2, desta forma resolvendo o problema para ambos os lados. Muito obrigado pelo tempo despendido analisando o caso e procurando uma melhor solução para o incidente elencado; Forte abraço

Boa tarde @Daniel Simoes, Cheguei agora na empresa estava em viagem, estarei realizando os testes e te passo o feedback em sequencia; Muito obrigado

Boa noite, Na ultima atualização que realizei do componente da acbr, ao abrir o projeto está gerando problemas de configuração, na instalação do ACBr está desmarcado para utilizar CAPCOM e OPENSSL. verifiquei que na alteração 14804 feita por @Daniel Simoes [*] TGeralConf.SSLLib, modificado para que quando tiver o valor "libWinCrypt", assuma a seguinte configuração: SSLCryptLib := cryWinCrypt; SSLHttpLib := httpWinHttp; SSLXmlSignLib := xsLibXml2; Modificando o uso de xsMsXml para xsLibXml2 (por: DSA) Quando o componente está utilizando a diretiva desatilitar OPENSSL, está gerando uma exceção ao utilizar o sslLib (LibWinCrypt), onde o mesmo tenta inserir no componente a assinatura xsLibXML2, eu acredito que o arquivo ACBrDFeSSL na procedure TDFeSSL.SetSSLXmlSignLib(xsLibXml2), alem de estar com a mensagem de erro (raise) indicando que está usando o xsXMLSec, acredito que não se aplica a diretiva {$IfNDef DFE_SEM_OPENSSL} neste caso Obrigado

consegui usando a unit original sem a alteração o efeito desejado com a ajuda do @Régys Silveira <ACBrNFe>.Configuracoes.Arquivos.OrdenacaoPath.Clear; Obrigado

@hleorj mesmo com as propriedades "false" ele continua criando na estrutura cnpj + nfe. o if (csDesigning in ComponentState) then fica com valor csFreeNotification, e não gera aonde foi determinado no pathpdf. não é para gerar na estrutura cnpj + tipoDocumento, e sim onde declarar o pathpdf, se as propriedades separar cnpj, tipo de documento estivessem true, ai concordo com sua afirmação, mas neste caso como no post inicial, você pode verificar que as propriedades estão como false, para separação de arquivos.

Boa tarde, Consegui contornar o problema alterando o arquivo ACBrDanfeClass.pas Na function abaixo o if (linha 400) não ficava verdadeiro, pois o retorno do ComponentState era csFreeNotification, alterei para como estava antes do commit 13574 para if Trim(FPathPDF) <> '' then, minha aplicação voltou a se comportar como eu esperava, sem gerar as pastas de cnpj + nfe no pathpdf escolhido function TACBrNFeDANFEClass.GetPathPDF: String; var dhEmissao: TDateTime; DescricaoModelo: String; ANFe: TNFe; begin if (csDesigning in ComponentState) then begin Result := FPathPDF; Exit; end; ACBrNFeDANFEClass.pas

Bom dia, Eu utilizo uma procedure para facilitar para o cliente salvar o xml + o pdf onde ele desejar. Após a atualização que realizei na semana passada, o comportamento mudou. já tentei setar nas <ACBr.NFe>.configuracoes.arquivos, todas as propertys como false e limpar os path, mas não consegui; Quando eu não emiti nenhuma nota pelo sistema, a impressão do pdf é no caminho que eu defini <ACBr.NFe>.DANFE.PathPDF, mas após emitir qualquer NFe, ele cria no <ACBr.NFe>.DANFE.PathPDF a estrutura CNPJ + NFe+ chavexml-nfe.xml. procedure salvaDocumentoFiscal(xXML : string); var diretorioSelecionado : string; begin if SelectDirectory('Selecione a Pasta de Destino:', 'C:\', diretorioSelecionado, [sdNewUI, sdNewFolder]) then begin diretorioSelecionado := diretorioSelecionado; end; with NFE.Configuracoes.Arquivos do begin PathNFe := ''; PathSalvar := ''; Salvar := False; SepararPorMes := False; SepararPorDia := False; SepararPorAno := False; SepararPorCNPJ := False; SepararPorModelo := False; AdicionarLiteral := False; EmissaoPathNFe := False; SalvarEvento := False; end; NFE.NotasFiscais.Clear; NFE.NotasFiscais.LoadFromString(xXML); NFE.DANFE.PathPDF := diretorioSelecionado; NFE.NotasFiscais.ImprimirPDF; NFE.NotasFiscais.GravarXML(diretorioSelecionado+'\'+OnlyNumber(NFE.NotasFiscais.Items[0].NFe.infNFe.ID)+'-nfe.xml'); end; No envio utilizo a seguinte configuração:: SepararPorMes := True; AdicionarLiteral := True; EmissaoPathNFe := True; SalvarEvento := True; SepararPorCNPJ := True; SepararPorModelo := False; Como eu faço para resolver essa questão, preciso salvar tanto o xml como o pdf no diretório informado c:\Temp\PDF\, na procedure as informações / configurações do componente não deveriam ser re-escrita? antes de emitir nfe e executar a procedure c:\Temp\PDF\12345678901234567890123456789012345678901234-nfe.pdf c:\Temp\PDF\12345678901234567890123456789012345678901234-nfe.xml após emitir nfe e executar a procedure c:\Temp\PDF\12123123123412\NFe\12345678901234567890123456789012345678901234-nfe.pdf c:\Temp\PDF\12345678901234567890123456789012345678901234-nfe.xml Delphi Seattle + ACBr 13653 (25/07/2017).

Boa tarde @hleorj, Realizei alguns testes com o danferetratonovo.fr3, deixando ele saindo a mensagem de continuação dos dados adicionais em uma nova página sem sair o header de produtos. na terceira página estava havendo um espaço entre o header e os itens, removi o mesmo. você poderia verificar se está correto, e se tem alguma outro ajuste que devo me preocupar? NFe35161200000000000001550000014604221381357490.xml DANFeRetratoNovo.fr3 DANFeRetratoNovo.pdf

Boa tarde, segue o arquivo DanfeRetratoNovo.fr3 com o mesmo tratamento. Se possivel analisarem e se julgarem válido submeter os 2 arquivos ao repositório. * na minha aplicação utilizo o DanfeRetrato.fr3, alteração de equivalência no DanfeRetratoNovo por solicitação do @hleorj; Obrigado. DANFeRetratoNovo.fr3

Bom dia, @hleorj Realizei o teste usando o DanfeRetratoNovo.fr3, ele utiliza o recurso de stretch, criando o restante em uma nova pagina, mas não achei legal a forma que ele cria, na banda de produtos. eu não achei menção a este DanfeRetratoNovo no arquivo readme, saberia me dizer a grosso modo a diferença entre o DanfeRetratoNovo e DanfeRetrato ? Mas de qualquer forma, já abri a tarefa para realizar a implementação da banda neste outro fr3, assim que concluir submeto aqui no post.

Boa noite, Primeiramente desculpas por estar abrindo o post, não encontrei uma solução ao problema ou um post apropriado para tal. Realizei testes com o fastreport e com o fortesreport, o danfe utilizando o fastreport encontrei alguns problemas e resolvi corrigir em relação ao fortesreport. [FASTREPORT] DanfeRetrato.fr3 Quando a campo memo (memOBS) havia mais que 12 linhas, no evento Page1OnBeforePrint era tratado essa "overflow" manualmente, passando o excesso de informações para a o memo (memContInfAdicionais). Problemas : 1- se a informação na tag (infCpl) o ultimo carácter não fosse ; (ponto e virgula), o sistema deixava a ultima linha no campo memOBS (line 13) e jogava o restante no campo memContInfAdicionais. 2 - se a informação na tag (infCpl) na linha executa-se wordwrap, o sistema continuava contando como uma unica linha, mas imprimia 3 linhas, desta forma o count retornava 12 linhas, mas tinha 15 linhas sendo impressas, e não estavam sendo jogadas para o memo (memContInfAdicionais), ficando assim algumas linhas suprimidas. Solução Apresentada : 1 - remover do evento Page1OnBeforePrint a constante de controle de linhas (LINHAS_DADOS_ADICIONAIS). 2 - adicionar no memo (memOBS) o flowto para o memo (memContInfAdicionais). 3 - adicionar o evento memOBSOnAfterData para verificar se imprimi a pgContDadosAdicionais, que contem o memo (memContInfAdicionais). Segue em anexo o xml fictício utilizado para homologar a situação, e o danfe para apreciação dos moderadores da correção. Muito Obrigado NFe35170700000000000000550010000076561471731758.xml DANFeRetrato.pdf DANFeRetrato.fr3

mas até onde me recordo, a grande maioria desses erro, o próprio componente da ACBr já realizava os tratamentos. Mas, agora é vender então parceiro

Correto :: <Orig>0</Orig> e não <orig>0</orig>

Tag Código EAN vázia. vCFeLei12741 no total faltando