Ir para conteúdo
  • Cadastre-se

Zottis

Membros
  • Total de ítens

    131
  • Registro em

  • Última visita

Posts postados por Zottis

  1. 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?

     

  2. 1 hora atrás, Italo Jurisato Junior disse:

    Zottis,

    Você estava com problemas em um provedor e agora esta postando sobre outro. 

    Por favor não misture as coisas, para um novo problema, favor criar uma nova postagem.

    Pois agora eu não sei em qual provedor esta ocorrendo o erro HTTP 500.

    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.

     

     

  3. 1 hora atrás, arce disse:

    O modelo de LoadFromFile pode ser espelhado no da NFe, que utiliza a unit pcnNFeR.pas para ler o XML.

    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. 

  4. 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.

     

  5. 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

  6. 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>

  7. 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?

  8. 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
     

    • Curtir 1
  9. 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)?

     

  10. 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?

     

  11. 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?

     

     

  12. Através do debug,  achei algumas inconsistências e caso ajude, são:

    na unit ACBrDFeWebService;

     na procedure TDFeWebService.EnviarDados;

    tem uma validação que sempre retorna false, pois os campos sempre estão vazios, troquei e deu certo.

    //Aqui sempre vazio

      TemCertificadoConfigurado := (FPConfiguracoes.Certificados.NumeroSerie <> '') or
                                   (FPConfiguracoes.Certificados.DadosPFX <> '') or
                                   (FPConfiguracoes.Certificados.ArquivoPFX <> '');

      //Zottis 11/2017

    //Aqui da certo
      TemCertificadoConfigurado := (FPDFeOwner.SSL.CertNumeroSerie <> '') or
                                   (FPDFeOwner.SSL.NumeroSerie <> '') or
                                   (FPDFeOwner.SSL.DadosPFX <> '') or
                                   (FPDFeOwner.SSL.ArquivoPFX <> '');

      if TemCertificadoConfigurado then...
     

    na unit ACBrReinfEventosBase;

    na procedure TEventoReinf.SetSchema(ASchema: TReinfSchema);

    na parte: 

        EhValido := SSL.Validar(string(AXML), Configuracoes.Arquivos.PathSchemas + AEvento + '.xsd', Erro);//sempre  retorna false

    Forcei para true e da certo
        EhValido := true;

    Após apanhar um monte, consegui comunicação

    porém com a versão 1_01_01, deu erro dizendo que deveria usar a 1.02,

    mudei a constante REINF_VERSAO  para 1_02_00, e da o seguinte erro:

    <status><cdStatus>1</cdStatus><descRetorno>ERRO</descRetorno><dadosRegistroOcorrenciaLote><ocorrencias><tipo>1</tipo><codigo>MS0030</codigo><descricao>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.</descricao>

    Alguém sabe que fazer?

  13. Boa tarde Pessoal, estou perdido na utilização do Reinf, 

    Pelo que entendi, eu devo atualizar o  ACBrDFe,

    mas não entendi se é pelo SVN ou pelo arquivo .rar

     

    e na hora de recompilar o ACBr_DFeComum, da esse erro:

    [dcc32 Fatal Error] PoliCryp_TLB.pas(45): F1026 File not found: 'D:\componentes_Instalados\ACBR2\Pacotes\Delphi\ACBrDFe\mscorlib_TLB.dcu'

  14. Bom dia, estou testando também seu componente, porém me da a mensagem em anexo, a configuração deixei igual ao colega Juuninho

    (AACBreSocial.Configuracoes.Geral.SSLLib := libCustom;
    AACBreSocial.Configuracoes.Geral.SSLCryptLib := cryCapicom;
    AACBreSocial.Configuracoes.Geral.SSLHttpLib := httpWinINet;
    AACBreSocial.Configuracoes.Geral.SSLXmlSignLib := xsPoliCryp;)

     

    poderia me ajudar?

    uExemploReinf.png

  15. Bom dia, estou iniciando um projeto de emissão para a cidade de Fortaleza,

    o Provedor é ISSFortaleza, mas não encontrei os schemas na pasta,

    e no Demo tem a cidade de Fortaleza,

    alguém sabe quais usar?

    desde já agradeço 

×
×
  • 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.