Ir para conteúdo
  • Cadastre-se

automacaosamos

Membros
  • Total de ítens

    146
  • Registro em

  • Última visita

Tudo que automacaosamos postou

  1. sim, consegui show de bola.. obrigado
  2. não consegui, o cliente acabou mudando para o Santander e esse já tinha homologado. ai não mexi mais com o Bradesco, mas tenho um cliente aqui que estava precisando homologar o Bradesco, ou tentar com ele. Obrigado por perguntar Cido.
  3. Fiz as correções, mas agora na hora de receber o retorno do banco dá esse erro que esta no LOG em anexo. Funciona no Banco do Brasil e SICRED, mas num sei se no SANTANDER é diferente. try ACBrBoletoLocal.Enviar; if ACBrBoletoLocal.TotalListaRetornoWeb > 0 then begin for Retornado := 0 to Pred(ACBrBoletoLocal.TotalListaRetornoWeb) do begin varRejeicoes := ''; varQRPix := ''; varBarras := ''; for Rejeitados := 0 to Pred(ACBrBoletoLocal.ListaRetornoWeb[Retornado].ListaRejeicao.Count-1) do begin varRejeicoes := 'Campo=' + StrAllTrim(ACBrBoletoLocal.ListaRetornoWeb[Retornado].ListaRejeicao[Rejeitados].Campo) + '|' + 'Codigo=' + StrAllTrim(ACBrBoletoLocal.ListaRetornoWeb[Retornado].ListaRejeicao[Rejeitados].Codigo) + '|' + 'Versao=' + StrAllTrim(ACBrBoletoLocal.ListaRetornoWeb[Retornado].ListaRejeicao[Rejeitados].Versao) + '|' + 'Mensagem=' + StrAllTrim(ACBrBoletoLocal.ListaRetornoWeb[Retornado].ListaRejeicao[Rejeitados].Mensagem) + '|' + 'Ocorrencia=' + StrAllTrim(ACBrBoletoLocal.ListaRetornoWeb[Retornado].ListaRejeicao[Rejeitados].Ocorrencia) + '#'; end; if StrEmpty(varRejeicoes) then begin JSONData := GetJSON(ACBrBoletoLocal.ListaRetornoWeb[Retornado].JSON); varQRPix := JSONData.FindPath('qrCode').AsString; varBarras := JSONData.FindPath('codigoBarras').AsString; end; end; end; except on e: exception do begin gera_log(TimeToStr(Time) + ' ACBrBoletoLocal.Enviar: ' + StrClienteURL[0] + ' ' + e.message); Exit; end; end; ACBrBoletoDemo.ini Santander_51.log
  4. Olá estou tendo essa exceção ao enviar. 17:46:03 Retorno.Enviar: empresa Lista de Boletos está vazia 17:46:57 ACBrBoletoLocal.Enviar: empresa Erro: TBoletoW_SantanderMetodo DefinirServicoEAction nao Implementado envio em anexo o meu ACBrBoleto.ini pode ser configuração incorreta ? Obrigado Lazarus 3.4 - FPC: 3.2.2 empresa_9999999000199_51.ini
  5. obrigado, Eu fui nos fontes e achei, e forcei ele no ACBrNFSeX_Exemplo.ini Deu certo
  6. Olá Estou iniciando os teste para o envio em homologação no portal nacional da notas de serviço para o municio de Regente feijo - SP percebi que o município já esta solicitando a adesão das empresas para o novo modelo. fiz as configurações no componente, mas ao selecionar a cidade vi que não tem esse município disponível. o que é preciso fazer, tem como incluir essa cidade manualmente, ou precisa de algo mais ? Obrigado Aparecido Silva Desenvolvedor
  7. boa tarde, eu estou conseguindo receber o arquivo de retorno, enviado pelo aplicativo do banco mas quando tento enviar um titulo ele da a mensagem: 29/10/25 15:19:31:609 -03:00 - Falha Envio: Unable to open file "": O sistema não pode encontrar o caminho especificado. que arquivo que ele esta pedindo ? estou carregando normalmente os arquivos de certificado: ArquivoCRT=c:\caminho\empresa_9999999999999.crt ArquivoKEY= ArquivoPFX=c:\caminho\empresa_9999999999999.pfx
  8. Show de Bola, realmente faltava essa tag e a CFOP também não estava correto o correto era: <CFOP>6932</CFOP> Muito obrigado.
  9. Mandei validar antes de enviar e recebi tambem essas mensagem: Regra de negocios: Erro(s) nas Regras de negócios do Conhecimento: 196 502-Rejeição: Erro na Chave de Acesso - Campo Id não corresponde à concatenação dos campos correspondentes mas o ID esta correto, inclusive consigo consultar o ID na SEFAZ.
  10. Estou recebendo esse erro no envio --> 1871 - Element '{http://www.portalfiscal.inf.br/cte}ICMS': Missing child element(s). Expected is one of ( {http://www.portalfiscal.inf.br/cte}ICMS00, {http://www.portalfiscal.inf.br/cte}ICMS20, {http://www.portalfiscal.inf.br/cte}ICMS45, {http://www.portalfiscal.inf.br/cte}ICMS60, {http://www.portalfiscal.inf.br/cte}ICMS90, {http://www.portalfiscal.inf.br/cte}ICMSOutraUF, {http://www.portalfiscal.inf.br/cte}ICMSSN ). eu gerei normalmente o ICMS0 with imp.ICMS do begin ICMS00.CST := cst00; ICMS00.vBC := 1000; ICMS00.pICMS := 12; ICMS00.vICMS := 120; end; mas no XML ele não gera o que pode ser ? obrigado 35251004616748000174570010000001961000000013-cte.xml
  11. bom dia, obrigado por responder eu uso o monitor ACBrBoleto.ini
  12. Tentei de varias formas configurar o boleto do Bradesco, de outros bancos funciona tudo perfeito, mas o Brasdesco tá complicado: o suporte do banco me ajusdou a criar o .crt [WEBSERVICE] ClientID=fornecido pelo banco ClientSecret=fornecido pelo banco KeyUser= IndicadorPix=1 Scope=cobranca Ambiente=0 SSLHttpLib=3 SSLCryptLib=0 SSLXmlSignLib=0 SSLType=5 ArquivoCRT=c:\caminho\empresa_9999999999999.crt ArquivoKEY= ArquivoPFX=c:\caminho\empresa_9999999999999.pfx Senha=123456 VERSAODF=V2 UseCertificateHTTP=0 a resposta que tenho é: 16/10/25 19:27:50:766 -03:00 - Falha Envio: TBoletoW_BradescoOperação CONSULTA_BOLETO nao Implementado para este Banco 16/10/25 19:28:48:750 -03:00 - Falha Envio: TBoletoW_BradescoOperação CONSULTA_BOLETO nao Implementado para este Banco 16/10/25 19:38:13:587 -03:00 - Falha Envio: Unable to open file "": Bad address ja mudei todos os tipos de variações e nao achei nada no forum, alguem pode dar uma luz - por favor. obrigado
  13. Era isso mesmo a questao do certificado .pfx coloquei ele nos lugares certo, a ajustei no boleto.ini e foi normal obrigado
  14. Obrigado por responder. minha API, já envia NFe, MDFe, CTe normalmente a anos, nunca tive problemas. tentei usar versões do Almalinux 9, mas tive problemas justamente com o openssl. A versão que uso: OpenSSL 1.1.1k FIPS 25 Mar 2021 funciona muito bem. uso a versao Lnux: AlmaLinux release 8.9 (Midnight Oncilla) Cido
  15. Estou implementando o BoletoAPI Banco do Brasil. no windows vai tudo bem, registra o boleto e me devolve o Codigo de Barras e o Link de pagamento normalmente mas quando compilo para o linux ele registra o boleto normalmente mas não vem nenhum retorno em: ACBrBoletoLocal.TotalListaRetornoWeb ai não é possivel obter os dados de: ACBrBoletoLocal.ListaRetornoWeb[Titulos].DadosRet.TituloRet.EMV; ACBrBoletoLocal.ListaRetornoWeb[Titulos].DadosRet.IDBoleto.LinhaDig; é algum problema com a distribuição do Linux ? existe alguma forma de eu buscar depois o QRCode ? Obrigado
  16. Bom dia, recebi as instruções do ambiente de homologacao da nota de serviço da prefeitura de Martinopolis - SP em anexo mas ao envia em Homologação, não obtenho resposta, em produção usando o exemplo em Lazarus 3.6 FTP 3.2.2 funciona normalmente. onde posso alterar para o novo endereço de homologação: http://fi1.fiorilli.com.br:5663/IssWeb-ejb/IssWebWS/IssWebWS?wsdl obrigado Instruções.txt
  17. bom dia, monitorando o fontes do ACBrBoletoWS consegui, descobrir qual o problema na estrutura do nosso numero, problema resolvido Obrigado
  18. tentei dessa forma, conforme um exemplo que achei no forum, mas mesmo assim não funciona, se não carrega a lista de boleto ele da a mensagem que a lista esta vazia se carrega a lista ele diz que o nosso numero esta com dados inválido, mesmo pegando exatamente como esta no banco. ACBrBoletoLocal := TACBrBoleto.Create(nil); ConfiguraACBrBoleto; FiltrosAPI := ACBrBoletoLocal.Configuracoes.WebService.Filtro; FiltrosAPI.Clear; FiltrosAPI.indicadorSituacao := isbAberto; FiltrosAPI.indiceContinuidade := 0; FiltrosAPI.dataMovimento.DataInicio := StrToDate('01/02/2024'); FiltrosAPI.dataMovimento.DataFinal := StrToDate('22/02/2025'); ACBrBoletoLocal.Configuracoes.WebService.Operacao := TOperacao(4); FPURL := 'https://api.bb.com.br/cobrancas/v2'; DevAPP := '?gw-dev-app-key=' + ACBrBoletoLocal.Cedente.CedenteWS.KeyUser; NConvenio := '0003150107'; ID := '0000259795'; case ACBrBoletoLocal.Configuracoes.WebService.Operacao of tpConsultaDetalhe : FPURL := FPURL + '/boletos/'+ ID + DevAPP + '&numeroConvenio='+ NConvenio; tpConsultar : FPURL := FPURL + '/boletos/'+ ID + DevAPP + '&numeroConvenio='+ NConvenio; tpPIXConsultar : FPURL := FPURL + '/boletos/'+ ID + DevAPP + '&numeroConvenio='+ NConvenio; end; try ACBrBoletoLocal.Enviar; if ACBrBoletoLocal.TotalListaRetornoWeb > 0 then begin RetornoDetalhe := ACBrBoletoLocal.ListaRetornoWeb[0]; result := RetornoDetalhe.JSON; end; except on e: exception do gera_log(e.message); end; obrigado boletosbb.log
  19. Obrigado por responder. Desculpe mas não entendi, estou alimentando o componente da forma abaixo, com o nossonumero com 10 digitos estou fazendo a consulta em produção, porque já tinha um outro sistema em uso lá, usando a consulta , e conferi que o nosso numero esta alocado no banco. estou alimentando a lista de boleto da forma abaixo, não sei sé e a forma correta. ACBrTitulos := ACBrBoletoLocal.CriarTituloNaLista; with ACBrTitulos do begin EspecieDoc := 'DM'; Carteira := DataSetPortadores.FindField('PORTADORES_CARTEIRA').AsString; NossoNumero := StrZero(DataSetFinanceiros.FindField('FINANCEIROS_NOSSONUMERO').AsInteger,10,0); NumeroDocumento := Valor_Str(DataSetFinanceiros.FindField('FINANCEIROS_NUMERO').AsInteger); Vencimento := DataSetFinanceiros.FindField('FINANCEIROS_VENCIMENTO').AsDateTime; ValorDocumento := DataSetFinanceiros.FindField('FINANCEIROS_ORIGINAL').AsFloat; Sacado.CNPJCPF := DataSetFinanceiros.FindField('PESSOAS_CPFCNPJ').AsString; end; ACBrBoletoLocal.ListadeBoletos.Add(ACBrTitulos); e se uso a Operacao := tpConsultaDetalhe; ele apresenta a mensagem: Campo nosso numero preenchido com dados inválidos. tentei de varias formas preencher no NossoNumero com 6 digitos, 10 digitos, colocando o convenio na frente e nada minha duvida é como preencho nesse caso o nosso numero para que os titulos possam vir de forma detalhada obrigado.
  20. estou començando agora usar o ACBrBoleto API e apareceu essa situação na consulta individiual de titulos. ACBrBoletoLocal.Configuracoes.WebService.Operacao = tpConsulta, eu consigo trazer os titulos baseados nos filtros normalmente mas preciso consultar individual a partir da lista, ai tenho a mensage: Campo nosso numero preenchido com dados inválidos. pesquisei aqui no forum e nao achei nada, o que posso ter faltado preencher ?? coloquei em anexo a minha procedure, alguem poderia dar umas dicas de como consultar individual o titulo ?? Obrigado Lazarus 3.6 - FPC 3.2.2 ConsultaAPI.pas
  21. Antigo: 201.63.114.134:8081/IssWeb-ejb/IssWebWS/IssWebWS?wsdl Novo: http://38.211.3.230:8081/IssWeb-ejb/IssWebWS/IssWebWS?wsdl parece que isso fica gravado no: ACBrNFSeXServicos.ini
  22. Ok, agradeço a atençao.... obrigado
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.