-
Total de ítens
16 -
Registro em
-
Última visita
Tipo de Conteúdo
Blocks
Notes ACBrLibNFe
Fóruns
Downloads
Calendário
Tudo que Márcio M Gomes postou
-
Para pegar o Recibo e Consultar, fiz assim: ACBrReinf.WebServices.EnvioLote.RetEnvioLote.Leitor.Grupo := ACBrReinf.WebServices.EnvioLote.RetEnvioLote.Leitor.rExtrai( 1, 'infoTotal') ; ; Recibo := ACBrReinf.WebServices.EnvioLote.RetEnvioLote.Leitor.rCampo( tcStr, 'nrRecArqBase' ) ; ACBrReinf.Consultar(Recibo) ; Não fiz um teste completo ainda devido a equipe que está desenvolvendo o XML (em outro sistema) não ter finalizado ainda. Espero que ajude. Att,
-
ideEmpregador - nrInsc com 8 posições
Márcio M Gomes replied to Márcio M Gomes's tópico in ACBreSocial
Segue anexo. Abraços. ACBreSocialWebServices.pas -
Boa tarde. Aqui nós utilizamos o campo IdEmpregador.nrInsc com 8 posições ( Raiz do CNPJ para trabalhar com Matriz e Filiais), ficando a propriedade ACBreSocial.Configuracoes.Geral.IdEmpregador também com 8 posições. Na ACBreSocialWebServices.pas, método TEnvioLote.DefinirDadosMsg é atribuído o TpInsc de acordo com o tamanho do IdEmpregador. Como utilizamos com 8 posições, sempre está atribuindo TpInsc := tiCPF. Segue a imagem do método atual e abaixo o ajuste que realizei. Espero que ajude.
-
Rubinho, você me deu uma luz. rsrsrsr. Na minha pasta "customizada" de schemas, estava faltando o "xmldsig-core-schema.xsd". Coloquei ele lá e funcionou. Grato a todos.
-
O caminho do schema: C:\ACBR_Atualizado\Exemplos\ACBrDFe\ACBrReinf\Delphi\Schemas). A variável ArqSchema está OK. Tanto que não dá erro ao atribuir à parser_ctxt. Com xsMsXML dá a mensagem: "Necessário DigestMethod Algorithm = sha256 -> SSLLib = libOpenSSL." Não posso utilizar a OpenSSL devido a utilização de Certificado A3.
-
Bom dia. A aplicação exemplo do Reinf está me retornando o seguinte erro: Debugando, cheguei ao seguinte método: OBS: Observe as variáveis, a schema está vazia. Já atualizei os fontes, reinstalei tudo, baixei schemas atualizados (versão 1.03.00) e nada. Peço a ajuda da comunidade. Grato. Márcio M. Gomes
-
ACBreSocial - problema ao definir certificado A3
Márcio M Gomes replied to sergio.lowczy's tópico in ACBreSocial
Boa tarde @Leivio Fontenele Tem alguma novidade sobre a utilização de Certificado A3? Grato, -
@Natanael R. Rodrigues eu estou fazendo o seguinte: Pego o XML gerado de outra aplicação (completo, com os eventos), extraio apenas o evento (neste caso a aplicação externa está gerando apenas um evento por XML), assino e valido, adiciono apenas a assinatura do evento ao XML completo, valido e envio diretamente usando ACBreSocial.WebServices.Envia("XML"). Não estou gerando os eventos pelo ACBreSocial, e meu "Id" já vem preenchido pela aplicação externa. Na realidade é apenas uma interface entre a aplicação externa e o eSocial. Att, Márcio
-
@Juliomar Marchetti, Observei que em ACBrDFeSSL.pas no método TDFeSSLXmlSignClass.AdicionarSignatureElement, está atribuindo a variável URI := ExtraiURI(ConteudoXML, IdSignature), porém, para o eSocial essa variável deve ficar vazia. Estou fazendo o envio do XML diretamente pelo método Envia (ACBreSocial.WebServices.Envia), pois meu XML é gerado por outra aplicação, eu apenas assino e envio. Estou fazendo o envio e consulta com sucesso, apenas tive que ajustar isso. No fonte inicial feito pelo @Leivio Fontenele, estava assim dentro do TDFeSSLXmlSignClass.AdicionarSignatureElement: {$IFDEF ESOCIAL} URI := ''; {$ELSE} URI := ExtraiURI(ConteudoXML); {$ENDIF} Para meus testes deixei assim: if docElement <> 'eSocial' then URI := ExtraiURI(ConteudoXML, IdSignature); Como você comentou que está fazendo o merge no trunk2, não sei se isso foi visto. Att, Márcio
-
@Paulo Souza Essa função fica em System.DateUtils. Estou usando XE 10 Seattle. Márcio
-
Grato @Leivio Fontenele e @Daniel Simoes. Fico no aguardo do A3. Se conseguir alguma coisa eu posto aqui também. Att, Márcio
-
Boa tarde a todos. Estou testando os fontes do @Leivio Fontenele e está tudo OK (parabéns), apenas não estou conseguindo gerar a chave SHA256 com certificados A3. Estou fazendo em Delphi XE 10 Seattle. Configuração 1: SSLCryptLib := cryWinCrypt; SSLHttpLib := httpIndy; SSLXmlSignLib := xsXmlSec; Erro: "Certificado não pode ter sua chave privada exportada" Configuração 2: SSLCryptLib := cryWinCrypt; SSLHttpLib := httpIndy; SSLXmlSignLib := xsMsXml; Erro: "The DigestMethod algorithm 'http://www.w3.org/2001/04/xmlenc#sha256' is not supported" Alguém tem alguma dica para A3 ou conseguiu fazer. Grato Márcio Gomes
-
Obrigado André. Vou tentar fazer isso. Grato.
-
Olá Sérgio. O problema é que não executa a aplicação na situação e configurações descritas acima. Apenas pisca a tela e fecha. Estranho é que algumas estações executam uma vez e depois não executa mais. Já tivemos esse problema com uma outra aplicação, porém, gostaria de saber se alguém já passou por isso e conseguiu uma solução diferente da desinstalação ou formatação. Grato.
-
Bom dia. Alguém está com problemas para executar o exemplo do ACBrSAT em estações (Win 7) com o Gbp Service da GAS Tecnologia instalado. (Esse Gbp Service é utilizado para acesso bancário e causa problemas em vários outros programas). Desinstalá-lo é um problema e dá um trabalhão. Alguém já passou por isso ? Sabe alguma forma de resolver esse problema (sem precisar desinstala-lar o Gbp Service) ? OBS: Não adianta executar com administrador, dar permissão total, etc. Grato, Márcio Gomes
-
Estou com o mesmo problema "cryptCreateHash", pelo que vi é um método pertencente à advapi32.dll. Preciso utilizar A3. Minha estão é Win 10 64 bits, mas em uma Seven 32 dá o mesmo erro. Att,