Phoenixsistemas

Vou testar e reporto! Por enquanto muito obrigado!

Consegui homologar sim, pois tive que criar a verificação manual para aguardar o retorno. Para contornar esse problema após o envio eu criei: if UserSession.NFSe.Configuracoes.Geral.Provedor in [proGinfes] then Sleep(20000); Foi o melhor tempo de resposta, menos de 2000 muita das vezes não da tempo de processar o e cai no status 2 ou 3 !

SafeWeb.iniCidades.ini

SARANDI / RS / SafeWeb Mas ai vem a duvida como não esta cadastrado, e conseguimos realizar os teste com a versão antiga, conforme pode observar na imagem?

Gentileza verificar se esta implementado no componente NFSeX CONSULTAR APÓS LOTE APÓS ENVIO GINFES CONTAGEM , testei de todas as maneiras o mesmo não realiza a consulta, já no componente NFSe funciona perfeitamente.

Como podemos ver o modelo do NFSe os teste são realizados com sucesso, porem com o NFSeX estamos recebendo o seguinte erro : Modo de Envio : Enviar Lote Numero do Lote: 1 Data de Envio : 30/12/1899 Numero do Prot: Sucesso : False Erro(s): Código : L13 Mensagem: Erro na autenticação: [NFSeCDD.CDD.LoginPrestadorDD.Autentica]: Não foi encontrada nenhuma Prefeitura ao Código de Município do IBGE informado. Correção: ---------

Primeiramente gostaria de saber se os Schemas a ser utilizado para realizar a comunicação do TCHEINFO_2 e o contido na pasta "Acbr\Exemplos\ACBrDFe\ACBrNFSe\Schemas\TcheInfo". Gostaria de saber se o mesmo ja esta implementado pois ao tentar emitir uma nota utilizando as libs anexadas abaixo não consigo nenhuma comunicação.

Obrigado campo regime especial adicionado!

Como citado acima o tag não esta sendo adicionada o xml, ja testei tanto no demo quanto no meu código, da mesma forma que encontrei o erro na assinatura, que foi corrigida pela o Italo.

Conforme citado acima já tentei passando manualmente sem leitura do banco, as seguintes opções retNenhum, retMicroempresaMunicipal,retMicroempresarioEmpresaPP case QryConfig.FieldByName('CONF_REGIME_TRIB_ESP').AsInteger of 0 : RegimeEspecialTributacao := retMicroempresaMunicipal; 1 : RegimeEspecialTributacao := retEstimativa; 2 : RegimeEspecialTributacao := retSociedadeProfissionais; 3 : RegimeEspecialTributacao := retCooperativa; 4 : RegimeEspecialTributacao := retMicroempresarioIndividual; 5 : RegimeEspecialTributacao := retMicroempresarioEmpresaPP; end; e recebo isso NFS-e Numero....: 960 Cod. Verificacao: Modo de Envio : ConsultarLote Numero do Lote: Numero do Prot: 11447411 Situação Lote : Sucesso : True Erro(s): Código : E166 Mensagem: Campo RegimeEspecialTributação não informado para empresa optante do simples nacional. Correção: Quando se tratar de empresa optante do simples nacional marcar o campo RegimeEspecialTributação com uma das opções: 05 - MEI do simples nacional ou 06 - ME ou EPP do simples nacional. --------- OUTRA OBSERVAÇÃO IMPORTANTE NO XML ORIGINAL BAIXADO DO SITE DO GINFES O REGIME ESPECIAL DE TRIBUTAÇÃO = 0 que no acbr corresponde a retNenhum

Bom dia Victor! Sim compreendo. Como pode observar abaixo eu faço o envio do lote em seguida a consulta do lote, conforme abaixo Modo de Envio : Enviar Lote Numero do Lote: 960 Data de Envio : 13/07/2021 Numero do Prot: 11447399 Sucesso : True NFS-e Numero....: 960 Cod. Verificacao: Modo de Envio : ConsultarLote Numero do Lote: Numero do Prot: 11447399 Situação Lote : Sucesso : True Erro(s): Código : E4 Mensagem: Esse RPS não foi enviado para a nossa base de dados Correção: Envie o RPS para emissão da NFS-e. --------- NFS-e Numero....: 960 Cod. Verificacao: Nome do arquivo.: Porem se eu esperar alguns segundos e consultar apenas o lote 11447399 novamente recebo uma mensagem diferente NFS-e Numero....: 960 Cod. Verificacao: Modo de Envio : ConsultarLote Numero do Lote: Numero do Prot: 11447399 Situação Lote : Sucesso : True Erro(s): Código : E166 Mensagem: Campo RegimeEspecialTributação não informado para empresa optante do simples nacional. Correção: Quando se tratar de empresa optante do simples nacional marcar o campo RegimeEspecialTributação com uma das opções: 05 - MEI do simples nacional ou 06 - ME ou EPP do simples nacional. E no caso do erro acima a tag e alimentada porem não sai no XML

Segue em anexo dois xml um sendo baixado no site GINFES ( "https://contagem.ginfes.com.br/" ) o outro tentei gerar pelo componente ACBrNFSeX. Observando o xml original temos o Regime Especial de Tributação, no acbr existe vários, seguindo o manual do GINFES na pagina 20 encontramos a seguintes opções case QryConfig.FieldByName('CONF_REGIME_TRIB_ESP').AsInteger of 0 : RegimeEspecialTributacao := retMicroempresaMunicipal; 1 : RegimeEspecialTributacao := retEstimativa; 2 : RegimeEspecialTributacao := retSociedadeProfissionais; 3 : RegimeEspecialTributacao := retCooperativa; 4 : RegimeEspecialTributacao := retMicroempresarioIndividual; 5 : RegimeEspecialTributacao := retMicroempresarioEmpresaPP; end; tentei passar direto sem passar pelo case, porem o mesmo não vai para o XML. Outra observação e o campo COMPETÊNCIA que também e alimentado também não exibe no XML. Competencia := QryCabecalho.FieldByName('NFSE_COMPETENCIA').AsDateTime; No XML do ACBR exibe o atributo STATUS = 1 e já no original GINFES não. Ao final do Arquivo XML GINFES encontramos o OrgaoGerador que contem o código do município (IBGE) da empresa prestadora, que também não localizei no componente ACBrNFSeX. Com base nas informações acima e com os arquivos anexados gostaria de saber se estou fazendo algo errado ou o componente necessita de realizar os ajustes. Desde de já agradecemos! ACBR - 96085-rps.xml GINFIS - 4.7606405360540074E8.xml

RESOLVIDO!

Ao enviar uma NFSe ele me retorna o Seguinte erro. O documento XML difere da assinatura O documento XML não pode conter alterações após a assinatura Trecho do Código var ValorISS: Double; i: Integer; begin with ACBrNFSeX1 do begin NotasFiscais.NumeroLote := NumLote; NotasFiscais.Transacao := True; with NotasFiscais.New.NFSe do begin Configuracoes.Geral.IdentarXML := False; Numero := NumDFe; IdentificacaoRps.Serie := '85'; IdentificacaoRps.Numero := Numero; DataEmissao := Now; NaturezaOperacao := no1; RegimeEspecialTributacao := retMicroempresaMunicipal; OptanteSimplesNacional := snSim; IncentivadorCultural := snNao; Competencia := Now; Servico.Valores.ValorServicos := 190.00; Servico.Valores.IssRetido := stNormal; Servico.Valores.ValorIssRetido := 0.00; Servico.Valores.BaseCalculo := ( Servico.Valores.ValorServicos - Servico.Valores.ValorDeducoes - Servico.Valores.DescontoIncondicionado ); Servico.Valores.Aliquota := 0.0398; Servico.Valores.ValorLiquidoNfse := ( Servico.Valores.ValorServicos - Servico.Valores.ValorPis - Servico.Valores.ValorCofins - Servico.Valores.ValorInss - Servico.Valores.ValorIr - Servico.Valores.ValorCsll - Servico.Valores.OutrasRetencoes - Servico.Valores.ValorIssRetido - Servico.Valores.DescontoIncondicionado - Servico.Valores.DescontoCondicionado ); Servico.Valores.ValorIssRetido := 0.00; Producao := snNao; Servico.CodigoMunicipio := edtCodCidade.Text; Servico.ItemListaServico := '1401'; Servico.CodigoTributacaoMunicipio := '452000101'; Servico.Discriminacao := 'SERVICO PRESTADO AO VEICULO: VOLVO PLACA: PWL-3051'+ 'Trib. Aprox. R$: 25,56 Federal e 5,80 Municipal Fonte: IBPT 5oi7eW'; Servico.MunicipioIncidencia := StrToIntDef(edtCodCidade.Text, 0); Prestador.IdentificacaoPrestador.CNPJ := edtEmitCNPJ.Text; Prestador.IdentificacaoPrestador.InscricaoMunicipal := edtEmitIM.Text; Prestador.RazaoSocial := edtEmitRazao.Text; Prestador.NomeFantasia := edtEmitRazao.Text; Prestador.cUF := UFtoCUF(edtEmitUF.Text); Prestador.Endereco.Endereco := edtEmitLogradouro.Text; Prestador.Endereco.Numero := edtEmitNumero.Text; Prestador.Endereco.Bairro := edtEmitBairro.Text; Prestador.Endereco.CodigoMunicipio := edtCodCidade.Text; Prestador.Endereco.xMunicipio := CodIBGEToCidade(StrToIntDef(edtCodCidade.Text, 0)); Prestador.Endereco.UF := edtEmitUF.Text; Prestador.Endereco.CodigoPais := 1058; Prestador.Endereco.xPais := 'BRASIL'; Prestador.Endereco.CEP := edtEmitCEP.Text; Prestador.Contato.Telefone := '1633224455'; Prestador.Contato.Email := '[email protected]'; Tomador.IdentificacaoTomador.Tipo := tpPJdoMunicipio; Tomador.IdentificacaoTomador.CpfCnpj := '41908849000145'; Tomador.IdentificacaoTomador.InscricaoMunicipal := '72055808'; Tomador.RazaoSocial := 'INSCRICAO DE TESTE'; Tomador.Endereco.TipoLogradouro := 'RUA'; Tomador.Endereco.Endereco := 'RUA PRINCIPAL'; Tomador.Endereco.Numero := '100'; Tomador.Endereco.Complemento := 'APTO 11'; Tomador.Endereco.Bairro := 'CENTRO'; Tomador.Endereco.CodigoMunicipio := edtCodCidade.Text; Tomador.Endereco.xMunicipio := CodIBGEToCidade(StrToIntDef(edtCodCidade.Text, 0)); Tomador.Endereco.UF := edtEmitUF.Text; Tomador.Endereco.CodigoPais := 1058; // Brasil Tomador.Endereco.CEP := edtEmitCEP.Text; Tomador.Endereco.xPais := 'BRASIL'; Tomador.IdentificacaoTomador.InscricaoEstadual := '123456'; Tomador.Contato.Telefone := '1622223333'; Tomador.Contato.Email := '[email protected]'; Tomador.AtualizaTomador := snNao; Tomador.TomadorExterior := snNao; end; 1-env-lot.xml 1-rec.xml ORIGINAL PREFEITURA DE CONTAGEM - GINFIS 7.875412543316336E8.xml