automacaosamos

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

bom dia, monitorando o fontes do ACBrBoletoWS consegui, descobrir qual o problema na estrutura do nosso numero, problema resolvido Obrigado

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

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.

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

ok Obrigado.

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

Ok, agradeço a atençao.... obrigado

Estou tendo esse erro com a nota de Serviço FIORILLI de Martinópolis. gostaria de saber se o problema é no ACBrNFSEx ou no webservice da prefeitura, ou como devo proceder já tentei falar com o suporte deles, mas pelo jeito lá ninguem nem entende de webservice, até começo de Dezembro funcionava normal. metodo: ACBrNFSeX1.ConsultarNFSeporNumero(''); Erro(s): Código : X999 Mensagem: Erro de Conexão: soap:Server - java.lang.IllegalArgumentException: Parameter value [2699] did not match expected type [java.lang.Long] Correção: --------- Agradeço a colaboracao. obrigado

bom dia eu entrei em contato com a Fiorilli, e eles disseram que não houve nenhuma alteração no WEBSERVICE deles. tem alguma ideia de qual pode ser o problema do erro acima ?? Obrigado

Bom dia, Estava testando normalmente o ACBrNFESex no municipio de MARTINOPOLIS - SP, comecou a dar a mensagem anexa, pelo que percebi ele atualizaram a versao do aplicativo de 3.6.4 para 3.6.5 será que é o problema ?? Erro(s): Código : X999 Mensagem: Erro de Conexão: soap:Server - java.lang.IllegalArgumentException: Parameter value [2694] did not match expected type [java.lang.Long] Correção: --------- Obrigado

bom dia Não costumo jogar os exemplo do ACBr no meu sistema, geralmente reconstruo, mas com base nos exemplos do ACBr, não fazia ideia que o TWEBBrowse pudesse provocar tais problemas, nunca tive com ele. mas realmente era ele o causador dos males, após remover não ocorreu mais nenhuma mensagem CoInitialize. Obrigado!

será que existe alguma solução para o Coinitialize ?? ja tentei de tudo, criar o form em tempo de execuçao, troquei em varios lugare o CoInitialize(nil); ele até faz uns TEFs mas depois do terceiro comeca a dar a mensagem. obrigado

minhas configuracoes do componente Configuracoes.Certificados.Senha := StrAllTrim(CONFIG_SENHACERTIFICADO); Configuracoes.Certificados.ArquivoPFX := ExtractFilePath(Application.ExeName) + StrAllTrim(F_DATMOD.TB_CADEMP.FindField('EMPCNP').AsString) + '.pfx'; Configuracoes.Geral.SSLLib := libOpenSSL; Configuracoes.Geral.SSLCryptLib := cryOpenSSL; Configuracoes.Geral.SSLHttpLib := httpOpenSSL; Configuracoes.Geral.SSLXmlSignLib := xsLibXml2;

eu implementei o ACBrNFCe consumidor na minha aplicação, e estou tendo sucessivos bloqueios por CoInitialize(nil); ja fiz a sugestões abaixo ma mesmo assim continua, antes usava o ACBrSAT e quando ajustei conforme abaixo parou o problema, mas com a ACBRNFCe consumidor continua contantes, estou usando o xACBrNFeDANFeESCPOS pra imprimir o DANFE e Delphi 7 Obrigado uses ActiveX; ... procedure TForm1.FormCreate(Sender: TObject); begin CoInitialize(nil); end;

sim certo, colocando a versao do FastReport Enterprise Obrigado

OK Obrigado...

Visto que foi tirado o ACBrNFeDANFCeFortes estou tentando ajustar meus fontes no Delphi7 com a nova forma. mas o exemplo qu esta em: C:\ACBr\Exemplos\ACBrDFe\ACBrNFe\Delphi DANFe FR esta apresentando erro, até os componentes ACBrNFeDANFeESCPOS parece que nao esta vindo mais no SVN . como resolver? [Warning] ufrmPrincipal.pas(42): Unit 'ACBrUtil' is deprecated [Error] ufrmPrincipal.pas(146): Undeclared identifier: 'ACBrNFeDANFEFR1' [Error] ufrmPrincipal.pas(146): Missing operator or semicolon [Error] ufrmPrincipal.pas(147): Undeclared identifier: 'ACBrNFeDANFCEFR1' [Error] ufrmPrincipal.pas(147): Missing operator or semicolon

Muito Obrigado....

puxa, que legal... obrigado bom trabalho a todos ai..

o que quer dizer que foi criado a TK-6399 ??

obrigado, a de produçao é essa: http://201.63.114.134:8081/IssWeb-ejb/IssWebWS/IssWebWS?wsdl homologação: fi1.fiorilli.com.br:5663/IssWeb-ejb/IssWebWS/IssWebWS?wsdl não endendi, onde devo inserir essas URLs Obrigado

Estou tentando usar o ACBrNSEx pra cidade de MARTINOPOLIS-SP, ela usa io FIORILLI, já fiz pra outras cidades, como adicionar essa cidade ?? Obrigado

Incluse acabei de instalar uma VM no virtuabox com o AlmaLinux 8.10 e funciona sem problemas, mas vejo que a versao 8.10 usa o openssl1.1.1k e o Debian usa a versão Openssl 3.0.15, num seria um problema de incompatibilidade com o openssl ??

sim procurei a lib e dei o sequinte comando: cd /usr/lib/x86_64-linux-gnu sudo ln -sf libxml2.so.2.9.14 libxml2.so mesmo assim o mesmo erro persiste.