AG Sistemas

bom dia ! Obrigado pela indicação, http://www.ararat.cz/synapse/doku.php/public:howto:tcpwithssl o uso parece ser bem simples. Mas eu não consegui instalar para utilizar o synapse.

Boa tarde! Pessoal preciso consumir um serviço via socket. Eu acredito que pelo acbr tem como consumir isso teria algum exemplo ? Desde ja agradeço

Bom dia! Segue anexo uma correção no layout pq quando o pagador não tem telefone o certo seria não passar a tag e esta passando. ACBrBoletoW_BancoBrasil.pas

Boa tarde ! Pode fechar o tópico o problema do e-mail era o servidor de e-mail deles que estava travando.

Boa tarde! Obrigado pela atenção deu certo o registro automático do boleto. Temos q ver agora o problema do @Fernando Rodrigo que ainda não conseguiu.

@Juliomar Marchetti @José M. S. Junior coloquei as dll que uso no sistema e deu certo gerou a requisição e o retorno. Agora irei fazer o teste com o meu sistema obrigado

Bom dia ! Estou usando as DLL que que estão na pasta do demo.

Acabei de fazer o teste. Colocando para rodar na minha maquina funciona o teste do ACBR copiando a mesma pasta para o meu servidor ele da erro . e não salva arquivo de resposta de erro para saber oque poderia ser

Boa tarde! Pessoal estou tento problemas para colocar para rodar no projeto em produção estou tentando fazer o passo a passo do manual para liberar mas não da certo ele da esta mensagem. quando faço no meu pc ele responde e rapidinho alguém ja passou por isso ?

isso eu coloco depois do send ou antes ?

Bom dia! Não tem muito a ver com o tópico. Mas estou tendo um problema de rejeição de mensagem não esta chegando no servidor de email. O pessoal do email pediu para eu mandar o log da resposta do servidor e o cabeçalho do email não sei como pegar o cabeçalho desde já agradeço.

Boa tarde!! Consegui transmitir o boleto!! Tive um problema com a espécie do documento Passei 'DM' como o de costume mas ele não aceita. codigoTipoTITULO Short (4) Sim Domínios Válidos 1 = CHEQUE 2 = DUPLICATAMERCANTIL 4 = DUPLICATASERVICO 6 = DUPLICATARURAL 7 = LETRA-DECAMBIO 12 = NOTAPROMISSORIA 13 = NOTAPROMISSORIARURAL 17 = RECIBO 19 = NOTA-DEDEBITO 23 = DIVIDAATIVA-UNIAO Código adotado pela FEBRABAN para identificar o tipo para o Título de Cobrança. 25 Manual de Integração – Registro Online de Títulos de Cobrança 24 = DIVIDAATIVA-ESTADO 25 = DIVIDAATIVAMUNICIPIO

Bom dia @José M. S. Junior! Verifica está função também pq é onde salva ou não arquivo de resposta e iria dar o mesmo problema com o campo documento e eu acho importante dando certo ou não gravar a resposta do servidor. function TBoletoWSSOAP.Enviar: Boolean; begin FBoletoWS.FRetornoBanco.CodRetorno:= 0; FBoletoWS.FRetornoBanco.Msg := ''; FPAuthorization:= ''; DefinirURL; DefinirEnvelopeSoap; FPEnvelopeSoap := UTF8ToNativeString(FPEnvelopeSoap); //Grava xml gerado if Boleto.Configuracoes.Arquivos.LogRegistro then WriteToTXT( FBoletoWS.ObterNomeArquivo, FPEnvelopeSoap , False, False); try Executar; finally Result := (FDFeSSL.HTTPResultCode in [200, 201, 202]); WriteToTXT( ifthen( EstaVazio(Boleto.Configuracoes.Arquivos.PathGravarRegistro), PathWithDelim( ApplicationPath ), PathWithDelim( Boleto.Configuracoes.Arquivos.PathGravarRegistro )) + FormatDateTime('ddmmyyhhnn',Now) +'-'+ C_RETORNO_REGISTRO + '.xml', FRetornoWS ,False, False); // if Result then //Grava xml retorno // WriteToTXT( ifthen( EstaVazio(Boleto.Configuracoes.Arquivos.PathGravarRegistro), // PathWithDelim( ApplicationPath ), PathWithDelim( Boleto.Configuracoes.Arquivos.PathGravarRegistro )) // + Titulos.NumeroDocumento +'-'+ C_RETORNO_REGISTRO + '.xml', FRetornoWS ,False, False); end; end;

Estou tendo erro quando envio que é "Dados de entrada inválidos." segundo o manual é campo que esta estourando o tamanho dele . Comparei com o manual e acredito que o problema esteja no percentual esta gerando com varias casas e no manual fala somente 2. Desde já agradeço.

Teria como no mudar esta função que esta abaixo . pq antes ele gerava o arquivo usando o documento e o documento nos passamos exemplo " 00001-01/10, 00001-02/10, 00003-01/10 " e pelo fato de ter a "/" dava erro para gerar o arquivo. function TBoletoWS.ObterNomeArquivo: String; var lPath: String; begin if EstaVazio(Boleto.Configuracoes.Arquivos.PathGravarRegistro) then lPath := PathWithDelim( ApplicationPath ) else lPath := PathWithDelim( Boleto.Configuracoes.Arquivos.PathGravarRegistro ); Result := lPath + 'Rem' + FormatDateTime('ddmmyyhhnn',Now) +'-'+ C_REGISTRO_BOLETO + '.xml'; end;

Boa tarde ! Não estou achando a propriedade indicadorPermissaoRecebimentoParcial

Como ativo o LOG para conseguir acompanhar ?

Bom dia ! Estou fazendo agora teste com os meus dados e tive esta mensagem ! Seria algum cadastro no banco ?

Fiz a instalação do certificado mas o erro continua! Mas alguma ideia do que fazer ?

é a chave "J" que é usada para acessar o banco

É necessário instalar o certificado conforme mostra no manual ??

Obrigado por responder ! Eu coloquei as dll na pasta coloquei as configurações que faltava esta dando este erro.

obrigado @Juliomar Marchetti achei aqui coloquei os códigos mas não era este o problema. Ele esta sentindo falta do Token

bom dia! Estou começando a fazer os testes usado o gerador de boleto. Coloquei os dados da conta no mesmo, mas não achei onde coloco : para "HOMOLOGAÇÃO" ClientID: eyJpZCI6IjgwNDNiNTMtZjQ5Mi00YyIsImNvZGlnb1B1YmxpY2Fkb3IiOjEwOSwiY29kaWdvU29mdHdhcmUiOjEsIn NlcXVlbmNpYWxJbnN0YWxhY2FvIjoxfQ Client Secret: eyJpZCI6IjBjZDFlMGQtN2UyNC00MGQyLWI0YSIsImNvZGlnb1B1YmxpY2Fkb3IiOjEwOSwiY29kaWdvU29mdHdhc mUiOjEsInNlcXVlbmNpYWxJbnN0YWxhY2FvIjoxLCJzZXF1ZW5jaWFsQ3JlZGVuY2lhbCI6MX0 e com isso da erro na geração do token.

Bom dia... Resolveu apenas atualizando o XML? Estou com o mesmo Problema...