wilsonaaugusto

Bom dia! É isso mesmo. Usei a propriedade NextReport para encadear os TRLReport necessários. Agora é cria a lógica entre as vias que preciso. Obrigado pela atenção. Marquei a minha resposta como solução, mas quem deu a solução mesmo foi o Daniel. Muito obrigado!

Vou testar NextReport esta noite. Depois, volto com os resultados... Obrigado!

Boa tarde! Estou migrando um relatório do Rave Reports para o Fortes Reports. Esse relatório tem 5 vias, sendo as 3 primeiras idênticas, só muda uma nota no rodapé onde é impresso "1a via - Cliente", "2a via - Técnico" e "3a via - Arquivo". A 4a e a 5a via são relatórios diferentes. O usuário pode imprimir todas as 5 vias ou selecionar quais as que serão impressas. São 3 relatório montados no Rave: rep1, rep4 e rep5. Será que dá para, em um preview personalizado do Fortes, gerar um relatório multiplo? Refazendo os 3 relatórios do Rave em 3 TRLReport do Fortes, daria para chamá-los em sequência como se fosse um só?

Obrigado! Estava seguindo as instruções do exemplo. Já fiz o cadastramento da minha aplicação. Coloquei um link de callback (que é obrigatório). Na verdade, criei um link fictício pois não tenho página para a aplicação. Como tenho que usar o Delphi 7, fiz a instalação do Indy 10 e montei o código que coloco anexo. Nos meus testes, consigo abrir a página de login em um TWebBrowser e capturo o link de callback. Com isso, obtive o "authorization code" que irei usar para obter os tokens. O TWebBrowser não dá uma aparência bonita para a página, mas é o que tenho... rsrsrs Agora preciso adaptar isso na minha aplicação. Quando der, vou ver como migrar para uso do Synapse. Agradeço a atenção. BlingAuthorizationcode.txt

Boa tarde! Estou tentando usar a Synapse ou o Indy 10 para acessar a Bling API v3. Logo no início, ao tentar fazer a autenticação, tenho que fazer um GET ou POST na URL indicada por eles, passando o cliente_ID. O problema que estou enfrentando é que: testando no Postman, o retorno é uma página para entrar com o usuário e senha e depois a API devolve o token desejado. Mas não sei como obter esta página usando a Synapse ou o Indy 10. Tudo o que recebo é "HTTP/1.1 302 Found" em ambos. Alguém poderia me dar uma direção a seguir, por favor...

Olá! Eu cheguei a fazer a solução citada anteriormente, mas não obtive o resultado desejado. Vou anexar as alterações que fiz para que analisem. Obrigado pela atenção. ACBrBoletoFCFortesFr.dfm

Boa tarde! Encontrei esse problema com a linha digitável, alterei o tamanho do componente "txtLinhaDigitavel" da unit "ACBRBoletoFCFortesFr.pas" para 455. Resolveu, por enquanto. Outra alternativa é mudar o tamanho do fonte de 12 para 11, mas não achei que ficou bom. Sei que em uma nova atualização perderei esta modificação, mas é isso.. Um abraço.

Obrigado!

Boa tarde É possível usar a impressão do boleto no layout lPadraoPIX com outros bancos além do banco do brasil? As informações que vão no QRCode (url, txId e emv) sempre virão de uma API? E os boletos que são enviados via arquivo de remessa? Como eles podem obter os dados para o QRCode?

Bom dia! Acabei resolvendo da seguinte maneira: coloquei o valor 68 em 'ACBrTitulo.ACBrBoleto.Cedente.AgenciaDigito' mesmo. O calculo do digito do Nosso Numero ficou correto. Obrigado

Boa tarde! Estou gerando boletos para o banco Sicredi. Fui informado que preciso colocar a informação Posto de 2 digitos para ser usado em 'Agência / Código Beneficiário' do boleto. Olhei os fontes e encontrei a função: function TACBrBancoSicredi.MontarCampoCodigoCedente (const ACBrTitulo: TACBrTitulo ) : String; begin Result := ACBrTitulo.ACBrBoleto.Cedente.Agencia + '.' + PadLeft(ACBrTitulo.ACBrBoleto.Cedente.AgenciaDigito,2,'0')+ '.' + PadLeft(ACBrTitulo.ACBrBoleto.Cedente.CodigoCedente,5,'0'); end; Notei que onde me foi indicado para usar o posto está sendo colocado o digito da agencia. No meu caso, o numero que preciso colocar é '68' e o dígito da minha agencia é 2. Onde eu coloco o valor 68 que me foi passado como valor do Posto? Obrigado pela atenção

Entendi. Estou, aos poucos, encontrando o que preciso e adaptando o código. Agradeço pela sua atenção. Muto obrigado.

Sim, eu vi este trecho de código. Notei o uso do count para erros e Alertas. E, pelo que entendi, usa o LoadXML para "pegar" os dados das notas. Como estou dando manutenção em código herdado, achei que teria algo similar ao que já tenho feito (ex. if NF.NfseCancelamento.DataHora <> 0 then) para não ter que mudar as regras já estabelecidas aqui. Desculpa não prestei atenção no trecho "memoLog.Lines.Add(" Vou ver como adapto aqui. Obrigado

Bom dia! Estou trocando os componentes ACBrNFSe pelo ACBrNFSex. Fiz a troca conforme o manual e foi tudo bem. Agora estou revendo os meus fontes e tenho um trecho após usar o ConsultarNFSeporRps: " Result := (NFSE.ConsultarNFSeporRps(NFSE.NotasFiscais.Items[0].NFSe.IdentificacaoRps.Numero, NFSE.NotasFiscais.Items[0].NFSe.IdentificacaoRps.Serie, TipoRPSToStr(NFSE.NotasFiscais.Items[0].NFSe.IdentificacaoRps.Tipo)));" onde utilizo: "if NFSE.WebService.ConsNfseRps.RetornoNFSe.ListaNfse.CompNfse.Count > 0 then "NF := NFSE.WebServices.ConsNfseRps.RetornoNFSe.ListaNfse.CompNfse.Items[0].Nfse;" O problema que estou tendo é que não encontro algo correspondente no ACBrNFSeX. Poderiam me indicar uma solução? Ou onde devo pesquisar? Nos fontes do exemplo não achei nada. Obrigado

Bom dia! Gostaria de saber se as alterações foram feitas e atualizadas para eu poder fazer o update. Obrigado.