Jump to content
Notícias do ACBr

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png

consultoria_sticker.png

Conteúdo para desenvolvedores
 ao vivo de terça a quinta!
Saiba mais

dev.png

logo_acbr_paygo.png

TEF ACBr PayGo
Seja um revendedor e ofereça uma solução completa para seu cliente.


Saiba mais

beneficios.png

w0000

Membros
  • Content Count

    20
  • Joined

  • Last visited

Community Reputation

1 Neutral

About w0000

  • Rank
    Novato

Profile Information

  • Sexo
    Indefinido
  • Location
    SP

Recent Profile Visitors

441 profile views
  1. Prezado Daniel Simões, boa noite! Obrigado pela dica: Coloquei conforme você menciono a diretiva "FMX" No menu do Delphi > Project > Options > Delphi Compiler > Em target: "All configurations - All platforms", coloquei em "Conditional defines" FMX, dei um Save e compilei. A dica do Daniel Simões FUNCIONOU! Obrigado pela dica.
  2. Prezados Colegas, boa tarde Por favor, será que poderiam me dar um help? Preciso consultar um "CEP com FIREMONKEY", através do componente ACBrCEP. Está dando o seguinte erro ao compilar: Erro apresentado: "[dcc32 Fatal Error] ACBrSocket.pas(260): F2613 Unit 'Controls' not found." Por favor alguém poderia me dar um help como corrigir este erro? O Erro é apresentado no código do ACBrSocket.pas Desde já agradeço demais a atenção dos colegas. Obrigado.
  3. Prezado colegas da ACBr, boa tarde! Por favor alguém poderia me dar um help? Estou com a seguinte duvida: Como mostra o requerente do certificado digital na mesma ordem do Internet Explorer? Código fonte utilizado Edit1.Text := (sLineBreak + sLineBreak + A.CertSubjectName + A.CertRazaoSocial); DADOS CAPTURADO NO EDIT1 ACIMA: =============================== C=BR, O=ICP-Brasil, S=SP, L=Barueri, OU=Secretaria da Receita Federal do Brasil - RFB, OU=RFB e-CNPJ A1, OU=1
  4. Prezado colegas da ACBr, boa tarde! Por favor alguém poderia me dar um help? Estou com a seguinte duvida: Como mostra o requerente do certificado digital na mesma ordem do Internet Explorer? Código fonte utilizado Edit1.Text := (sLineBreak + sLineBreak + A.CertSubjectName + A.CertRazaoSocial); DADOS CAPTURADO NO EDIT1 ACIMA: =============================== C=BR, O=ICP-Brasil, S=SP, L=Barueri, OU=Secretaria da Receita Federal do Brasil - RFB, OU=RFB e-CNPJ A1, OU=12345678901234, CN=EMPRESA T
  5. Prezado Juliomar Marchetti, boa tarde! Em primeiro ligar, lhe agradeço pela atenção. Realmente: No "Subject name" ShowMessage(ACBrANe1.SSL.CertSubjectName + sLineBreak + sLineBreak + 'Razão Social: ' + ACBrANe1.SSL.CertRazaoSocial); No "Leitura X509" with ACBrANe1.SSL do begin CarregarCertificadoPublico(MemoDados.Lines.Text); MemoResp.Lines.Add(CertIssuerName); MemoResp.Lines.Add(CertRazaoSocial); MemoResp.Lines.Add(CertCNPJ); MemoResp.Lines.Add(CertSubjectName); MemoResp.Lines.Add(CertNume
  6. Prezado colegas da ACBr, boa tarde! Por favor alguém poderia me dar um help? Estou com a seguinte duvida: Como mostra o requerente do certificado digital? Exemplo: Requerente: CN=XX RAZAO SOCIAL LTDA:12345678901234, OU=12345678901234, OU=RFB e-CNPJ A1, OU=Secretaria da Receita Federal do Brasil - RFB, L=Barueri, S=SP, O=ICP-Brasil, C=BR Por favor alguém poderia me dar um help? Como mostra o requerente do certificado digital, no formato do exemplo acima? Desde já agradeço. Obrigado.
  7. Prezado Rafael Dia, boa tarde! Obrigado pela ajuda. deu certo conforme sua orientação. //Configurar o SSL no componente e não em uma classe a parte ACBrNFe1.Configuracoes.Geral.SSLCryptLib := cryWinCrypt; ACBrNFe1.Configuracoes.Geral.SSLXmlSignLib := xsLibXml2; ACBrNFe1.Configuracoes.WebServices.SSLType := LT_TLSv1_2; Mais uma vez obrigado.
  8. Prezado Juliomar Marchetti, boa noite! Obrigado pela atenção. Configurei sim o SSLib. Veja o código fonte abaixo: (*Em verde a configuração do SSLib e em vermelho onde está com erro) procedure TFTestaCertificadoDigital.SpeedButton1Click(Sender: TObject); var A: TDFeSSL; begin //Linpa Label´s e Edit Label3.Caption := ''; Label5.Caption := ''; Label7.Caption := ''; Label9.Caption := ''; Label11.Caption := ''; Label13.Caption := ''; Label15.Caption := ''; Edit1.Text := ''; //Configura SSLib
  9. Prezado BigWings, boa tarde! Desculpe o incomodo, fiz exatamente como orientado. Está apresentando o seguinte erro: "CarregarCertificadoDeNumeroSerie" não suportado em: TDFeSSLCryptClass. Código fonte: //Certificado - SubjectName - Mostrar requerente Label15.Caption := (ACBrNFe1.SSL.CertSubjectName + sLineBreak + sLineBreak + 'Razão Social: ' + ACBrNFe1.SSL.CertRazaoSocial); Edit1.Text := (ACBrNFe1.SSL.CertSubjectName + sLineBreak + sLineBreak + 'Razão Social: ' + ACBrNFe1.SSL.CertRa
  10. Prezado BigWings, boa noite! Desculpe o incomodo, mas nos exemplos achei diversas propriedades, mas não encontrei como mostra o requerente do certificado digital. Por favor alguém poderia me dar um help? Como mostra o requerente do certificado digital? Formato que preciso: Requerente: CN=XX RAZAO SOCIAL LTDA:12345678901234, OU=12345678901234, OU=RFB e-CNPJ A1, OU=Secretaria da Receita Federal do Brasil - RFB, L=Barueri, S=SP, O=ICP-Brasil, C=BR Desde já agradeço. Obrigado.
  11. Prezado colegas da ACBr, boa tarde! Por favor alguém poderia me dar um help? Estou com a seguinte duvida: Como mostra o requerente do certificado digital? Exemplo: Requerente: CN=XX RAZAO SOCIAL LTDA:12345678901234, OU=12345678901234, OU=RFB e-CNPJ A1, OU=Secretaria da Receita Federal do Brasil - RFB, L=Barueri, S=SP, O=ICP-Brasil, C=BR Por favor alguém poderia me dar um help? Como mostra o requerente do certificado digital, no formato do exemplo acima? Desde já agradeço. Obrigado.
  12. Prezados, agradeço a atenção. Conforme orientado pelo BigWings, acrescentei a linha A.SelecionarCertificado; ACBrNFe1.Configuracoes.Certificados.NumeroSerie := A.NumeroSerie; Ainda estou com um erro: "CarregarCertificadoDeNumeroSerie" não suportado em: TDFeSSLCryptClass. Por favor, será que alguém poderia me dar um help? Desde já agradeço. Obrigado.
  13. Prezado colegas da ACBr, bom dia! Por favor alguém poderia me dar um help? Estou com o seguinte erro: "DadosPFX, ArquivoPFX, URLPFX ou NumeroSerie não especificados !" Segue abaixo o código fonte. Por favor alguém poderia me dar um help onde no código abaixo estou errando? Desde já agradeço. Obrigado. procedure TFTestaCertificadoDigital.spbtnSelecionaClick(Sender: TObject); var A: TDFeSSL; I: Integer; xmlSig: TDFeSSLXmlSignClass; xmlOr: TStringList; xmlAs: TStringList; XMLAss, ArqXML: string; begin A := TDFeSSL.Create;
  14. Prezados membros do Fórum ACBr, boa tarde! Ainda NÃO consegui uma solução. Erro: O componente "ACBreSocial" está gravando o arquivo "teste.xml" no "c:\". Pela política da empresa, só tenho permissão para gravar na pasta da minha aplicação. Não sendo permitindo gravar no drive "c:\" do micro do usuário. Segue em anexo, o print-screen da configuração do componente "ACBreSocial" onde defino o path de gravação do arquivo em "..\EFS\AUXILIAR". Mesmo assim o componente "ACBreSocial" grava o arquivo "teste.xml" no "c:\" ***Dúvida: Onde no componen
  15. Prezados membros do Fórum ACBr, bom dia! Estou com um problema. Implantei em um cliente o e-Social, utilizando o componente ACBreSocial. Até ai tudo ok. 1) Enviei o arquivo S-1000 - EM AMBIENTE HOMOLOGAÇÃO - Tudo correto. OK 2) Enviei o mesmo arquivo S-100 - EM AMBIENTE PRODUÇÃO - Apresenta o erro abaixo: ERRO APRESENTADO: "Código.....: 607 Descrição..: O número de inscrição do transmissor deverá ser igual ao CNPJ/CPF do certificado utilizado para o envio do lote." Por favor, será que alguém poderia me dar um help para solucionar o erro acima descrito? Des
×
×
  • Create New...