Zottis

Perdão Juliomar, o que acontece é que fiz uma DLL em delphi 7 que faz a assinatura e envio do RPS para a prefeitura, se marco a opção de fazer a consulta após o envio, ele da Zica, e traz o erro Vazio. Mesmo debugando, não encontrei lógica. só conseguimos com o timeOut em 18000., porém a nota leva 40 segundos para ser enviada. a princípio, isso só esta acontecendo em servidores Win2012 DataCenter.

Oi, existe algum impecílio para usar o ACBR na NFSe em servidores 2012 datacenter? Estamos tendo um monte de problemas na comunicação com esses servidores.

colocando assim ACBrNFSe1.Configuracoes.Geral.ConsultaLoteAposEnvio := False; e fazendo a segunda consulta, vai redondinho, só consegui marcando o ACBrNFSe1.Configuracoes.Geral.ConsultaLoteAposEnvio como true aumentando muuuiiittto o timeout mas leva 40 segundos para enviar a nota. o Servidor nosso é Win2012 Datacenter.

Pessoal, ta acontecendo um problema muito estranho aqui, implementamos a NFSe da cidade de fortaleza em produção, porém de alguns dias pra ca, tivemos algumas reclamações dos clientes, testando na minha máquina, na primeira vez que abro o programa, ele retorna tudo em branco,(sem erro e sem resposta) na segunda vez, ele consegue comunicar porém, na hora de enviar, ele retorna erro e não consegue peguar a resposta do segundo envio. e depois fazendo uma consulta, verificamos que a nota foi enviada e autorizada. debugando na minha máquina, o erro é na hora de fazer a segunda requisição pois o ConsultaLoteAposEnvio esta setado. alguém já passou por isso? estou enviando assim: ACBrNFSe1.Configuracoes.Geral.ConsultaLoteAposEnvio := true; ACBrNFSe1.Enviar(1,false);

Caso alguém precise, consegui da seguinte forma: criar uma classe e jogar o método(procedure) dentro dela na parte publica e depois, criar um objeto dessa classe, instancia-la e depois declarar . type TTransmiteEventoZ = class public procedure TransmissaoEventos(const AXML: AnsiString; ATipo: TeSocialEventos); published private end; procedure TTransmiteEventoZ.TransmissaoEventos(const AXML: AnsiString; ATipo: TeSocialEventos); begin case ATipo of eseEnvioLote: VXMLEnvioLote := AXML; eseRetornoLote: VXMLRetornoLote := AXML; eseEnvioConsulta: VXMLEnvioConsulta := AXML; eseRetornoConsulta: VXMLRetornoConsulta := AXML; end; end; var MeuEvento : TTransmiteEventoZ; begin ..... MeuEvento := TTransmiteEventoZ.Create; FACBrESocial.OnTransmissaoEventos := MeuEvento.TransmissaoEventos;

bom dia, e desculpe por não ter mencionado é Delphi.

Estamos criando o componente em tempo de execução, como faço para associar uma procedure ao método onTransmissaoEventos, copiei a procedure do exemplo(abaixo) e tentei associar assim: FACBrESocial := TACBrESocial.Create(nil); FACBrESocial.OnTransmissaoEventos := ACBreSocial1TransmissaoEventos; porem da erro. procedure ACBreSocialTransmissaoEventos(const AXML: AnsiString; ATipo: TeSocialEventos); begin gravaLog('Entrou na Transmissão de Eventos'); case ATipo of eseEnvioLote: VXMLEnvioLote := AXML; eseRetornoLote: VXMLRetornoLote := AXML; eseEnvioConsulta: VXMLEnvioConsulta := AXML; eseRetornoConsulta: VXMLRetornoConsulta := AXML; end; end; Obrigado

Pessoal, boa tarde, estmaos enfrentando um problema aqui na empresa onde trabalho, desenvolvemos uma DLL que é chamada pelo ERP da empresa para assinatura e envio do eSocial, se chamo a DLL de uma aplicação feita em Delphi, funciona redondinho, mas quando é chamada do ERP, da erro na assinatura, mas não consigo identificar o erro, pois não tenho como debugar. Pergunto: quais as DLLs necessárias para assinar o XML e quais as configurações recomendadas para a transmissão uso conforme abaixo: FACBrESocial.SSL.DescarregarCertificado; FACBreSocial.Configuracoes.Geral.SSLLib := libCustom; FACBreSocial.Configuracoes.Geral.SSLCryptLib := cryWinCrypt; FACBreSocial.Configuracoes.Geral.SSLHttpLib := httpWinHttp; FACBreSocial.Configuracoes.Geral.SSLXmlSignLib := xsXmlSec; PS: a DLL esta em um Win Server 2012. obrigado

Boa tarde. Deu certo, obrigado

Bom dia, estou tentando ler o XML convertendo dados para os tipos esperados, usando as funções de conversão, porém, da erro: [dcc32 Error] uESocial.pas(791): E2033 Types of actual and formal var parameters must be identical evtInfoEmpregador.InfoEmpregador.InfoCadastro.IndConstr := eSStrToIndConstrutora(vLeitor.rCampo(tcStr, 'indConstr')); function eSStrToIndConstrutora(var ok: boolean; const s: string): TpIndConstr; begin result := TpIndConstr( StrToEnumerado2(ok , s, TGenericosString0_1 ) ); end; pesquisando na internet, só deu certo se tiro a palavra reservada "var" da function e passo o parâmetro "true" na chamada da função: function eSStrToIndConstrutora(ok: boolean; const s: string): TpIndConstr; begin result := TpIndConstr( StrToEnumerado2(ok , s, TGenericosString0_1 ) ); end; evtInfoEmpregador.InfoEmpregador.InfoCadastro.IndConstr := eSStrToIndConstrutora(True,vLeitor.rCampo(tcStr, 'indConstr')); alguém sabe como resolver sem mexer no código da classe ACBr?

Ok, Italo, concordo que deveria ter aberto o questionamento em outro Post, acho que é o Stresse do final de ano. Ta Todo mundo querendo as coisas que ficamos no modo automático. Mais uma vez, me desculpe. Quanto ao HTTP 500 é da Prefeitura de Fortaleza em ambiente de Homologação, acredito que não esteja liberado esse ambiente, mesmo tendo no site deles, a opção de pedir a liberação, porém, não funciona.

Valeu @Arce, ajudou muito.

Obrigado @Arce, sem querer abusar(já abusando), tem algum modelo ou exemplo? achei o ItensLoteEvento que tem o método carregarArquivo, porém, não sei se da certo.

Oi Italo, bom dia, desculpe pela falha. mas se reparar, mandei o XML em anexo, o que colei, foi o retorno, e também postei que o XML que me passaram(de envio) estava errado, por isso dava o problema relatado, agradeço a disponibilidade da ajuda. Valeu.

Boa tarde, aqui na empresa, eles querem manter o padrão do sistema criar os XMLs, porem, não encontro em nenhum lugar um LoadFromFile para poder carregar o componente via um xml já pronto(Igual a NFe). Alguém saberia como fazer? desde já agradeço.

Desculpem, a tag estava errada, peguei o xml errado. porém, agora da erro HTTP 500 em ambiente de Homologação.

Também, para o envio da cidade de Fortaleza, esta dando erro na validação da data de emissão. aqui, fazemos o XML por fora e faço um loadFromFile desse arquivo. mas quando ele entra na rotina de validar, analizando o debug, o campo dataEmissão, só fica com a tag inicial. o xml que envio esta em anexo e o que chega na validação é:(peguei via Debug) <?xml version="1.0" encoding="UTF-8"?><ns3:EnviarLoteRpsEnvio xmlns:ns3="http://www.ginfes.com.br/servico_enviar_lote_rps_envio_v03.xsd" xmlns:ns4="http://www.ginfes.com.br/tipos_v03.xsd"><ns3:LoteRps Id="1"><ns4:NumeroLote>1</ns4:NumeroLote><ns4:Cnpj>00212872000113</ns4:Cnpj><ns4:InscricaoMunicipal>586936-6</ns4:InscricaoMunicipal><ns4:QuantidadeRps>1</ns4:QuantidadeRps><ns4:ListaRps><ns4:Rps><ns4:InfRps Id="12017"><ns4:IdentificacaoRps><ns4:Numero>1</ns4:Numero><ns4:Serie>2017</ns4:Serie><ns4:Tipo>1</ns4:Tipo></ns4:IdentificacaoRps><ns4:DataEmissao/><ns4:NaturezaOperacao>1</ns4:NaturezaOperacao><ns4:OptanteSimplesNacional>1</ns4:OptanteSimplesNacional><ns4:IncentivadorCultural>1</ns4:IncentivadorCultural><ns4:Status>1</ns4:Status><ns4:Servico><ns4:Valores><ns4:ValorServicos>5418.58</ns4:ValorServicos><ns4:ValorDeducoes>0.00</ns4:ValorDeducoes><ns4:ValorPis>0.00</ns4:ValorPis><ns4:ValorCofins>0.00</ns4:ValorCofins><ns4:ValorInss>0.00</ns4:ValorInss><ns4:ValorIr>0.00</ns4:ValorIr><ns4:ValorCsll>0.00</ns4:ValorCsll><ns4:IssRetido>2</ns4:IssRetido><ns4:ValorIss>162.56</ns4:ValorIss><ns4:BaseCalculo>5418.58</ns4:BaseCalculo><ns4:ValorLiquidoNfse>5418.58</ns4:ValorLiquidoNfse></ns4:Valores><ns4:ItemListaServico>09.99</ns4:ItemListaServico><ns4:CodigoTributacaoMunicipio>999999999</ns4:CodigoTributacaoMunicipio><ns4:Discriminacao>texto</ns4:Discriminacao><ns4:CodigoMunicipio>2304400</ns4:CodigoMunicipio></ns4:Servico><ns4:Prestador><ns4:Cnpj>00212872000113</ns4:Cnpj><ns4:InscricaoMunicipal>999999</ns4:InscricaoMunicipal></ns4:Prestador><ns4:Tomador><ns4:RazaoSocial>RAZAO SOCIAL</ns4:RazaoSocial><ns4:Endereco><ns4:Endereco>AV PRESIDENTE CASTELO BRANCO</ns4:Endereco><ns4:Numero>999</ns4:Numero><ns4:Complemento>APARTAMENTO 302</ns4:Complemento><ns4:Bairro>MOURA BRASIL</ns4:Bairro><ns4:CodigoMunicipio>2304400</ns4:CodigoMunicipio><ns4:Uf>CE</ns4:Uf><ns4:Cep>60010000</ns4:Cep></ns4:Endereco></ns4:Tomador></ns4:InfRps></ns4:Rps></ns4:ListaRps></ns3:LoteRps><Signature xmlns="http://www.w3.org/2000/09/xmldsig#"><SignedInfo>< 12017-rps.xml

Oi Italo, boa tarde, segue: <CancelarNfseResponse xmlns="http://www.issnetonline.com.br/webservice/nfd"> <CancelarNfseResult> <CancelarNfseResposta xmlns="http://www.issnetonline.com.br/webserviceabrasf/vsd/servico_cancelar_nfse_resposta.xsd"> <ListaMensagemRetorno> <MensagemRetorno> <Codigo xmlns="http://www.issnetonline.com.br/webserviceabrasf/vsd/tipos_complexos.xsd">E079 </Codigo> <Mensagem xmlns="http://www.issnetonline.com.br/webserviceabrasf/vsd/tipos_complexos.xsd"> Essa NFS-e ja esta cancelada. </Mensagem> <Correcao xmlns="http://www.issnetonline.com.br/webserviceabrasf/vsd/tipos_complexos.xsd"> Confira e informe novamente os dados da NFS-e que deseja cancelar. </Correcao> </MensagemRetorno> </ListaMensagemRetorno> </CancelarNfseResposta> </CancelarNfseResult> </CancelarNfseResponse>

Boa tarde, estou implementando a NFSe da Cidade de Sidrolândia, mas na hora de cancelar, não retorna mensagem alguma, debugando, encontrei o problema na function: unit ACBrNFSeWebServices; function TNFSeCancelarNfse.TratarResposta: Boolean; onde retorna false, mesmo tendo um retorno. corrigi da seguinte forma: // Result := (FDataHora > 0) or (RetCancNFSe.InfCanc.Sucesso='S') or (UpperCase(RetCancNFSe.InfCanc.Sucesso)='TRUE');//Original Result := (FDataHora > 0) or (RetCancNFSe.InfCanc.Sucesso='S') or (UpperCase(RetCancNFSe.InfCanc.Sucesso)='TRUE') or(FaMsg <> '');//Zottis 14/12/2017 Essa correção seria a correta?

Consegui fazer funcionar, haviam me passado o CNPJ errado. ideTransmissor: xxxxxxxx0001xx cdStatus: 0 retornoEventos Evento Id: *ideContrib ideContrib: 1 NrInsc: 80109663 *dadosRecepcaoEvento dhProcessamento 21/11/2017 tipoEvento 1000 IdEvento ID1801096630000002017112109442900001 Hash RZozbgsWKwNR1nUpunGHYxv8ST+miS/5YCw0WAF26nM= *Status cdRetorno 0 descRetorno SUCESSO *dadosReciboEntrega numeroRecibo **Ocorrencias

Bom dia, o meu acredito que esta, mas estou recebendo a mensagem "Deve ser utilizado certificado digital do tipo e-CNPJ ou e-PJ cujo CNPJ base seja o mesmo do contribuinte responsável pela informação, ou do tipo e-CPF ou e-PF cujo CPF pertença ao representante legal do contribuinte ou qualquer certificado que pertença a um procurador devidamente habilitado no sistema de Procuração Eletrônica da RFB." e eu não entendi essa mensagem: o certificado é do CNPJ do ID <Reinf xmlns="http://www.reinf.esocial.gov.br/schemas/envioLoteEventos/v1_02_00"><loteEventos><evento id="ID1829820750001802017112109122300001"> <Reinf ..... no caso, esse certificado deve ser de quem? da pessoa responsável(cpfCtt)?

testei utilizando o Web Service do Paraná e também deu certo.

Já estou utilizando a 1.2, e esta comunicando. Qual estado? utilizei a UF de Santa Catarina.

Resolvi a questão acima, utilizando o comando FreeAndNil(FACBrReinf); Outra coisa, consegui comunicação com a versão 1.2 porém, retorna: "Deve ser utilizado certificado digital do tipo e-CNPJ ou e-PJ cujo CNPJ base seja o mesmo do contribuinte responsável pela informação, ou do tipo e-CPF ou e-PF cujo CPF pertença ao representante legal do contribuinte ou qualquer certificado que pertença a um procurador devidamente habilitado no sistema de Procuração Eletrônica da RFB. tipo: 1" Usei o certificado da empresa que usa nosso sistema para enviar e assinar, no cpfctt usei o meu cpf, o da empresa, do certificado, porém nada. Alguém sabe de quem seria o e-cpf ou e_cnpj que devo utilizar?

Bom dia, ainda estou fazendo testes para tentar ajudar no projeto, e encontrei uma situação: na primeira vez que envio, me retorna a mensagem conforme relatado acima "A estrutura do arquivo XML esta em desconformidade com o esquema XSD. O namespace http://www.reinf.esocial.gov.br/schemas/envioLoteEventos/v1_02_00 informado no documento XML não é um namespace reconhecido." Porém, na segunda vez que envio, da erro na parte: unit ACBrDFePoliCryp; function TDFeSSLXmlSignPoliCryp.Assinar .... XmlCryp := CoXmlCryp.Create; XmlAss := XmlCryp.AssinarXml(1, AXml, infElement, FpDFeSSL.NumeroSerie, FpDFeSSL.ArquivoPFX, FpDFeSSL.Senha); if ( XmlAss = '' ) then//Aqui Retorna Vazio Será que a DLL PoliCryp não esta ficando instanciada?