Ir para conteúdo
  • Cadastre-se

Painel de líderes

Conteúdo popular

Showing content with the highest reputation on 10-10-2022 em Posts

  1. ACBrLibGTIN Visulizar Arquivo ACBrGTIN - Biblioteca para consulta de Códigos GTIN na Base da Sefaz, através do Serviço disponibilizado pela SVRS Faça Download pelo SVN, dos Demos de uso da ACBrLibGTIN em diversas linguagens, usando o endereço: http://svn.code.sf.net/p/acbr/code/trunk2/Projetos/ACBrLib/Demos/ Manual On-Line: https://acbr.sourceforge.io/ACBrLib/ACBrLib.html Autor Daniel Simoes Enviado 05-10-2022 Categoria ACBrLib - PRO  
    1 ponto
  2. Segue o componente atualizado para versão S-1.1, NT 06/2022 item 3.2. e programa exemplo corrigido. O teste de geração e assinatura dos eventos foi feita através do programa exemplo. Algumas observações importantes: 1 - Ainda não foi possível testar o evento de retorno S-5501; 2 - O evento S-2501 está sendo gerado de acordo com as especificações que constam no portal, porém, ao validar o evento gerado pelo programa exemplo, está apresentando mensagem de erro; 3 - Foi necessário corrigir o programa fonte pcnConversao.pas e pcnGerador.pas que ficam na pasta pcnComum para incluir campo com uma casa decimal. Existem eventos que precisam de campo com apenas uma casa decimal (tag qtdMesesRRA dos rendimentos recebidos acumuladamente); 4 - Outras atualizações anteriores também foram feitas para adequar ao leiaute dos eventos. Lembrando que a versão S-1.1 está sendo usada na somente produção restrita. ACBreSocial.zip Delphi-Exemplo.zip eSocial Versão S-01-01-00 - Adaptação do componente ACBr.xlsx veS01_01_00.zip
    1 ponto
  3. Bom dia! Alteração disponibilizada no SVN, por favor, atualize seus fontes, reinstale o ACBr e faça novos testes. Para mais detalhes do que foi alterado, por favor consulte https://sourceforge.net/p/acbr/code/26996/.
    1 ponto
  4. Bom dia Widson, Você está se referido a versão do Tortoise? Que eu saiba a versão dele não influencia em nada. Acredito que na máquina que não está ocorrendo a atualização é porque a unit que sofreu atualização se encontra alterada nessa máquina. Verifica se existe alguma unit com uma bolinha vermelha ou triangulo amarelo em seu ícone. Caso afirmativo, delete, atualize novamente e reinstale o ACBr com a opção de apagar arquivos antigos marcada.
    1 ponto
  5. Bom dia a todos, Com relação ao arquivo ACBrNFSeXServicos.ini já está atualizado e se encontra no SVN. Agora só falta é fazer as devidas alterações nas Units. @Paulo Vale, você acredita que consegue fazer as alterações sugeridas pelo Renado?
    1 ponto
  6. Agradeço a todos pela atenção dispensada. Consegui fazer funcionar aqui, está funcionando corretamente agora. Havia algumas falhas no Demo da versão que baixei e que ocasionavam erros diversos, vou deixar aqui um resumo, talvez ajude a alguém na mesma situação. 1 - No demo (qualquer dos dois) o DM está setado no projeto para criação automática, no entanto ele é criado após o form principal, o que gera erros de violação de acesso na criação do form principal. A variável dm fica Nil e dá ruim. Para resolver, simplesmente tirei a criação do DM do automatico, e criei uma função no fonte do DM (ambos), para criar o DM por demanda, e ao setar a variável dm no form principal chamo esta função. function DM_Fortes: TdmForte; begin if (dmForte = Nil) then begin dmForte := TdmForte.Create( Application ); end; result := dmForte; end; No Form principal: {$IFDEF demo_forte} dm := DM_Fortes; {$ELSE} dm := DM_Fast; {$ENDIF} 2 - Na inclusão de Titulo (procedure TfrmDemo.btnBoletoIndividualClick), antes da instrução "Titulo := dm.ACBrBoleto.CriarTituloNaLista;", foi necessário incluir as instruções abaixo para que o JSON enviado refletisse corretamente as informações digitadas no formulário. procedure TfrmDemo.btnBoletoIndividualClick(Sender: TObject); var Titulo : TACBrTitulo; VQtdeCarcA, VQtdeCarcB, VQtdeCarcC :Integer; VLinha, logo : string; i: Integer; begin // Se não configurar aqui, estes valores são ignorados mesmo que sejam especificados em Titulo. dm.ACBrBoleto.Cedente.Modalidade := edtModalidade.Text; dm.ACBrBoleto.Cedente.Convenio := edtConvenio.Text; Titulo := dm.ACBrBoleto.CriarTituloNaLista; 3 - Campos importantes (atalhos). Para testes usar as informações disponíveis no manual da API (https://apoio.developers.bb.com.br/referency/post/5ffc477c3b02bd0012ecaa1a). O código abaixo corresponde a um programa de testes com finalidade exclusiva de registrar boletos on-line. uses ACBrDFeSSL, pcnConversao, BlckSock; Const // Fornecidos pelo painel do desenvolvedor o Banco do Brasil BB_API_CLIENT_ID = '<client_id>'; BB_API_CLIENT_SECRET = '<client_sercret>'; BB_API_CLIENT_DEV_KEY = '<developer_application_key>'; BB_API_ESCOPO = 'cobrancas.boletos-info cobrancas.boletos-requisicao'; // Informações do Cedente/Beneficiario BB_CNPJ_CEDENTE = '94491202000127'; // valor de teste fornecido na documentacao do BB dados ficticios para testes BB_AGENCIA = '<sua_agencia>'; BB_AGENCIA_DV = '<dv_sua_agencia>'; BB_CONTA = '<sua_conta>'; BB_CONTA_DV = '<dv_sua_conta>'; BB_CODIGO_CEDENTE = BB_AGENCIA + '/' + BB_CONTA; BB_CONVENIO = '<Num-Convenio>'; // para testes usar o numero fornecido na documentacao do BB dados ficticios para testes BB_CARTEIRA = '17'; BB_VARIACAO_CARTEIRA = '35'; // valor de teste fornecido na documentacao do BB dados ficticios para testes BB_INICIO_NOSSO_NUMERO = BB_CONVENIO; // prefixo para formação do campo: "numeroTituloCliente" procedure TForm1.ConfiguraIntegracaoBB; begin // Tipo API Banco do Brasil ACBrBoleto.Banco.TipoCobranca := cobBancoDoBrasilAPI; // Cedente (Empresa cobradora) ACBrBoleto.Cedente.CNPJCPF := BB_CNPJ_CEDENTE; ACBrBoleto.Cedente.Agencia := BB_AGENCIA; ACBrBoleto.Cedente.AgenciaDigito := BB_AGENCIA_DV; ACBrBoleto.Cedente.Conta := BB_CONTA; ACBrBoleto.Cedente.ContaDigito := BB_CONTA_DV; ACBrBoleto.Cedente.CodigoCedente := BB_CODIGO_CEDENTE; ACBrBoleto.Cedente.Convenio := BB_CONVENIO; ACBrBoleto.Cedente.TipoCarteira := tctSimples; ACBrBoleto.Cedente.TipoInscricao := pJuridica; ACBrBoleto.Cedente.Modalidade := BB_VARIACAO_CARTEIRA; ACBrBoleto.Cedente.Cidade := ''; ACBrBoleto.Cedente.UF := ''; ACBrBoleto.Cedente.Logradouro := ''; ACBrBoleto.Cedente.Bairro := ''; ACBrBoleto.Cedente.CEP := ''; // Credenciais de acesso a API ACBrBoleto.Cedente.CedenteWS.ClientID := BB_API_CLIENT_ID; ACBrBoleto.Cedente.CedenteWS.ClientSecret := BB_API_CLIENT_SECRET; ACBrBoleto.Cedente.CedenteWS.KeyUser := BB_API_CLIENT_DEV_KEY; ACBrBoleto.Cedente.CedenteWS.IndicadorPix := true; // Modo Hibrido, pagamento com pix ACBrBoleto.Cedente.CedenteWS.Scope := BB_API_ESCOPO; // Configurações - Log ACBrBoleto.Configuracoes.Arquivos.LogRegistro := True; ACBrBoleto.Configuracoes.Arquivos.PathGravarRegistro := '.\log'; ACBrBoleto.DirArqRemessa := '.\log'; ACBrBoleto.DirArqRetorno := ACBrBoleto.DirArqRemessa; ACBrBoleto.NomeArqRemessa := 'Demo_Remessa.txt'; ACBrBoleto.NomeArqRetorno := 'Demo_Retorno.txt'; // Configurações do WebService/API ACBrBoleto.Configuracoes.WebService.Ambiente := taHomologacao; ACBrBoleto.Configuracoes.WebService.Operacao := tpInclui; ACBrBoleto.Configuracoes.WebService.SSLHttpLib := httpOpenSSL; ACBrBoleto.Configuracoes.WebService.SSLType := LT_TLSv1_2; ACBrBoleto.Configuracoes.WebService.VersaoDF := '1.2'; ACBrBoleto.Configuracoes.WebService.UseCertificateHTTP := false; end; procedure TForm1.IncluiBoleto; var Titulo : TACBrTitulo; VQtdeCarcA, VQtdeCarcB, VQtdeCarcC :Integer; VLinha, logo : string; i: Integer; begin // Operação ACBrBoleto.Configuracoes.WebService.Operacao := tpInclui; ACBrBoleto.ListadeBoletos.Clear; Titulo := ACBrBoleto.CriarTituloNaLista; Titulo.Vencimento := Date+5; Titulo.DataDocumento := Date; Titulo.NumeroDocumento := LZeroFil(edNumTitulo.Text, 10); Titulo.EspecieDoc := 'DM'; Titulo.Aceite := atNao; Titulo.DataProcessamento := Now; Titulo.Carteira := '17'; // * Titulo.NossoNumero := BB_INICIO_NOSSO_NUMERO + LZeroFil(edNumTitulo.Text, 10); // * Titulo.ValorDocumento := 45.00; // * Titulo.Sacado.Pessoa := pJuridica; // * [pFisica,pJuridica, - pOutras, pNenhum ] Titulo.Sacado.NomeSacado := 'Odorico Paraguassu'; // * Titulo.Sacado.CNPJCPF := '74910037000193'; // * Titulo.Sacado.Logradouro := 'Avenida Dias Gomes 1970'; // * Titulo.Sacado.Numero := ''; Titulo.Sacado.Bairro := 'Centro'; // * Titulo.Sacado.Cidade := 'Sucupira'; // * Titulo.Sacado.UF := 'TO'; // * Titulo.Sacado.CEP := '77458000'; // * Titulo.ValorAbatimento := 0.00; Titulo.LocalPagamento := 'QUALQUER BANCO'; Titulo.ValorMoraJuros := 0.00; Titulo.ValorDesconto := 0.00; Titulo.ValorAbatimento := 0.00; Titulo.DataMoraJuros := 0; Titulo.DataDesconto := 0; Titulo.TipoDesconto := tdNaoConcederDesconto; Titulo.DataAbatimento := 0; Titulo.DataProtesto := 0; Titulo.PercentualMulta := 0.00; Titulo.CodigoMoraJuros := cjIsento; //Mensagem.Text := memMensagem.Text; Titulo.OcorrenciaOriginal.Tipo := toRemessaRegistrar; Titulo.Instrucao1 := 'Instruções linha 1'; Titulo.Instrucao2 := 'Instruções linha 2'; end; procedure TForm1.RegistrarBloletoOnLine(Sender: TObject); var SLRemessa: TStringList; i, j: Integer; Boleto : TACBrBoleto; begin // *** Configura acesso a API e dados da empresa *** ConfiguraIntegracaoBB; // *** Inclui um boleto ficticio para registro *** IncluiBoleto; Boleto := ACBrBoleto; //Função de Envio Boleto.Configuracoes.WebService.Operacao := tpInclui; Boleto.EnviarBoleto; // retorna como false se o httpresult code for diferente de 200,201,202 //Verifica Lista com os retornos if Boleto.ListaRetornoWeb.Count > 0 then begin // Este trecho de código é o mesmo do Demo do ACBrBoleto end; end;
    1 ponto
  7. Bom dia Vitor, Está disponível para qualquer linguagem que consuma dll ou so. Veja o link que o Daniel postou que tem inclusive o programa de exemplo em VB6, caso seja útil para se basear nos seus testes, além da documentação.
    1 ponto
  8. Boa noite @João Paulo Alcântara Obrigado pela colaboração, pois conforme o post do @Italo Giurizzato Juniora url de homologação era o que faltava para poder incluir o DF no ini. Se quiser adiantar seus testes, altere o ini e siga os passos do tópico a seguir. Caso encontre problemas com o novo provedor, abra um novo tópico específico contendo maiores detalhes e os soaps do envio/retorno para que possamos ajudar.
    1 ponto
  9. Olá pessoal, vamos falar sobre mais um lançamento do ACBrLib, o ACBrLibGTIN. O GTIN (Número Global do Item Comercial) se trata de um padrão criado e administrado pela GS1. É ele que aparece abaixo dos códigos de barras, amplamente utilizados no varejo físico para identificação de produtos. O Projeto ACBr tem o componente ACBrGTIN para Delphi e Lazarus e agora o temos o ACBrLibGTIN, que torna possível o uso do componente ACBrGTIN em qualquer linguagem de programação que possa consumir uma DLL. E porque desenvolvemos o ACBrLibGTIN ? Com a publicação da NT 2022.001, a qual estabelece o inicio da obrigatoriedade das informações na NFe/NFCe foi criado o ACBrGTIN e afim de levar a todos os desenvolvedores as facilidades do componente para consumo dos WebServices de consulta das informações junto a SEFAZ Virtual do RS (SVRS), foi lançada a ACBrLibGTIN. Neste vídeo de noticias da semana em nosso canal do YouTube, falamos um pouco sobre o tópico acima. Como obter a ACBrLibGTIN? Se você é assinante do nosso plano ACBr PRO, basta realizar o download do ACBrLibGTIN na sessão de downloads do fórum ACBr. Caso você ainda não seja assinante recomendamos fortemente que fale com nossos consultores via whats em (15) 2105-0750 e descubra como vale a pena aderir hoje msm. Mas se você prefere obter somente a ACBrLibGTIN, pode adquirir somente ela diretamente em nosso portal. Onde posso encontrar a documentação e os exemplos de uso da ACBrLibGTIN? Os exemplos de uso estão disponíveis para download via svn, saiba mais sobre como obter todos os demos aqui. Já o manual está disponível de forma online em https://acbr.sourceforge.io/ACBrLib/ACBrLib.html. Agora é sua vez de adicionar mais este recurso a sua aplicação!!
    1 ponto
  10. Olá Pessoal, A SEFAZ-MG está com a seguinte mensagem: • A URL de consulta a NFCe via QRCode foi alterada em PRODUÇÃO. A partir do dia 4/4/2022 a URL antiga foi desativada. Importante lembrar que a nova url deverá ser utilizada tanto no processo de consulta quanto de autorização. A nova url a ser utilizada é: https://portalsped.fazenda.mg.gov.br/portalnfce/sistema/qrcode.xhtml • Desde 4/7/2022 a consulta com QRcode não é mais possível utilizando a url antiga. A consulta é possível apenas através da chave de acesso. Segundo a mensagem as URLs antigas não funcionam mais por conta das datas do texto acima. Mas o que tudo indica a SEFAZ-MG não realizou a troca das URLs em seu webservice e com isso ao tentar enviar uma NFC-e com as novas URLs de consulta a nota não é autorizada. Link da página da SEFAZ-MG que contém toda a mensagem referente a troca das URLs: SPED MG (fazenda.mg.gov.br) Link da página da SEFAZ-MG com a lista de URLs de produção e homologação: SPED MG (fazenda.mg.gov.br) Infelizmente existe um comunicado e a lista de URLs com as URLs atualizadas, mas o webservice não está atualizado.
    1 ponto
×
×
  • 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.

The popup will be closed in 10 segundos...