Painel de líderes

Rapaz, pegou pesado. Eventualmente podem aparecer alguns bugs mesmo porque os fontes estão em constante alterações para atender as também constantes Notas Técnicas ou até mesmo para manter os Fontes compatíveis com Delphi 7 até a Rio e Lazarus e inclusive outras plataformas. Aqui atualizo com certa frequência e também fico de olho no Log do svn de olho em novas implementações ou até mesmo correções. Não existe receita onde se faça o bolo sem quebrar os ovos.

Muito obrigado pela ajuda Italo.

Os fontes no trunk2 são estáveis. Muito raramente são reportados aqui erros de compilação... - Informe que bugs foram encontrados. - Se fez a correção anexe os arquivos alterados. Se você faz alterações locais no código vai precisar adequar o seu código com o do repositório caso hajam conflitos.

Cheguei a remover todas as dlls e colocar da versão anterior, mas tbm não resolveu e o windows já havia dado alguns problemas após atualização automática. Botão de pesquisa não pesquisava mais... estava estranho, por isso já optei por formatar... Mas valeu a ajuda...

Saudações a todos! Desenvolvemos uma API de consultas ao CNPJ com retorno em JSON e gostaríamos de compartilhar com vocês: https://www.cnpja.com.br/ Oferecemos 500 consultas grátis por dia, e é possível testar diretamente pelo site! O resultado das consultas inclui todos os dados do registro: Razão social, nome fantasia, data de fundação e porte Situação cadastral comum e especial Telefone, e-mail e endereço completo Natureza jurídica, atividades primárias e secundárias (CNAE) Quadro de sócios e administradores (QSA) Link para comprovante em PDF Exemplo de retorno: { "last_update": "2020-02-07T12:46:07.143Z", "name": "PETROLEO BRASILEIRO S A PETROBRAS", "alias": "PETROBRAS", "tax_id": "33000167000101", "type": "MATRIZ", "founded": "1966-09-28", "size": "DEMAIS", "capital": 205431960490.52, "email": "[email protected]", "phone": "(21) 3224-8091/ (21) 3224-4477", "federal_entity": "UNIÃO", "registration": { "status": "ATIVA", "status_date": "2005-11-03", "status_reason": null, "special_status": null, "special_status_date": null }, "address": { "street": "AV REPUBLICA DO CHILE", "number": "65", "details": null, "zip": "20031170", "neighborhood": "CENTRO", "city": "RIO DE JANEIRO", "state": "RJ" }, "legal_nature": { "code": "2038", "description": "Sociedade de Economia Mista" }, "primary_activity": { "code": "1921700", "description": "Fabricação de produtos do refino de petróleo" }, "secondary_activities": [ { "code": "0600001", "description": "Extração de petróleo e gás natural" }, { "code": "3520401", "description": "Produção de gás; processamento de gás natural" }, { "code": "4681801", "description": "Comércio atacadista de álcool carburante, biodiesel, gasolina e demais derivados de petróleo, exceto lubrificantes, não realizado por transportador retalhista (T.R.R.)" } ], "membership": [ { "name": "EBERALDO DE ALMEIDA NETO", "role": { "code": "10", "description": "Diretor" } }, { "name": "ROBERTO DA CUNHA CASTELLO BRANCO", "role": { "code": "16", "description": "Presidente" } }, { "name": "CARLOS ALBERTO PEREIRA DE OLIVEIRA", "role": { "code": "10", "description": "Diretor" } }, { "name": "RUDIMAR ANDREIS LORENZATTO", "role": { "code": "10", "description": "Diretor" } }, { "name": "ANELISE QUINTAO LARA", "role": { "code": "10", "description": "Diretor" } }, { "name": "ANDREA MARQUES DE ALMEIDA", "role": { "code": "10", "description": "Diretor" } }, { "name": "ROBERTO FURIAN ARDENGHY", "role": { "code": "10", "description": "Diretor" } }, { "name": "MARCELO BARBOSA DE CASTRO ZENKNER", "role": { "code": "10", "description": "Diretor" } } ], "files": { "registration": "https://api.cnpja.com.br/files/61298ecd-fbe9-42ec-9107-70eaecbc478f.pdf" } } Para utilizar: - Faça login em nosso site com o Google, Facebook ou E-mail. - Visite a página Minha Conta e copie sua Chave de API - Envie uma requisição GET para: https://api.cnpja.com.br/companies/{CNPJ} - Adicione no parâmetro Authorization dos Headers a sua Chave de API Quem tiver alguma dúvida é só perguntar!

Boa tarde, Mas que mania de vocês enviar novamente toda vez que ocorre um erro. Por algum acaso você tem certeza que o erro que ocorreu foi durante o envio? E se foi no retorno? Provedores que seguem a versão 1 do layout da ABRASF, se ocorreu erro ao enviar o passo seguinte é ConsultarSituacao. Se retornar a situação 3 ou 4 devemos Consultar o Lote para pegar as rejeições ou os XML das NFS-e caso tenha sido processado com sucesso. O numero do protocolo é o retorno do envio, se ocorreu erro nesse retorno não há nada o que possa ser feito pois não existe nenhum serviço que retorna novamente o numero do protocolo que atesta que o webservice recebeu o seu lote de RPS. Já os provedores que seguem a versão 2 do layout da ABRASF, se ocorreu erro ao enviar o passo seguinte é Consultar o Lote, uma vez que nessa versão não existe o serviço de consultar a situação do lote.

Acredito ter entendido sim. Mais uma vez agradeço as explicações. Era isto que eu queria entender. Vou fazer novos testes e posto aqui o resultado.

Fellipe, Muito obrigado, assim que possível vamos analisar.

Boa tarde Fellipe, Por favor configure o programa exemplo para salvar os arquivos Soap. E anexa os arquivos *-soap.xml Outra coisa os arquivos que você anexou não tem nada haver com o seu problema. Você anexou o XML do RPS e de um cancelamento, sendo que o seu problema é na consulta.

Boa tarde Luiz, O componente ACBrCIOT esta funcional para o eFrete. Quanto a sua pergunta a resposta é Sim.

Acabei de enviar correções para o Demo. Acho que ele estava desatualizado depois das várias alterações que sofreu.

@Juliomar Marchetti Muito obrigada, vou tentar realizar as informações repassadas desse tópico. Assim que terminar, voltarei relatando o resultado. Obrigada a todos!

Juliana, nosso suporte observou o detalhe do certificado no navegador que o mesmo tinha validade de 1 ano, então só poderia ser A1, e no sistema em nossa tela de configuração o cliente colocou A3. configuramos em nosso sistema para A1 e indicamos o caminho do arquivo e o arquivo pfx. Enviamos o evento e foi recepcionado normalmente. Acreditamos que tenha sido essa a causa do erro. Agradeço seu auxilio e por gentileza pode considerar o tópico encerrado. []s

Nesse caso você deve abrir um tópico na área do componente que está tendo dificuldade, e informar detalhadamente qual o problema. Pra que assim seja feita a correção e atualizada no repositório se for o caso. Pelo trecho de código acima me parece que o leitor está esperando um XML canonicalizado e está sendo passado um XML indentado. O ACBr é um projeto OpenSource, depende da contribuição de todos para o desenvolvimento e testes, não existe 100% de garantia de funcionamento, se é o que você quer dizer por estável.

Quando você instalou o ACBr, marcou a opção para deixar apenas a LibXX no Path do Delphi..

O tempo de compilação pode variar dependendo da máquina, memória disponível, quantidade de componentes instalados... Uma dica que posso te dar é instalar este expert que melhora significativamente tempo de compilação (pelo menos nos meus testes): https://www.idefixpack.de/blog/ide-tools/ide-fix-pack/ Além do tempo de compilação ele faz diversas correções e melhorias na IDE, recomendo.

Bom dia Italo! Farei hoje a tarde, te mando um feedback depois. Muito obrigado!

Daniel, funcionou ambas as versões. valew a sua ajuda. []s

Olá andrefaria, Na verdade, se você observasse a mensagem de erro do ACBrValidador, teria entendido porque ele recusou. Veja a seguinte janela do programa de exemplo: Conforme pode ver na mensagem, a IE do DF tem 13 dígitos. Então você precisa ajustar o tamanho. O próprio componente pode fazer alterando a propriedade AjustarTamanho. No programa exemplo fazemos isso marcando a opção "Ajustar Tamanho". Veja:

Olá RenatoE, Muito obrigado pela contribuição. Fiz a implementação baseada nela. No entanto, achamos melhor alterar o nome da propriedade para TituloPreview. Achamos que isso vai indicar melhor o objetivo dela. Subi as alterações para o SVN na Revisão 19012. Pelo que vi está tudo certo. Mas queira por favor atualizar, testar e reportar qualquer problema. Mais uma vez obrigado.

Pelo visto o erro e na parte java da coisa pelo Log da lib esta tudo ocorrendo como deve ser, vou estar dando uma olhada no demo.

Configurações do ACBrMail para os principais serviços de emails do mercado outlook e hotmail smtp: smtp.office365.com porta: 587 tsl : true; ssl : false; Referência: Microsoft hotmail O smtp.live.com, utilizado anteriormente para o hotmail, parou de funcionar. Para utilizar o smtp.office365.com: 1. Ao entrar no hotmail, embaixo tem a opção atualizar para microsoft office365 premium. 2. Depois, crie uma conta grátis que já atualiza o hotmail para receber email office365. office365 smtp alternativo: smtp-legacy.office365.com gmail smtp: smtp.gmail.com usuario: [email protected] porta: 465 tsl : true; ssl : true; é necessário criar uma senha para a aplicação, portanto não é permitido mais utilização da senha principal da conta. 1. Ativar a verificação em duas etapas. 2. Criar uma senha para a aplicação. https://myaccount.google.com/apppasswords yahoo smtp: smtp.mail.yahoo.com.br porta: 587 tsl : true; ssl : false; password: não use a senha padrão da conta, precisará criar uma exclusiva para sua aplicação. siga os passos abaixo: criada pelo link https://login.yahoo.com/account/security#less-secure-apps e depois 'Gerenciar Senha de app', selecione 'Outro app' ,der um nome ao app, e clique gerar senha.; Veja ainda, a dica desse Post sendgrid smtp : smtp.sendgrid.net usuario: nome da conta senha : senha da conta tsl : true; ssl : false; porta: 465 Autor: @Aurino Locaweb From := '[email protected]'; FromName := 'Nome do Remetente'; Host := 'email-ssl.com.br'; Username := '[email protected]'; Password := 'Sua_Senha'; Port := '465'; SetTLS := False; SetSSL := True; Locaweb2 From := '[email protected]'; FromName := 'Nome do Remetente'; Host := 'email-ssl.com.br'; Username := '[email protected]'; Password := 'Sua_Senha'; Port := '587'; SetTLS := True; SetSSL := False; SparkPost From := '[email protected]'; FromName := 'Nome do Remetente'; Host := 'smtp.sparkpostmail.com'; Username := 'SMTP_Injection'; Password := '8a93c971789791b0102d889dd8f5f9b40507288d'; // Sua API Key Port := '587'; SetTLS := True; SetSSL := False;

Boa tarde @Juliana Tamizou, eu fiz umas alteração simples no fonte do boleto, o que seria o titulo quando da Preview, Report do Fast e Fortes. Fonte unit ACBrBoleto; Adicionei FTituloCabecalho : string; procedure SetTituloCabecalho(const Value: string); property TituloCabecalho : string read FTituloCabecalho write SetTituloCabecalho; procedure TACBrBoletoFCClass.SetTituloCabecalho(const Value: string); begin FTituloCabecalho := Value; end; Fonte unit ACBrBoletoFCFR; procedure TACBrBoletoFCFR.Imprimir; begin inherited Imprimir; // Verifica se a lista de boletos está vazia with FdmBoleto do begin cdsBanco.EmptyDataSet; cdsCedente.EmptyDataSet; cdsTitulo.EmptyDataSet; if PreparaRelatorio then begin frxReport.PrintOptions.ShowDialog := (MostrarSetup) and (not FModoThread); frxReport.PrintOptions.Copies := NumCopias; frxReport.ReportOptions.Name := TituloCabecalho; <-- Adicionado Fonte unit ACBrBoletoFCFortes; procedure TACBrBoletoFCFortes.Imprimir; var frACBrBoletoFortes : TACBRBoletoFCFortesFr; RLFiltro : TRLCustomSaveFilter; RLLayout: TRLReport; begin inherited Imprimir; // Executa verificações padroes frACBrBoletoFortes := TACBrBoletoFCFortesFr.Create(Self); try with frACBrBoletoFortes do begin case LayOut of lCarne : RLLayout := BoletoCarne; lReciboTopo : RLLayout := BoletoReciboTopo; lFaturaDetal : RLLayout := LayoutFaturaDetal; else RLLayout:= LayoutBoleto; end; if (NumCopias > 0) and (RLPrinter.Copies <> NumCopias) then begin RLPrinter.Copies := NumCopias; end; RLLayout.PrintDialog := MostrarSetup; RLLayout.ShowProgress := MostrarProgresso; RLLayout.Title := TituloRelatorio; --> adicionado Inicio if TituloCabecalho <> '' then begin RLLayout.PreviewOptions.Defaults := pdIgnoreDefaults; RLLayout.PreviewOptions.Caption := TituloCabecalho; end else RLLayout.PreviewOptions.Defaults := pdUseDefaults; <-- Adicionado Fim ACBrBoleto.pasACBrBoletoFCFR.pasACBrBoletoFCFortesFr.dfmACBrBoletoFCFortesFr.pasACBrBoletoFCFR.dfm Qualquer duvida manda mensagem ou erro, eu corrijo.

Boa tarde. Devido ao problema original ter sido resolvido, estou fechando o tópico, para novas dúvidas favor criar um novo tópico. Att.

O problema era a versão da dll que não era compatível para a captura usando pinpad

Boa tarde Rodrigo, Favor anexar o XML de uma consulta e se você tiver um XML de exemplo do provedor seria muito bom para que possamos analisar.

Boa tarde Italo, Obrigado pela orientação. Geramos os arquivos soap.xml segue em anexo202002.rar

Boa tarde, estou enviando a classe "pnfsConversao.pas" com 2 enuns adicionados (no116 e no117), ambos são utilizados pelo provedor pública. Se possível adicionar ao repositório. Obrigado. pnfsConversao.pas

Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.

Se a sua versão do Fast Report é anterior ao 6 provavelmente não terá essa unit, por isso o erro. Enviei ajuste para o repositório, removendo a referência a essa unit. Favor atualizar os fontes e testar novamente.

Boa tarde David, Favor atualizar os fontes, reinstalar a suíte ACBr e faça os testes usando o programa exemplo do componente ACBrNFSe.

Ahh sim.. optamos dessa maneira, pois a msg do SMTP, sempre virá em Inglês... mas mesmo assim dá pra capturar na aplicação...

Está com algum erro na instalação do seu Fast Report.

Trunk2 conforme foi citado acima. dificilmente deixamos passar algo. mas como somos ainda humanos erros são passíveis mas tem o mínimo do mínimo. vejo que é um relato bem intrigante pois estou a procura pra ver se acho outros semelhantes ou similares mas nada .

Boa tarde Diego, Quando ocorre o erro 500, significa que existe algo a mais ou a menos no XML. É preciso comparar o XML que esta sendo gerado e enviado com um exemplo fornecido pelo provedor.

Boa tarde, Não vou poder aceitar a sua contribuição, pelo simples fato do seu arquivo esta desatualizado. Por favor atualize todos os fontes de todas as pastas, depois acrescente a cidade em questão.

Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.

Olá a todos! Primeiramente gostaria de parabenizar a todos os envolvidos nesse projeto maravilhoso. Sou nova no fórum, peço desculpas antecipadamente por estar postando algo errado ou local incorreto. Estou tendo problemas com o meu Delphi 2007, sei que estou bem desatualizada em relação a ferramenta, porém não tenho condições financeiras e tempo para migrar os fontes para a mais nova versão. Lembrando que a minha licença foi adquirida corretamente junto a Embarcadero na época. Segue o meu problema: O meu compilador demora mais de 1 minuto pra conseguir compilar um projeto, podendo ser apenas uma unit ou o projeto todo. Já pesquisei em vários lugares, fiz várias tentativas para correção, porém não obtive sucesso("separar os .DCU's, desabilitar propriedades..."). Gostaria humildemente se alguém poderia me ajudar nessa luta que tenho todos os dias, imaginem ter que ficar esperando +- 1 minuto para compilar toda vez que aparece um erro. Agradeço pela atenção de todos.

As vezes, é o "empurrão" que você precisa... Migre tudo para 10.3...

certo muito obrigado, vou testar caso tiver algum problema eu reporto.

Os serviços são acessíveis usando o certificado digital do contribuinte ou do desenvolvedor do PAF-ECF, com exceção do serviço TransmitirArquivo, que será acessível somente com o certificado digital do contribuinte, e do ConsultarPendenciasDesenvolvedor, com o certificado do desenvolvedor do PAF-ECF. Caso tente efetuar as rotinas com outro certificado, realmente será retornado esse tipo de erro.

Executa como administrador o instalador

Bom dia, houve esta alteração Att Ricardo

Bom dia Carlinhos, Você esta tendo problemas com o DANFE ou com o DAMDFE? Pois aqui estamos tratando do MDF-e e não da NF-e. Para quem esta tendo problemas com a margem dos Documentos Auxiliares basta fazer o seguinte: Exemplo para o MDF-e: ACBrMDFe1.DAMDFE.MargemDireita := 7; ACBrMDFe1.DAMDFE.MargemEsquerda := 7; ACBrMDFe1.DAMDFE.MargemSuperior := 5; ACBrMDFe1.DAMDFE.MargemInferior := 5; De forma semelhante pode-se fazer para os demais.

Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.

esta escrito errado, é CodMunicipio , alterei e rodou, obrigado.

Formatei notebook, reinstalei windows e as 2 versões Delphi, instalei componentes e funcionou certinho. Algo que eu instalei algum programa antes deve ter corrompido. Já fiz uma imagem do HD por precaução. Agradeço muito pela atenção. Obrigado.

Gerou corretamente. Agora vou fazer alguns testes quando todos os quatro campos não forem preenchidos pelo usuário e saírem com valor ZERO, qual será o comportamento da validação. Obrigado!!!

Muito obrigado pela contribuição. Subi as alterações para o SVN na Revisão 19009. Pelo que vi está tudo certo. Queira por favor atualizar, testar e reportar qualquer problema. Mais uma vez obrigado.

Anexo. Cidades.ini