AnDes Sistemas

Boa Tarde! Muito obrigado pela ajuda. Podem fechar este tópico.

Bom Dia! A porção de código que está dando erro é esta aqui : procedure TdmdModImportaNFCe.carregarItems(cfe: TCFe); var item : TDetCollectionItem; veja que estou declarando esta variável utilizando a unit : pcnCFe. O problema é que vou precisar também da unit : pcnNFe. Se eu declarar ela também , ocorre o erro de : Incompatible types: 'pcnNFe.TDetCollectionItem' and 'pcnCFe.TDetCollectionItem' Grato

Companheiros Gostaria de solicitar sua ajuda para o seguinte problema: Se eu declarar nos Uses no formulário as units : pcnCFe e pcnNFe resulta sempre no seguinte erro: Incompatible types: 'pcnNFe.TDetCollectionItem' and 'pcnCFe.TDetCollectionItem'. Apenas fazendo menção destas units no Uses resulta no erro acima. Sabem os companheiros o que posso fazer para evitar este erro? Grato

Companheiros Estou atualmente com o seguinte problema : Tenho clientes cujo Banco de Dados Firebird é 2.5 e outros estão no 3.0. O problema é que preciso criar um Generator. No Firebird 2.5 não existe necessidade de dar um Grant no Generator ( se tentar dar grant ocorre um erro ). Já no Firebird 3.0 é obrigatório o Grant Generator. Assim, pensei para criar uma estrutura de atualização única , através de um Execute Block que procederia da seguinte forma : - cria o Generator - verifica a versão do Banco de Dados - se versão = 3.0 executa comando do Grant Minha dúvida é se eu posso fazer uma rotina desta forma, misturando comandos DDL e DML. Obrigado

Sr. Italo Bom Dia! Estou procedendo conforme orientado. Estou migrando para o componente ACBrNFSeX e já vou colocar para uso no meu cliente. Se eu tiver alguma dúvida no processo de desenvolvimento eu vou postando aqui no Forum. Por favor, pode fechar este tópico. Muito obrigado por sua atenção.

Sr. Italo No nosso ERP temos uma única configuração da Assinatura Digital, que ficou assim: Isto é usado tanto para NFE quanto para NFSe. Talvez eu precise brevemente então criar uma parâmetro para configuração específica para a NFSe. Pela mensagem de erro que reportei o senhor acha que por estar sendo causado pela configuração acima ?

Sr. Italo A minha função é fazer uma manutenção o mais breve possível no Sistema e disponibilizar para o cliente. O senhor acha que posso colocar este novo componente em produção? A causa do erro que reportei acima é o componente antigo ou pode alguma falha no nosso ERP ? Grato

Sr. ìtalo Boa Tarde! Não, o projeto é antigo e utiliza o componente : TAcbrNFSE somente. É melhor trocar então ? Grato

Companheiros Gostaria de solicitar ajuda aos senhores! Estou tendo que fazer manutenção em um sistema que faz Emissão da Nota Fiscal Eletrônica de Serviços, padrão GINFES e confesso que não sou muito experiente no assunto. O Sr. Italo anteriormente havia me orientado a fazer melhorias no processo do envio da NFSe; O foco das mudanças que estou fazendo é aprimorar o fluxo do ações do nosso ERP para correto envio da NFSe . O problema é que toda vez que tento efetuar consulta ( comando : ConsultarNFSeporRps ), sempre resulta no seguinte erro : <center><h1>400 Bad Request</h1></center> <center>No required SSL certificate was sent</center> Eu constatei que no momento da realização da consulta o sistema está passando corretamente o Número de Série do Certificado Digital ( Configuracoes.Certificados.NumeroSerie ) e bem como os demais parâmetros. Eu lio Arquivo XML gerado e não consigo entender o que pode estar errado. Podem os companheiros me auxiliar a entender o problema? Grato Carlos Augusto Franca-Sp

Sr. Itálo Então o problema está ocorrendo pelo fato que o Programa não trabalha atualmente com Número de Lote! Vou efetuar ajuste para passar o Nro. Lote e realizar as tarefas nesta sequência. Muito obrigado por sua ajuda. Por favor, podem fechar este tópico.

Prezados Companheiros Gostaria de solicitar auxílio dos senhores novamente. Fui encarregado de fazer manutenção num Programa que tem por finalidade fazer a transmissão da Nota Fiscal Eletrônica de Serviços. Esta ocorrendo , de forma aleatória, o seguinte erro : Código de Erro : E4 - Esse RPS nao foi enviado para a nossa base de dados Envie o RPS para emissao da NFS-e. O provedor utilizado é o : GINFES. Não sou especialista em NFSe, mas procurei fazer uma leitura completa do código-fonte para avaliar como foi constituido. Verifiquei a seguinte sequência de comandos na utilização do componente TAcbrNfse: a)-AcbrNfse.ConsultarNFSeporRps b)-Se constatada inexistência da Nota Fiscal : AcbrNfse.Enviar Mas mesmo assim ocorre o erro acima. Podem os companheiros me auxiliar indicando o que pode estar ocasionando este erro ? Existem outros comandos que devem ser executados antes do Enviar? Grato Carlos Augusto Franca-Sp

Muito obrigado pela Informação. Por favor, se desejar pode fechar este tópico.

Prezados Companheiros Gostaria de solicitar novamente sua ajuda. Estou interessado em utilizar o componente AcbrSpedTabelas para baixar todas as Tabelas Oficiais dos Sped : Fiscal, Contribuições e ECF. Apenas gostaria de resolver a seguinte dúvida : O componente : AcbrSpedTabelas ao executar os comandos : ListarTabelas "enxerga" somente as últimas versões das Tabelas ou pesquisam versões anteriores também ? Grato por sua ajuda.

Sr. Juliomar O responsável pelo faturamento no meu cliente me reportou que como não deu certo excluir o arquivo : ACBrCTeServicos.ini ele copiou o conteúdo desta url : https://github.com/frones/ACBr/blob/master/Fontes/ACBrDFe/ACBrCTe/ACBrCTeServicos.ini e sobrescreveu e aí teve sucesso na transmissão do CTe. Conseguiu fazer transmissão em Homologação e Produção. Portanto acredito que podem fechar esta discussão. Obrigado

Prezados Companheiros Gostaria de solicitar sua ajuda. Efetuamos atualização do ACBR nesta semana. Ao fazer teste de envio do Conhecimento de Transporte Eletrônico constatamos o seguinte erro: EACBrDFeException URL para o serviço "URL-QRCode" não encontrada na sessão "CTe_SP_H" no arquivo "ACBrCTeServicos" Eu pensei que fosse problema no arquivo : ACBrCTeServicos.INI e resolvi exclui-lo, mas ocorreu erro de : EResNotFound Resource ACBrCTeServicos not found Sabem como eu posso resolver este problema? Grato

Prezados Companheiros Gostaria de solicitar sua ajuda para o seguinte assunto : no final do ano passado fiquei sabendo que o Governo do Ceará não ter mais servidor próprio e à partir de Janeiro/2022 iria começar a utilizar o Servidor do Rio Grande do Sul. Constatamos no forum que o ACBR já estava preparado para esta mudança. Assim, atualizamos o os fontes do ACBR ontem e compilamos nossas aplicações. Porém, quando tentamos fazer teste de envio de NFE em Homologação é sempre exibida mensagem de erro : "Servico Paralisado sem Previsao". Será que além do que já foi feito teríamos também que implementar código parecido com este : if (qryEmpresa.FieldByName('CODESTADO').AsString = 'CE') then acbrNota.Configuracoes.WebServices.UF := 'RS'; Grato

Sr. Daniel Sua sugestão resolveu o meu problema. Utilizando a Synapse a consulta funcionou plenamente. Aproveitei a oportunidade e desenvolvi uma Consulta ao Contribuinte utilizando também os componentes : AcbrNfe e AcbrConsultaCNPJ. Muito obrigado por sua ajuda.

Sr. Daniel Boa Noite! Muito interessantes estes links que o senhor apontou. Estou estudando eles para fazer ajuste na aplicação. Muito obrigado.

Sr. Juliomar Muito obrigado por sua ajuda. Vou fazer atualização do Indy. Também mandei um email para o pessoal de ti deste site : www.receitaws.com.br solicitando ajuda. Se desejarem já podem fechar este post.

Sr. Juliomar Bom Dia! Efetuei o seguinte ajuste : IdSSLIOHandlerSocketOpenSSL1.SSLOptions.SSLVersions := [{sslvSSLv2, sslvSSLv3,} sslvTLSv2]; Mas continua resultando no seguinte erro ( : Será que é uma limitação do Delphi em que o Erp foi desenvolvido ? ( Delphi XE2 )? O senhor teria mais alguma sugestão ? Grato

Companheiros Gostaria de solicitar ajuda dos amigos para um assunto que tenho pouco domínio. Em um sistema legado que estou encarregado de fazer manutenção, existe um recurso já antigo para interagir com a seguinte Api : https://www.receitaws.com.br/v1/cnpj/[cnpj]. O problema é que imagino que os mantedores deste site devem ter mudado os requisitos do GET para TLS. O Código-fonte em vigor é o que listo abaixo ( que utiliza o componente Indy IDHttp ). O resultado desta rotina é o seguinte erro : Error connecting with SSL. Error connecting with SSL. error:14077410:SSL routines:SSL23_GET_SERVER_HELLO:sslv3 alert handshake failure Podem os companheiros me auxiliar indicando o que posso mudar para resolver o erro ? Grato Código-Fonte: IdSSLIOHandlerSocketOpenSSL1 := TIdSSLIOHandlerSocketOpenSSL.Create(nil); IdHTTP1 := TIdHTTP.Create(nil); IdSSLIOHandlerSocketOpenSSL1.Name := 'IdSSLIOHandlerSocketOpenSSL1'; IdSSLIOHandlerSocketOpenSSL1.Port := 0; IdSSLIOHandlerSocketOpenSSL1.DefaultPort := 0; IdSSLIOHandlerSocketOpenSSL1.SSLOptions.Method := sslvSSLv23; IdSSLIOHandlerSocketOpenSSL1.SSLOptions.SSLVersions := [sslvTLSv1]; IdSSLIOHandlerSocketOpenSSL1.SSLOptions.Mode := sslmBoth; IdSSLIOHandlerSocketOpenSSL1.SSLOptions.VerifyMode := []; IdSSLIOHandlerSocketOpenSSL1.SSLOptions.VerifyDepth := 0; IdHTTP1.Name := 'IdHTTP1'; IdHTTP1.IOHandler := IdSSLIOHandlerSocketOpenSSL1; IdHTTP1.Request.ContentLength := -1; IdHTTP1.Request.ContentRangeEnd := -1; IdHTTP1.Request.ContentEncoding := 'utf-8'; IdHTTP1.Request.ContentType := 'application/json'; IdHTTP1.Request.ContentRangeStart := -1; IdHTTP1.Request.ContentRangeInstanceLength := -1; IdHTTP1.Request.Accept := 'text/javascript'; IdHTTP1.Request.BasicAuthentication := False; URL = ' https://www.receitaws.com.br/v1/cnpj/27865757000102'; IdHTTP1.Get(url, retorno);

Prezados Companheiros Boa Noite! Possuimos em nosso ERP recurso para criação e transmissão de Conhecimento de Transporte Eletrônico , utilizando o ACBR, em funcionamento há alguns anos. Porém, nesta semana constatamos que ocorre o seguinte problema no momento de transmissão do CTe: Não conseguimos ver qualquer lógica neste problema porque o ambiente no servidor é o mesmo há algum tempo, com a última atualização do Acbr realizada no início de Julho/2021. A configuração de Assinatura Digital é a mesma da NFE ( que funciona normalmente ) é a seguinte : Por acaso os companheiros já passaram por este problema ? Conseguem imaginar o que possa estar ocasionando este erro? Grato pela ajuda.

Sr. Italo Questionei o colaborador do Suporte e este afirmou que a configuração está conforme o sr. sugeriu e mesmo assim permanece erro (veja imagem abaixo ). Uma questão que me ocorreu agora : será que o problema está relacionado com usar o componente AcbrNFE para fazer este tipo de consulta? Será melhor utilizar outro componente ?

Prezados Companheiros Boa Tarde! Temos em nosso ERP uma rotina desenvolvida há bastante tempo que faz consulta de Contribuinte utilizando o componente AcbrNfe , método : ConsultaCadastro. Referida rotina sempre funcionou perfeitamente. Porém, à partir da semana passada começou ocorrer o erro : Error connecting with SSL. Error connecting with SSL. error:14077410:SSL routines:SSL23_GET_SERVER_HELLO:sslv3 alert handshake failure Sabem os companheiros porque está ocorrendo este tipo de erro ? Grato

Olá, Há um tempo atrás, eu ouvi de que os componentes "ACBrConsultaCPF" e "ACBrCEP" tinham sido adicionados ao ACBrLib. Entretanto, quando eu fui checar a documentação, (https://acbr.sourceforge.io/ACBrLib/BemVindo.html) eu não encontrei nenhuma menção desses dois componentes. Queria perguntar então se eles estão implementados no ACBrLib ou não, e se estiverem, peço que passem o link da documentação.