ralty
Membros Pro-
Total de ítens
102 -
Registro em
-
Última visita
Tipo de Conteúdo
Blocks
Notes ACBrLibNFe
Fóruns
Downloads
Calendário
Tudo que ralty postou
-
Boa tarde Daniel, Segue retorno: Quem ficara responsável pela emissão dos boletos ? Se for a empresa , na remessa posição 58 do segmento P será necessário colocar o código 5 (para rápida com registro), e no boleto ficara 101. Caso for o banco responsável na remessa ficara com o código 1 na mesma posição informada acima, e validamos o arquivo remessa. Ralty
-
bom dia, O responsável pela homologação (Esteira e Serv. Componentizados / Onboarding Cash) passados 24h que enviei a remessa não deu nenhum retorno ainda. O cliente entrou em contato com o banco e a resposta foi que eles ainda estão no prazo. A homologação inicio dia 24/01 e a análise demora até 48h, foi até por esse motivo que abrir o tópico para tirar essa dúvida antes de enviar a remessa. Já homologuei clientes com santader em outras agências e deu certo mas esse esta mais dificil. Assim que obtiver retorno posto aqui o resultado. Muito obrigado Ralty
-
Bom dia vou fazer isso, muito obrigado Ralty
-
Boa tarde, estou homologando a emissão de boletos via remessa/retorno no Santander e após alguns ajustes realizados foi solicitado pelo banco a mudança no código da remessa. O Suporte do Santander deixa muito a desejar, demoram mais de 24h para responder e não respondem direito detalhando as ocorrências. Verifiquei alguns manuais do banco sobre o que seria o código de remessa e fiquei na dúvida. Se alguem puder ajudar agradeço.
-
Bom dia Daniel credenciais enviadas Att. Ralty
-
Bom dia Daniel, tudo bem? Após atualização do SVN e instalação do componente a consulta e consultaDetalhe passou a retornar erro 'Stream read error' (Itaú) conforme anexo. Não esta gerando nenhuma informação no log. O registro do boleto continua normal, apenas a consulta que passou a gerar essa mensagem de erro. Segue Acredito que possa ser em decorrencia das mudanças realizadas nesse tópico. Caso precise de credencias para testes no Itau posso lhe enviar Att Ralty
-
Boa tarde, tudo bem? Estou homologando o envio de boletos via Api V2 do Itaú e recebi um e-mail de alerta do itaú sobre a forma de envio do token. Segue: Olá, Identificamos que "Cliente" não envia a forma correta de autenticação da API de Emissão e Instrução de boleto. Para segurança no registro de boletos bem como nas instruções, a partir de 28/11/2023, passaremos a criticar a correta identificação do token no campo chamado “authorization” no Header do Payload (prefixo “Bearer”, conforme exemplo abaixo). Temos a documentação disponível no DevPortal. Abaixo um exemplo que como enviam e como devem enviar.
-
boa tarde Atualizei todos os fontes, porem o retorno não veio com a informação TITULO_RETORNO Estou utilizando a Rotina ListaRetornoWeb para o itau da mesma forma que utilizo no sicoob. Observei que existe a rotina ListaConsultaRetornoWeb mas não consegui utilizar. Segue retorno. Nosso Numero: Codigo Barras: Linha Digitavel: Cod_Retorno= Msg_Retorno= Ori_Retorno= HTTP_Result=0 JSON={"data":{"codigo_canal_operacao":"API","codigo_operador":"380499329","etapa_processo_boleto":"efetivacao","beneficiario":{"id_beneficiario":"38040099297","nome_cobranca":"COMERCIO E REPRESENTACOES","tipo_pessoa":{"codigo_tipo_pessoa":"J","numero_cadastro_nacional_pessoa_juridica":"35601000180"},"endereco":{"nome_logradouro":"DESEMBARGADOR ONOFRE MENDES JR, 1, SALA ","nome_bairro":"CANDELARIA","nome_cidade":"BELO HORIZONTE","sigla_UF":"MG","numero_CEP":"3153510","numero":"190","complemento":"SALA "}},"dado_boleto":{"descricao_instrumento_cobranca":"boleto","forma_envio":"impressao","tipo_boleto":"a vista","pagador":{"pessoa":{"nome_pessoa":"QUERINO DESENVOLVIMENTOS","tipo_pessoa":{"codigo_tipo_pessoa":"J","numero_cadastro_nacional_pessoa_juridica":"124740170"}},"endereco":{"nome_logradouro":"R A","nome_bairro":"JARDIM RESIDENC","nome_cidade":"IBIPOR\u00c3","sigla_UF":"PR","numero_CEP":"86200000"},"pagador_eletronico_DDA":true,"praca_protesto":true},"codigo_carteira":"109","codigo_tipo_vencimento":3,"valor_total_titulo":"00000000000000400","dados_individuais_boleto":[{"id_boleto_individual":"d580652c-a946-4c36-9a81-65163325d01a","numero_nosso_numero":"00000005","dac_titulo":"6","data_vencimento":"2023-12-02","valor_titulo":"00000000000000400","texto_seu_numero":"00000005","codigo_barras":"34191955200000004001090000000563804993297000","numero_linha_digitavel":"34191090080000056380949932970004195520000000400","data_limite_pagamento":"2033-12-02","texto_uso_beneficiario":"0"}],"codigo_especie":"01","data_emissao":"2023-11-18","pagamento_parcial":false,"quantidade_maximo_parcial":0,"valor_abatimento":"00000000000000000","multa":{"codigo_tipo_multa":"02","valor_multa":"00000000000000008","percentual_multa":"00000000000200000"},"lista_mensagem_cobranca":[],"recebimento_divergente":{"codigo_tipo_autorizacao":"01","codigo_tipo_recebimento":"P"},"desconto_expresso":false}}} HEADER Versao= Autenticacao= Usuario_Servico= Usuario= Operacao=INCLUI_BOLETO Indice=0 Sistema_Origem= Agencia=0 ID_Origem= Data_Hora=30/12/1899 00:00:00 ID_Processo= DADOS Excessao= CONTROLE_NEGOCIAL Origem_Retorno= NSU= Cod_Retorno= Msg_Retorno= COMPROVANTE Data=30/12/1899 Hora= ID_BOLETO Codigo_Barras= Linha_Digitavel= Nosso_Numero= URL= CONSULTA_BOLETO Numero_Documento= Data_Vencimento=30/12/1899 Valor=0 Muito obrigado Ralty
-
Boa tarde O Retorno de boletos registrado na API do Itaú não estão sendo carregados no componente, somente no Json. Segue retorno após executar o envio do boleto. Nosso Numero: Codigo Barras: Linha Digitavel: Cod_Retorno= Msg_Retorno= Ori_Retorno= HTTP_Result=0 JSON={"data":{"codigo_canal_operacao":"API","codigo_operador":"380499329","etapa_processo_boleto":"efetivacao","beneficiario":{"id_beneficiario":"38040099329","nome_cobranca":"COMERCIO E REPRESENTACOES","tipo_pessoa":{"codigo_tipo_pessoa":"J","numero_cadastro_nacional_pessoa_juridica":"35605801000280"},"endereco":{"nome_logradouro":"DESEMBARGADOR MENDES , 200, SALA 21","nome_bairro":"CANDELARIA","nome_cidade":"BELO HORIZONTE","sigla_UF":"MG","numero_CEP":"31535510","numero":"190","complemento":"SALA"}},"dado_boleto":{"descricao_instrumento_cobranca":"boleto","forma_envio":"impressao","tipo_boleto":"a vista","pagador":{"pessoa":{"nome_pessoa":"QUERINO DESENVOLVIMENTOS","tipo_pessoa":{"codigo_tipo_pessoa":"J","numero_cadastro_nacional_pessoa_juridica":"12474012200170"}},"endereco":{"nome_logradouro":"R ARRELO 451","nome_bairro":"JARDIM RESIDENC","nome_cidade":"IBIPOR\u00c3","sigla_UF":"PR","numero_CEP":"86200000"},"pagador_eletronico_DDA":true,"praca_protesto":true},"codigo_carteira":"109","codigo_tipo_vencimento":3,"valor_total_titulo":"00000000000000600","dados_individuais_boleto":[{"id_boleto_individual":"30300366-0887-466f-a1b5-806b6f78f7d7","numero_nosso_numero":"00000004","dac_titulo":"9","data_vencimento":"2023-11-24","valor_titulo":"00000000000000600","texto_seu_numero":"00000004","codigo_barras":"34196954400000006001090000000493804993297000","numero_linha_digitavel":"34191090080000049380949932970004695440000000600","data_limite_pagamento":"2033-11-24","texto_uso_beneficiario":"0"}],"codigo_especie":"01","data_emissao":"2023-11-10","pagamento_parcial":false,"quantidade_maximo_parcial":0,"valor_abatimento":"00000000000000000","multa":{"codigo_tipo_multa":"02","valor_multa":"00000000000000012","percentual_multa":"00000000000200000"},"lista_mensagem_cobranca":[],"recebimento_divergente":{"codigo_tipo_autorizacao":"01","codigo_tipo_recebimento":"P"},"desconto_expresso":false}}} HEADER Versao= Autenticacao= Usuario_Servico= Usuario= Operacao=INCLUI_BOLETO Indice=0 Sistema_Origem= Agencia=0 ID_Origem= Data_Hora=30/12/1899 00:00:00 ID_Processo= DADOS Excessao= CONTROLE_NEGOCIAL Origem_Retorno= NSU= Cod_Retorno= Msg_Retorno= COMPROVANTE Data=30/12/1899 Hora= ID_BOLETO Codigo_Barras= Linha_Digitavel= Nosso_Numero= URL= CONSULTA_BOLETO Numero_Documento= Data_Vencimento=30/12/1899 Valor=0 Será possível os dados de retorno alimentarem o componente (ACBrBoleto1.ListaRetornoWeb[I].DadosRet.IDBoleto.LinhaDig;) Se não for possível posso tratar o json porem utilizo a rotina para outros bancos (sicoob) e os dados do boleto já veem no componente. Muito obrigado Ralty
-
Bom dia perfeito, deu certo muito obrigado Ralty
-
Boa tarde Estou usando a API V2 do Itaú para emissão de boletos, a autenticação deu certo. Porem esta gerando erro no campo: data.beneficiario.id_beneficiario Conjunto agencia/conta/dac invalido Segue retorno do Itaú DAC da conta é 7 e esta informando 0 ":{"id_beneficiario":" 380400993290"}," alter para ":{"id_beneficiario":" 38040099329 7 "}," Estou usando o código de carteira 109 e o digito da conta 7 Segue o JSON com retorno 01/11/23 15:00:00:894 - Comando Enviar: {"data":{"etapa_processo_boleto":"efetivacao","codigo_canal_operacao":"API","beneficiario":{"id_beneficiario":"380400993290"},"dado_boleto":{"descricao_instrumento_cobranca":"boleto","tipo_boleto":"a vista","codigo_carteira":112,"valor_total_titulo":"00000000000001500","codigo_especie":"01","valor_abatimento":"00000000000000000","data_emissao":"2023-11-01","indicador_pagamento_parcial":"True","quantidade_maximo_parcial":0,"desconto_expresso":"False","pagador":{"pessoa":{"nome_pessoa":"QUERINO DESENVOLVIMENTOS","tipo_pessoa":{"codigo_tipo_pessoa":"J","numero_cadastro_nacional_pessoa_juridica":"12474015000170"}},"endereco":{"nome_logradouro":"R ARMINIO BIRELO 451","nome_bairro":"JARDIM RESIDENCIAL ROMANA","nome_cidade":"IBIPOR\u00c3","sigla_UF":"PR","numero_CEP":"86200000"}},"dados_individuais_boleto":[{"numero_nosso_numero":"00000001","data_vencimento":"2023-11-22","valor_titulo":"00000000000001500","texto_uso_beneficiario":"0","texto_seu_numero":"00000001"}],"multa":{"codigo_tipo_multa":"02","percentual_multa":"000000020000","quantidade_dias_multa":0},"desconto ":[{"codigo_tipo_desconto":"00"}],"recebimento_divergente":{"codigo_tipo_autorizacao":"01","codigo_tipo_recebimento":"P"}}}} 01/11/23 15:00:01:205 - Retorno Envio: HTTPCode=400 Result={ "codigo" : "400", "mensagem" : "Erro na validação de Campos", "campos" : [ { "campo" : "data.beneficiario.id_beneficiario", "mensagem" : "Conjunto agencia/conta/dac invalido", "valor" : "380400993290" } ] } Como faço para alterar o DAC para 7 que é o digito da conta? Muito obrigado Ralty
-
Erro ao consultar cobrança PIX paga no Banco Inter
ralty replied to ralty's tópico in Dúvidas gerais
Boa tarde Deu tudo certo com a consulta Muito obrigado Ralty -
Erro ao consultar cobrança PIX paga no Banco Inter
ralty replied to ralty's tópico in Dúvidas gerais
Bom dia muito obrigado, vou verificar Ralty -
Boa tarde O banco inter disponibilizou uma nova API - https://developers.inter.co/references/cobranca-bolepix Atualmente a API Cobrança é V2 e aparentemente o bolepix será a versão API V3 Já existe algo no ACBR para o bolepix via inter na nova api ? Muito obrigado Ralty
-
Erro ao consultar cobrança PIX paga no Banco Inter
ralty replied to ralty's tópico in Dúvidas gerais
entendi, Muito obrigado Ralty -
Erro ao consultar cobrança PIX paga no Banco Inter
ralty replied to ralty's tópico in Dúvidas gerais
Segue anexo pixlog.log -
Bom dia Ao Consultar um PIX Cobrança do banco inter pago retorna o seguinte erro: 'Cannot cast String into Object'. A Consulta com o PIX em Aberto não gera nenhum erro. Segue anexo a consulta realizada com sucesso antes do pagamento, o pagamento e a consulta realizada após o pagamento retornando erro. O Erro ocorre tanto na minha aplicação quanto no exemplo. Os fontes do ACBR foram atualizados. Estou usando o PSP Inter Ralty
-
Vou verificar, muito obrigado Ralty
-
Bom dia no mês de Junho/2023 o Banco Inter divulgou uma API Pix Com Vencimento https://view.comunicacao.bancointer.com.br/?qs=5f91039a508a3e8c41ac902e71169f7a7e28ad693ab8f8a0bca35e00326f6f70bc3c3d99852a024f968c1fde964475f9420119678757c4de2a36ccb1d535d6f39eb3171513a13f08935767a4cb0cc56d Analisando a documentação, essa nova API é exclusiva para PIX e diferente da API Cobraça/Boleto do Banco inter O ACBR tem intenção de criar algum componente ou alterar os já existentes para realizar essa integração com a nova api do Inter para PIX com vencimento? Muito obrigado
-
Bom dia Daniel Implementei o retorno usando a lista Boleto.TotalListaRetornoWeb tanto no exemplo quanto na minha aplicação e deu certo. Muito obrigado Ralty
-
No log consta o retorno. Porem o Retorno.Count é zero. Segue
-
Boa tarde Daniel Não consegui identificar onde esta o erro, refiz o processo no meu software montando em uma única rotina mas mesmo assim sem resultando No exemplo do acbr e não traz nenhum retorno. Se for possível analisar, segue o código da consulta procedure TfEmiteBoletoNew.btConsultaWSClick(Sender: TObject); var SLRetorno: TStringList; I: Integer; Titulo: TACBrTitulo; Beneficiario: TACBrCedente; Banco: TACBrBanco; Boleto: TACBrBoleto; WebService: TACBrWebService; BeneficiarioWS: TACBrCedenteWS; Retorno: TListaACBrBoletoRetornoWS; CobAnterior: TACBrTipoCobranca; begin // carregaDadosConta; retirado //IncluirBoleto; retirado Boleto := FACBrBoleto; WebService := Boleto.Configuracoes.WebService; Beneficiario := Boleto.Cedente; BeneficiarioWS := Beneficiario.CedenteWS; CobAnterior := Boleto.Banco.TipoCobranca; Beneficiario.Nome := fmenu.qUsuariosRAZAO_SOCIAL.asstring; Beneficiario.TipoInscricao := pJuridica; Beneficiario.Agencia := qContaBancoNUMERO_AGENCIA.AsString; Beneficiario.AgenciaDigito := qContaBancoDIGITO_AGENCIA.AsString; Beneficiario.Conta := qContaBancoNUMERO_CONTA.AsString; Beneficiario.ContaDigito := qContaBancoDIGITO_CONTA.AsString; Beneficiario.DigitoVerificadorAgenciaConta := qContaBancoDIGITO_VERIFICADOR.AsString; Beneficiario.Convenio := qContaBancoBOLETO_CONVENIO.AsString; Beneficiario.Modalidade := qContaBancoBOLETO_CARTEIRA_MODALIDADE.AsString; Beneficiario.Operacao := ''; //edtOperacao.Text; Beneficiario.CodigoTransmissao := Trim(qContaBancoBOLETO_CODIGOTRANSMISSAO.AsString); Beneficiario.CodigoCedente := sonumero(qContaBancoCOD_CEDENTE.AsString); Banco := Boleto.Banco; Banco.TipoCobranca := cobBancoob; Banco.LayoutVersaoArquivo := StrToInt(qContaBancoLAYOUTVERSAOARQUIVO.AsString); Banco.LayoutVersaoLote := StrToInt(qContaBancoLAYOUTVERSAOLOTE.AsString); WebService.ArquivoCRT := qContaBancoDIR_INTER_API_CERTIFICADO.AsString; WebService.ArquivoKEY := qContaBancoDIR_INTER_API_CHAVE.AsString; BeneficiarioWS.ClientID := qContaBancoCLIENT_ID.AsString; BeneficiarioWS.ClientSecret := qContaBancoCLIENT_ID.AsString; // BeneficiarioWS.KeyUser := edtKeyUser.Text; BeneficiarioWS.Scope := 'cobranca_boletos_consultar ' + 'cobranca_boletos_incluir ' + 'cobranca_boletos_pagador ' + 'cobranca_boletos_segunda_via ' + 'cobranca_boletos_descontos ' + 'cobranca_boletos_abatimentos ' + 'cobranca_boletos_valor_nominal ' + 'cobranca_boletos_seu_numero ' + 'cobranca_boletos_especie_documento ' + 'cobranca_boletos_baixa ' + 'cobranca_boletos_rateio_credito ' + 'cobranca_pagadores ' + 'cobranca_boletos_negativacoes_incluir ' + 'cobranca_boletos_negativacoes_alterar ' + 'cobranca_boletos_negativacoes_baixar ' + 'cobranca_boletos_protestos_incluir ' + 'cobranca_boletos_protestos_alterar ' + 'cobranca_boletos_protestos_desistir ' + 'cobranca_boletos_solicitacao_movimentacao_incluir ' + 'cobranca_boletos_solicitacao_movimentacao_consultar ' + 'cobranca_boletos_solicitacao_movimentacao_download ' + 'cobranca_boletos_prorrogacoes_data_vencimento ' + 'cobranca_boletos_prorrogacoes_data_limite_pagamento ' + 'cobranca_boletos_encargos_multas ' + 'cobranca_boletos_encargos_juros_mora ' + 'cobranca_boletos_pix ' + 'cobranca_boletos_faixa_nn_disponiveis'; BeneficiarioWS.IndicadorPix := false; WebService.Ambiente := taProducao; WebService.SSLHttpLib := httpOpenSSL; FACBrBoleto.ListadeBoletos.Clear; Titulo := FACBrBoleto.CriarTituloNaLista; Titulo.Vencimento := qContasReceberDATA_VCTO.AsDateTime; Titulo.DataDocumento := date; Titulo.NumeroDocumento := qContasReceberNUM_DOC.AsString; // Titulo.EspecieMod := edtEspecieMod.Text; Titulo.EspecieDoc := 'DM'; if Trim(qContaBancoBOLETO_ESPECIE.AsString) <> '' then Titulo.EspecieDoc := qContaBancoBOLETO_ESPECIE.AsString; if qContaBancoBOLETO_ACEITE.AsString = 'S' then Titulo.Aceite := atSim else Titulo.Aceite := atNao; Titulo.DataProcessamento := Now; Titulo.Carteira := qContaBancoBOLETO_CARTEIRA.AsString; Titulo.NossoNumero := qContasReceberNOSSO_NUMERO.AsString; Titulo.ValorDocumento := qContasReceberVALOR.AsFloat; Titulo.sacado.NomeSacado := qContasReceberCLIENTE.AsString; Titulo.sacado.CNPJCPF := OnlyNumber(qContasReceberCPF_CNPJ.AsString); Titulo.sacado.Logradouro := qContasReceberENDERECO.AsString; Titulo.sacado.Numero := qContasReceberNUM_CASA.AsString; Titulo.sacado.Bairro := qContasReceberBAIRRO.AsString; Titulo.sacado.Cidade := qContasReceberCIDADE.AsString; Titulo.sacado.UF := qContasReceberUF.AsString; Titulo.sacado.CEP := OnlyNumber(qContasReceberCEP.AsString); Titulo.LocalPagamento := ''; Titulo.ValorMoraJuros := 0; Titulo.ValorDesconto := 0; Titulo.ValorAbatimento := 0; Titulo.DataMoraJuros := qContasReceberDATA_VCTO.AsDateTime; // Titulo.DataDesconto := StrToDateDef(edtDataDesconto.Text, 0); Titulo.TipoDesconto := tdNaoConcederDesconto; // Titulo.DataAbatimento := StrToDateDef(edtDataAbatimento.Text, 0); // Titulo.DataProtesto := StrToDateDef(edtDataProtesto.Text, 0); // Titulo.PercentualMulta := StrToCurrDef(edtMulta.Text, 0); Titulo.CodigoMoraJuros := cjValorMensal; //Mensagem.Text := memMensagem.Text; Titulo.OcorrenciaOriginal.Tipo := toRemessaRegistrar; Titulo.QtdePagamentoParcial := 1; Titulo.TipoPagamento := tpNao_Aceita_Valor_Divergente; Titulo.PercentualMinPagamento := 0; Titulo.PercentualMaxPagamento := 0; Titulo.ValorMinPagamento := 0; Titulo.ValorMaxPagamento := 0; Boleto.Configuracoes.WebService.Operacao := tpConsultaDetalhe; Boleto.Configuracoes.WebService.Filtro.Clear; Boleto.Configuracoes.WebService.Filtro.indicadorSituacao := isbAberto; Boleto.Configuracoes.WebService.Filtro.dataMovimento.DataInicio := Date; Boleto.Configuracoes.WebService.Filtro.dataMovimento.DataFinal := Date; Boleto.Enviar; Retorno := Boleto.ListaConsultaRetornoWeb; if Retorno.Count > 0 then begin SLRetorno := TStringList.Create; try SLRetorno.Add('Cod_Retorno=' + Retorno[I].CodRetorno + sLineBreak + 'Msg_Retorno=' + Retorno[I].MsgRetorno + sLineBreak + 'Ori_Retorno=' + Retorno[I].OriRetorno + sLineBreak + 'HTTP_Result=' + IntToStr(Retorno[I].HTTPResultCode) + sLineBreak + 'JSON=' + Retorno[I].JSON); SLRetorno.Add('indicadorContinuidade=' + BoolToStr(Retorno[0].indicadorContinuidade)); SLRetorno.Add('proximoIndice=' + IntToStr(Retorno[0].proximoIndice)); SLRetorno.Add(' '); SLRetorno.Add(' '); for I := 0 to Pred(Retorno.Count) do begin SLRetorno.Add('[Boletos Index = ' + FormatFloat('000', I) + ']'); SLRetorno.Add('numeroBoletoBB = ' + Retorno[I].DadosRet.TituloRet.NossoNumero); SLRetorno.Add('dataRegistro = ' + DateToStr(Retorno[I].DadosRet.TituloRet.DataRegistro)); SLRetorno.Add('dataVencimento = ' + DateToStr(Retorno[I].DadosRet.TituloRet.Vencimento)); SLRetorno.Add('valorOriginal = ' + DateToStr(Retorno[I].DadosRet.TituloRet.ValorDocumento)); SLRetorno.Add('carteiraConvenio = ' + Retorno[I].DadosRet.TituloRet.Carteira); SLRetorno.Add('variacaoCarteiraConvenio = ' + intToStr(Retorno[I].DadosRet.TituloRet.Modalidade)); SLRetorno.Add('codigoEstadoTituloCobranca = ' + Retorno[I].DadosRet.TituloRet.codigoEstadoTituloCobranca); SLRetorno.Add('estadoTituloCobranca = ' + Retorno[I].DadosRet.TituloRet.estadoTituloCobranca); SLRetorno.Add('contrato = ' + Retorno[I].DadosRet.TituloRet.Contrato); SLRetorno.Add('dataMovimento = ' + DateToStr(Retorno[I].DadosRet.TituloRet.dataMovimento)); SLRetorno.Add('dataCredito = ' + DateToStr(Retorno[I].DadosRet.TituloRet.dataCredito)); SLRetorno.Add('valorAtual = ' + CurrToStr(Retorno[I].DadosRet.TituloRet.valorAtual)); SLRetorno.Add('valorPago = ' + CurrToStr(Retorno[I].DadosRet.TituloRet.ValorPago)); SLRetorno.Add(' --- '); end; panEnviando.Visible := true; memoLog.Clear; memoLog.Lines.Add(SLRetorno.Text); finally SLRetorno.Free; end; end;