Pesquisar na Comunidade

Boa tarde, Consegui consumir o webservice do santander para emitir boleto via XML, usando THPPRIO com delphi xe8. Gerei as units do wsdl e tudo trabalha bem. Mas, meu problema é que com THTTPRIO, toda vez que executo eu tenho que selecionar o certificado. O ACBr não trabalha assim. Uma vez configurado o certificado em tempo de projeto ele não fica perguntando. Preciso consumir o serviço sem que o componente me pergunte pelo certificado em tempo de execução. Resolvi,então, tentar com os componentes ACBr para ver se dava certo. Andei olhando os fontes do ACBr para Envio de NFS-e como base de estudo, mas não cheguei a nenhuma conclusão. Tentei algo assim, mas meu conhecimento dos fontes não é suficiente. Alguem poderia me ajudar com esse codigo para carregar o certificado A1 para usar com TACBrWinHTTPReqResp e enviar o soap? Stream:=TMemoryStream.Create; ACBrWinHTTPReqResp1:=TACBrWinHTTPReqResp.Create; try //Como faço para CarregarCertificado; ACBrWinHTTPReqResp1.MimeType:='application/soap+xml; charset=utf-8'; ACBrWinHTTPReqResp1.Url:='https://ymbdlb.santander.com.br:443/dl-ticket-services/TicketEndpointService'; ACBrWinHTTPReqResp1.SOAPAction:=''; ACBrWinHTTPReqResp1.EncodeDataToUTF8:=true; Stream.Position:=0; Request.lines.SaveToStream(Stream); Stream.Position:=0; ACBrWinHTTPReqResp1.Execute(Stream); resp:=ACBrWinHTTPReqResp1.Data; finally Stream.Free; ACBrWinHTTPReqResp1.Free; end; Esse codigo aqui funciona com THPPRIO, mas sempre pede o certificado em tempo de execução. A unit do wsdl não foi adiciconada aqui, mas quem quiser contribuir, posso compartilhar essa unit. function TfrmPrincipal.enviaPedidoTicket:string; var tickend:TicketEndpoint; pedido:ticketResponse; tickReq:ticketRequest; RIO: THTTPRIO; begin RIO := THTTPRIO.Create(nil); with RIO.HTTPWebNode do begin ClientCertificate.CertName:='XXXXXXXXXXXXXXXXXXXX'; ClientCertificate.Issuer:='AC Certisign RFB G5'; ClientCertificate.SerialNum:='XXXXXXXXXX'; Password:='1234'; UseUTF8InHeader:=true; end; tickend := GetTicketEndpoint(true,'',RIO); tickReq:=ticketRequest.Create; geraArrayTicket(tickReq); //geraXmlTicket(); try pedido := tickend.create(tickReq); result:=''; with pedido do begin if retCode=0 then begin result:=ticket; end; end; except on e:exception do begin showmessage(e.Message); end; end; end;

Ola boa tarde, estou configurando boleto Santander, estou encontrando algumas dificuldades. na hora de enviar as configurações/títulos o acbr me da esta mensagem erro ao ler arquivo de entrada ou parametro incorreto (ja fez varias pesquisas no forum mas nao encontrei nada que me ajudasse) estou utilizando acbr 1.2.0.54 segue em anexo os arquivos de configuração e titulos. Obrigado Ivã cedente.ini titulos.ini

Bom dia a todos, estou tentando gerar arquivo remessa para o banco Santander carteira 101 mas o número/dígito do cedente e também a carteira nunca aparecem dentro do arquivo gerado como aparecia quando eu usava o CobreBem, alguém pode me dizer onde estou errando? Já li diversos tópicos no fórum e as vezes o pessoal comenta que é necessário usar o código de transmissão Santander, outras vezes código do cedente + dígito num total de 7 posições. Estou informando as propriedades problemáticas assim: ... ... ACBrBOLETO.LayoutRemessa := c240; ACBrBOLETO.Cedente.TipoCarteira := tctRegistrada; ACBrBOLETO.Cedente.ResponEmissao := tbBancoEmite; ACBrBOLETO.Cedente.CaracTitulo := tcSimples; ACBrBOLETO.Cedente.Modalidade := '101'; //número da carteira ECR2 no CobreBem ACBrBOLETO.Cedente.CodigoCedente := '145025' + '1'; //código e dígito do cedente ... with vACBrTitulo do begin ... Carteira := '101'; //número da carteira ECR2 no CobreBem ... end; ... ... Grato por qualquer ajuda/dica, minha versão do ACBr é de 08/04/2015 e acompanhando de lá pra cá não vi mudanças na rotina do Santander.

Mandei a imagem em anexo, a carteira do banco para homologar tem que estar apenas 101 ?? Estou tentando homologar e me pediu que ficasse apenas 101 porém informa a modalidade e o cedente ai fica 101/101, fica assim mesmo ????

Galera estou lendo um arquivo de retorno do Santander pelo o componente ACBR BOLETO, mas quando ele vai ler a ocorrência da linha do título, ai vem o famoso erro: First chance exception at $75EAC41F. Exception class EAccessViolation with message 'Access violation at address 011E2ECA in module 'Teste.exe'. Read of address 00000014'. Process Teste.exe (4624)Quando eu debuguei ele deu o erro nessa linha Titulo.OcorrenciaOriginal , ele não consegue acessa a variável Titulo: TACBrTitulo, alguém pode me ajudar?

Depois de tentar homologar o boleto no Santander, precisei corrigir um detalhe no arquivo, peço que seja analisado e incrementado na atualização ACBrBancoSantander.pas --> linha 257 Atual : Copy(NossoNumero,6,7) + DigitoNossoNumero correto : Copy(NossoNumero,2,7) + DigitoNossoNumero Espero ter ajudado;;; Daniel Pio Programador