Gandalf

Bom dia, Sim, a minha postagem é referente à mudança para 7 dígitos. Com 6 dígitos já estava funcionando. Eu baixei o arquivo que o Neudimar havia desenvolvido para a caixa. A remessa eu creio que passou, mas agora passou a dar problema na impressão do boleto. Vou esperar ele mandar a versão alterada, para testar aqui. Obrigado a ambos por responderem!

Boa tarde! Foi homologada a impressão do boleto? Para mim voltaram vários erros. Estou enviando o boleto impresso pela caixa, o boleto impresso pelo meu sistema, usando o ACBr e a validação da Caixa. Desde já, agradeço a atenção! Boleto Impresso do Site da Caixa.pdf Boleto Impresso meu sistema.pdf Validação Caixa.pdf

Olá Juliana, isso eu não saberia dizer. Eu estou lendo o retorno do banco com o método LerRetorno e o componente está me retornando que o tamanho máximo do nosso número é 10. Vou colocar em anexo o arquivo, para que, se alguém puder, dar uma olhada. 2020_Abril_CNAB400_UNICRED_TODAS_0001247840_0515_28042020_01.RET

Boa tarde! Estou usando o layout da UnicredES (banco 136) e conforme o layout do banco o tamanho do nosso número é 17. Eu estou tentando ler o retorno do banco, mas o componente me retorna uma mensagem dizendo que o tamanho máximo do nosso número é 10. Como posso resolver isso? Desde já agradeço!

Boa tarde! Isso já foi resolvido?

Bom dia. Eu estava lendo sobre as atualizações do windows 8 e 10 e dos erros que podem gerar. Pelo que eu entendi foi postada uma nova versão da ACBrDFeSSL. Mas quando eu mando atualizar os componentes, essa unit não parece estar sendo atualizada. É necessário baixa-la individualmente? Se sim, como fazer para baixar? Atenciosamente Társis Francke Ferreira

Obrigado pela resposta, Como é possível então acessar variáveis na DANFE? Antes era possível com a propriedade dmDanfe.

Bom dia, atualizei os componentes e percebi que foi tornada privada a propriedade dmDanfe. O problema agora é que quando eu tento acessar a propriedade PreparedReport, não consigo, porque ela está nula. Eu vi que já teve um tópico igual aqui, mas o usuário relatou que conseguiu resolver e o tópico foi fechado. Infelizmente ele não postou como conseguiu resolver. Abaixo vai meu código. Minha classe herda da TACBrNFe. var Fixos: TDadosFixos; OK: Boolean; VersaoDF: TpcnVersaoDF; begin inherited; PegouCertificado := False; Fixos := TDadosFixos.Consulta; if (not Fixos.VersaoNFe.HasValue) or (Fixos.VersaoNFe = '3.10') then VersaoDF := ve310 else if Fixos.VersaoNFe = '4.00' then begin VersaoDF := ve400; Configuracoes.Arquivos.PathSchemas := Fixos.EndSchemas + '\Schemas'; end else raise Exception.Create('Versão NFe não definida na classe MeuACBrNFe'); Configuracoes.Geral.Salvar := True; Configuracoes.Geral.VersaoDF := VersaoDF; Configuracoes.Arquivos.Salvar := True; Configuracoes.Certificados.NumeroSerie := Fixos.NSerieCertDigital; Configuracoes.WebServices.UF := Fixos.Cidade.UF; Configuracoes.WebServices.Ambiente := StrToTpAmb(OK, IntToStr(Fixos.TIPONFELETRONICA)); Configuracoes.WebServices.TimeOut := 15000; Configuracoes.Geral.FormaEmissao := StrToTpEmis(OK, IntToStr(Fixos.TIPOEMISSAONFE + 1)); Configuracoes.Geral.RetirarAcentos := True; //Configuracoes.Geral.SSLLib := libCapicom; Configuracoes.Geral.SSLLib := libWinCrypt; Configuracoes.Geral.SSLXmlSignLib := xsMsXML; if Fixos.UsarTSL12 then SSL.SSLType := LT_TLSv1_2; //DownloadNFe.Download.CNPJ := Fixos.CNPJ; MinhaDANFE := TACBrNFeDANFEFR.Create(nil); MinhaDanfe.IncorporarBackgroundPdf := False; // feito para diminuir o tamanho da danfe MinhaDANFE.IncorporarFontesPdf := False; // feito para diminuir o tamanho da danfe //MinhaDANFE. ImprimirUnQtVlComercial := iuComercial; with MinhaDANFE do begin FastFile := Fixos.ArquivoDANFE; FastFileEvento := Fixos.ArquivoDANFE; Sistema := 'GAF - Gerenciador Administrativo Financeiro'; MostraPreview := False; Logo := Fixos.ArquivoLogoDANFE; end; Self.DANFE := MinhaDANFE; if Fixos.MensagemRodapeNFe <> '' then (Self.DANFE as TACBrNFeDANFEFR).PreparedReport.Script.Variables['MensagemRodape'] := Fixos.MensagemRodapeNFe ---> aqui já dá o erro else (Self.DANFE as TACBrNFeDANFEFR).PreparedReport.Script.Variables['MensagemRodape'] := ''; FreeAndNil(Fixos);

Bom dia, alguém já conseguiu emitir o boleto da Unicred com esse layout próprio que o Lucas postou aí em cima? Se sim, tem a unit e o logo para disponibilizar? Desde já agradeço Társis (eu havia postado isso em um outro tópico que tratava do dígito verificador. Talvez tenha postado no thread errada, por isso estou postando aqui novamente)

Boa tarde! Como eu posso conseguir essa unit da Unicred com seu respectivo logo? Para mim não aparece no trunk2 para baixar essa unit para o banco 136. Desde já agradeço Társis

Boa tarde, estou tendo também o mesmo problema, mas no meu caso eu não uso o ACBrMonitor. Atualizei os fontes depois da mensagem acima e continuo com o mesmo erro. A única diferença é que ao invés de acusar Missing child element(s) está acusando is incomplete according to the DTD/Schema. Mas no final é o erro da assinatura (Signature)

Boa tarde! Estou tendo um problema com a remessa do banco sicoob. Eu estou informando o CodigoMora = 2 e no boleto está sendo informado 0,0333% por dia de atraso. Só que nas posições 161 a 166, está informada a cobrança de juros de 14,0760% ao mês. Alguém tem alguma idéia do que pode estar gerando essa divergência? Atenciosamente Társis Francke Ferreira

Boa tarde, eu atualizei os componentes e não encontrei onde manipular os botões de preview da impressão do boleto no FastReport. Alguém poderia dar uma luz? Por exemplo, gostaria de ocultar o botão de impressão.

Pessoal, agora passou. Creio que com os fontes atualizados, vai deixar de dar problema. No pcnNFeW.pas, na parte que estava dando problema, colocaram uma crítica para só fazer isso a partir da versão 4.0.

Olá, também estou com o mesmo problema. Alguma novidade?

Bom dia! Obrigado!!!

Obrigado pela resposta, no XML retorna o CEP, mas eu olhei no arquivo FR3 e no datamodule do FastReport e lá não tem nenhuma referência ao CEP. Para ti aparece o CEP do prestador, na impressão da DANFSe?

Bom dia! Na DANFSe, não sai impresso o CEP do prestador?

Boa tarde, Existe alguma DANFSE com o campo CEP do emitente, para FastReport?

Valeu, obrigado!

Boa tarde, estou gerando a remessa para o Banrisul e o suporte do banco está me retornando o seguinte erro: posição 109-110 alterar para "02" "remessa"; Qual propriedade que eu devo setar para escrever nessa posição? posição 162-173 a taxa mensal de juros Qual propriedade escreve nessa posição? Atenciosamente Társis Francke Ferreira

Bom dia, eu estou com esse problema de nome de campos também. No meu caso eu peguei um dos arquivos de impressão do FastReport que tem de exemplo e alterei o nome dos campos na mão. O problema é que no arquivo de remessa está indo ainda sacado e não pagador. Estou deixando passar alguma configuração para o componente? Eu estou informando o número do banco, assim como o tipo de cobrança com os dados referentes ao Banrisul. Tem mais alguma propriedade que devo informar? Atenciosamente Társis Francke Ferreira

Bom dia! Boa idéia, valeu!

Eu quero dizer acrescentar no código fonte do ACBrBoleto, porque senão, sempre que for atualizado, essa parte do código será sobrescrita, uma vez que só alterei aqui, localmente. Isso se for interessante para a comunidade, senão eu mesmo crio uma classe que herde da TACBrBoletoFCFR e resolvo minha necessidade particular.

Pessoal, eu precisava manipular os botões do preview do FastReport, ocultando/exibindo alguns. Não encontrei uma forma de fazer do jeito que o componente estava, então criei, na classe ACBrBoletoFCFR uma propriedade BotoesPreview, para poder setar isso na função function TACBrBoletoFCFR.PrepareReport(const DmBoleto: TdmACBrBoletoFCFR): Boolean; begin Result := False; if Trim(fFastReportFile) <> '' then begin if FileExists(fFastReportFile) then DmBoleto.frxReport.LoadFromFile(fFastReportFile) else raise EACBrBoletoFCFR.CreateFmt('Caminho do arquivo de impressão do boleto "%s" inválido.', [fFastReportFile]); end else raise EACBrBoletoFCFR.Create('Caminho do arquivo de impressão do boleto não assinalado.'); if PrepareBoletos(DmBoleto) then begin //****************************** acrescentei aqui *************************************** if BotoesPreview <> [] then DmBoleto.frxReport.PreviewOptions.Buttons := BotoesPreview; //********************************************************************************************* Result := DmBoleto.frxReport.PrepareReport; end; end; se souberem de uma forma melhor de fazer isso, por favor, me avisem, senão, vejam se é interessante adicionarem, definitivamente, na classe. Abraço Társis Francke Ferreira