Pesquisar na Comunidade

Estou enfrentando a seguinte rejeição: 'Rejeição: valorGNRE - O valor da GNRE diverge do somatorio dos valores dos itens'. Alguém sabe como resolver esse problema e como funciona essa validação? Gostaria de entender melhor para poder prever e evitar essa situação no meu sistema.

Bom dia! Conforme fora relatado no tópico abaixo, o webservice da prefeitura do Rio de Janeiro define as quebras de linhas com o próprio #13#10, não podendo ser removido ou substituído por ponto e vírgula, por exemplo, como faz o parse do ACBrNFSe atualmente (de forma correta, seguindo os padrões de tratamento do xml, mas que acaba embaralhando a discriminação do serviço ao visualizar via site). Esbarrei com o mesmo problema, pois quase todos os nossos clientes são da cidade do Rio de Janeiro e todos utilizam a impressão via site da prefeitura. E como no tópico relacionado não houve solução, mas um paliativo de alinhamento do dado com "." ou "_", então decidi abrir este tópico para apresentar a solução que encontrei e avaliarem se pode ser ajustado nos fontes. Conforme o Ítalo havia sugerido inicialmente, realizei a seguinte alteração na unit pnfsNFSeW_ABRASFv1 (linhas 374 e 436), mas deixando o parâmetro dinâmico somente para o município do RJ: Para que o dado não fique sem o parse com tratamento de retirada de acentos e espaços, ao alimentar o componente, sempre chamo a seguinte função de pcnAuxiliar para o texto de discriminação: Além disso, no arquivo RJ.ini, deixei vazio o parâmetro de quebra de linha: "QuebradeLinha=" E o mais importante: Como o webservice da prefeitura do RJ não exige a assinatura dos documentos e sempre enviamos assim quando fazíamos por fora do ACBr, então alterei para 0 todas as opções de assinatura no mesmo arquivo "RJ.ini", pois era o principal problema relatado no tópico anterior, devido o método de assinatura remover as quebras de linha (#13#10) do XML. Feito isso, a NFS-e foi transmitida com sucesso e com as devidas quebras de linha. Em anexo estão a unit e o arquivo RJ.ini com as alterações realizadas para avaliação. RJ.ini pnfsNFSeW_ABRASFv1.pas

Bom dia, alguém com clientes no estado do Rio de Janeiro já precisou lidar com o DECRETO Nº 46.542 DE 28 DE DEZEMBRO DE 2018 ? "Art. 1º Fica reduzida a base de cálculo do Imposto sobre Operações Relativas à Circulação de Mercadorias e sobre Prestações de Serviços de Transporte Interestadual e Intermunicipal e de Comunicação (ICMS) incidente sobre o fornecimento de refeições efetuadas por bares, restaurantes e estabelecimentos similares, bem como sobre a saída promovida por empresas preparadoras de refeições coletivas mediante contrato, de forma que a carga tributária seja equivalente a 4% (quatro por cento) do valor da operação." Como lidar com isso na NFCe e na NFe ? Link: http://www.fazenda.rj.gov.br/sefaz/faces/oracle/webcenter/portalapp/pages/navigation-renderer.jspx?_afrLoop=7209334071212096&datasource=UCMServer%23dDocName%3AWCC339586&_adf.ctrl-state=19q376rv1k_9

Bom dia Estou com problema ao consultar o cadastro de CNPJs do estado do Rio de Janeiro. Estou utilizando certificado digital A1 e este pertence à contribuinte do estado de São Paulo. Através do ACBrNFe consulto os CNPJs de outros estados como PR, SC, RS, MT, entre outros, o único que está apresentando problema é o RJ. O Componente retorna esta mensagem Rejeicao: Sigla da UF da consulta difere da UF do Web Service Subentende-se que a url do webservice que estou tentando conectar esteja errada, olhei no NFeServices.ini e comparei com as urls do webservice e estão ok. Uso meu código desta forma. O que estou fazendo de errado? ACBrNFe1.Configuracoes.WebServices.UF := cmbUF.Text; ACBrNFe1.WebServices.ConsultaCadastro.UF := cmbUF.Text; ACBrNFe1.WebServices.ConsultaCadastro.CNPJ := cCPFCNPJ; ACBrNFe1.WebServices.ConsultaCadastro.Executar;

Boa tarde pessoal, Estou implementando questões de entrega a domicílio na NFC-e e segundo a SEFAZ-RJ a taxa de entrega deve ser informada como frete. Implementei usando as tags vFrete do produto e vFrete do total e informei a taxa de entrega nas informações adicionais. Funcionou tudo certo. Porém o total do DANFE NFC-e do Fast Report, não contabiliza o frete no valor a pagar. Deveria contabilizar? Creio que sim. OBS:. Vi que no exemplo diz que NFC-e não tem frete, talvez por isso não tenha sido levado em consideração no DANFE. De qualquer maneira, vou tentar verificar o código do componente enquanto isso. Muito obrigado!

Boa tarde pessoal Alguem já desenvolveu a NFS-e para Mage - RJ? Sabe qual servidor eles utilizam? Grato

Bom dia Ao tentar executar a consulta no serviço Para RJ, na versão 4.0 com o Demo do ACBR, a mensagem em Anexo aparece. Eu estou tentando utilizar as novas DLL MinGW, com o SSL 1.0.2.5 (todas as DLLS estão no ACBR) e já retirei o "." do Arquivo ACBr.inc ({$DEFINE USE_MINGW}). Está faltando mais algum passo? Grato. Bom dia Me desculpem a falha, estava testando em produção, visto que ainda não foi liberado. Na homologação está OK. Grato.

Boa tarde a todos, Estou tentando consumir o webservice do Rio de Janeiro para emissão de Guias do GNRe mas venho tendo um pouco de dificuldade. O que estou fazendo: procedure TFrmPrincipal.GerarRJ; const url_rj:string='http://www1.fazenda.rj.gov.br/projetoGCTBradesco/br/gov/rj/sef/gct/webservice/GerarDocumentoArrecadacaoWS.jws?WSDL'; codigo_produto:integer=469; { 469 - Produtos alimentícios } var idx:integer; wsrjEmit:WSGnreRJ.Emitente; wsrjDocs:WSGnreRJ.ArrayOfDocumento; wsrjItens:WSGnreRJ.ArrayOfItemPagamento; wsrj:WSGnreRJ.GerarDocumentoArrecadacaoWS; wsrjRetorno:WSGnreRJ.ChamadaDadosWebServiceRefLote; begin try wsrjEmit := WSGnreRJ.Emitente.Create; wsrjEmit.CnpjEmitente := StrToInt64(getCNPJ(QryEmpresa.FieldByName('EMP_CNPJ').AsString)); wsrjEmit.Email := QryEmpresa.FieldByName('EMP_EMAIL').AsString; SetLength(wsrjDocs, 1); wsrjDocs[0] := WSGnreRJ.Documento.Create; wsrjDocs[0].DataPagamento := FormatDateTime('dd/mm/yyyy', IncDay(Date(),1)); wsrjDocs[0].TipoDocumento := 2; { 1. DARJ, 2. GNRE } wsrjDocs[0].TipoPagamento := 1; { 1. ICMS/FCP } try QryNotasFiscais.DisableControls; QryNotasFiscais.First; while not QryNotasFiscais.Eof do begin if ( QryNotasFiscais.FieldByName('VEN_SELECIONADO').AsInteger = 1 ) then begin idx :=Length(wsrjItens); SetLength(wsrjItens, idx+1); wsrjItens[idx] := WSGnreRJ.ItemPagamento.Create; wsrjItens[idx].CepContribuinte := StrToIntDef(SoNumeros(QryEmpresa.FieldByName('EMP_CEP').AsString),0); wsrjItens[idx].Cnpj := wsrjEmit.CnpjEmitente; wsrjItens[idx].CodigoProduto := codigo_produto; wsrjItens[idx].DataFatoGerador := FormatDateTime('dd/mm/yyyy', QryNotasFiscais.FieldByName('VEN_FATURAMENTO').AsDateTime); wsrjItens[idx].DataVencimento := wsrjDocs[0].DataPagamento; wsrjItens[idx].EnderecoContribuinte := TiraAcento(QryEmpresa.FieldByName('EMP_ENDERECO').AsString + ', ' + QryEmpresa.FieldByName('EMP_NUMERO').AsString); wsrjItens[idx].MunicipioContribuinte := TiraAcento(QryEmpresa.FieldByName('CID_DESCRICAO').AsString); wsrjItens[idx].UfContribuinte := TiraAcento(QryEmpresa.FieldByName('CID_UF').AsString); wsrjItens[idx].Natureza := 3; { 3. Diferencial de Alíquota } wsrjItens[idx].NaturezaQualificacao := 1; { 1. Normal } wsrjItens[idx].NomeRazaoSocial := TiraAcento(QryEmpresa.FieldByName('EMP_RAZAO').AsString); wsrjItens[idx].NotaFiscalCnpj := wsrjEmit.CnpjEmitente; wsrjItens[idx].NotaFiscalDataEmissao := wsrjItens[idx].DataFatoGerador; wsrjItens[idx].NotaFiscalNumero := QryNotasFiscais.FieldByName('VEN_NF').AsInteger; wsrjItens[idx].NotaFiscalSerie := QryNotasFiscais.FieldByName('VEN_SERIE').AsInteger; wsrjItens[idx].NotaFiscalTipo := 'NF-e'; { M - Manual, PD - Processamento de Dados, NF-e - Nota Fiscal Eletrônica } wsrjItens[idx].NumControleContribuinte := QryNotasFiscais.FieldByName('VEN_NF').AsString + QryNotasFiscais.FieldByName('VEN_SERIE').AsString; wsrjItens[idx].PeriodoReferenciaAno := StrToInt( Copy(wsrjItens[idx].DataFatoGerador,7,4) ); wsrjItens[idx].PeriodoReferenciaMes := StrToInt( Copy(wsrjItens[idx].DataFatoGerador,4,2) ); wsrjItens[idx].TipoId := 1; {1. CNPJ, 2. CPF, 3. Passaporte} wsrjItens[idx].ValorFECPPrincipal := QryNotasFiscais.FieldByName('VALOR_FCP').AsFloat; wsrjItens[idx].ValorICMSPrincipal := QryNotasFiscais.FieldByName('VALOR_DESTINATARIO').AsFloat; wsrjItens[idx].ValorTotal := wsrjItens[idx].ValorICMSPrincipal + wsrjItens[idx].ValorFECPPrincipal; end; QryNotasFiscais.Next; end; finally QryNotasFiscais.EnableControls; end; if (Length(wsrjItens) > 0) then begin wsrjDocs[0].ItensPagamentos := wsrjItens; Request.URL := url_rj; wsrj := Request as GerarDocumentoArrecadacaoWS; wsrj := GetGerarDocumentoArrecadacaoWS(true, '', Request); wsrjRetorno := wsrj.enviarDados(wsrjEmit, wsrjDocs); Memo1.Lines.Add('----------------'); Memo1.Lines.Add('IdSessao: '+wsrjRetorno.IdSessao); Memo1.Lines.Add('Cod. Retorno: ' + IntToStr( wsrjRetorno.Retorno.CodigoRetorno )); Memo1.Lines.Add('Msg. Retorno: ' + wsrjRetorno.Retorno.MensagemRetorno); end; finally wsrjEmit.Free; end; end; Unit do webservice: WSGnreRJ.pas O erro: Ocorre na linha: wsrjRetorno := wsrj.enviarDados(wsrjEmit, wsrjDocs); Tentei ver o que havia nesse XML no evento beforepost do meu objeto Request(THTTPRIO) dessa forma: procedure TFrmPrincipal.RequestBeforeExecute(const MethodName: string; SOAPRequest: TStream); var xml:TXMLDocument; begin try xml := TXMLDocument.Create(Self); xml.XML.Add( WideString(SOAPRequest) ); xml.SaveToFile('C:\temp\Request.xml'); finally xml.Free; end; end; Porém o parâmetro SOAPRequest vem vazio, como se a requisição fosse sem nenhum dado. ========================================================================= Meu ambiente: Windows 10 Delphi 2010 ========================================================================= Obrigado pela força galera, []'s

Olá. Esta nota que esta em anexo e no layout da sefaz (txt) porem ao transmitir me apresenta esse erro: - Gerando Arquivo... 06/07/2016 11:09:16 - Erro Verificando Arquivo Texto: ERRO: List index (31384448) out of bounds sempre que informa a tag NA| referente a partilha, (sou de sao paulo) dia 01/07 começou a pedir esta tag, tanto que ontem varias notas foram transmitidas normalmente usando essa estrutura que esta no txt. porem agora quando informo essa campo NA ele fica me retornando o erro, caso eu nao informe ele pede pra informar o grupo de icms. 00004317.txt

Bom dia, Tenho um aplicativo antigo que gera e envia RPS. Ele foi feito com o fonte do trunk, agora estou precisando migrá-lo para o trunk2. Estou testando o fonte de exemplo da NFSe e está me dando muitos erros para o provedor RJ. A NFSe do trunk2 para o provedor RJ ainda não está funcional ?

Bom dia Alguem sabe quais estados posso emitir NFC-e pelo Acbr? Tem alguma lista atualizada de onde ja esta podendo usar NFCe? Rio de Janeiro ja esta funcionando?

Olá Escovadores de Bits, O escovando de hoje tem o objetivo de mostrar aos parceiros, especialmente aos do Rio de Janeiro, como gerar arquivos MFD assinados para enviar pra SEFAZ – Secretaria da Fazenda. Vocês sabiam que cada cliente seu precisa entregar mensalmente um arquivo MFD assinado? Sabiam que o GAD foi feito exclusivamente para geração de arquivos e que o eECFc foi feito para o FISCO? Sabiam que existe diferença entre a assinatura do GAD e do eECFc? Essas questões são frequentes para seus clientes? Suporte ? Ou então no desenvolvimento? Fique tranquilo, pois todas elas serão respondidas ao longo deste escovando, acompanhem parceiros! Continue lendo ...