Alexandre Faustinoni

Sim esses testes de cancelamento e substituição por enquanto somente em produção.

Bom dia. Estou com um problema na impressão da NFS-e que esta saindo cortada do lado direito na impressão apenas. Na tela sai correta. Alguém poderia me ajudar a ajustar o componente ACBrNFSeXDANFSeRL.

O pessoal da RLZ ajustou o ambiente de homologação, e corrigiu o problema apenas para consulta. Segundo o eles não vai ter o evento de cancelamento e nem substituição em homologação, somente em produção.

Estou em contato com pessoal da RLZ parace que o problema é lá mesmo. Assim que tiver uma posição eu chamo aqui no forum.

Ao realizar a consulta em homologação não retorna absolutamente nada. Passei a mesma informação ao provedor. Não cheguei a fazer o teste em produção. Segue os XMLs do log. 000000000000109000000000000109000001-lista-nfse-fai-soap.xml 000000000000109000000000000109000001-con-nfse-fai.xml 000000000000109000000000000109000001-con-nfse-fai-soap.xml 000000000000109000000000000109000001-lista-nfse-fai.xml

Consegui. Para o provedor RLZ não deve ser informado o CNAE e nem o campo CodigoCnae := ''; Servico.CodigoTributacaoMunicipio := '';

Prezado Alexandre de Paula. Duas coisas em contato com o pessoal lá da RLZ me disseram que o link para homologação é HomRecepcionar=https://barretos.prefeitura.rlz.com.br/webservice/nfse Outra coisa também estou recebendo um erro: Erro(s): Código : E35??? Mensagem: Código de tributação inexistente. Correção: Consulte a legislação vigente para saber o Código de tributação que deverá ser informado. Consegue me ajudar ? temp1.xml temp2.xml

Boa tarde, paz e bem. No ultimo dia 5/3 a prefeitura de Barretos trocou o formato da emissão da NFS-e da SigCorp para RLZ utilizando layout 2.03 da ABRASF. Anexo esta o manual que eles enviaram. Gostaria de uma ajuda para Configurar o componente ACBrNFSeX. Hash_documentos_NFS-e_versao_ 2.03.pdf wsdl_nfs-e_ v2.03.zip NFS-e_Modelo_Conceitual_versao_2.03_alteracoes (1).pdf schema_xml_nfs-e_ v2.03.zip Manual_de_Integracao_WebService_Barretos-RLZ.pdf

Aqui deu certo graças a Deus. Obrigado pessoal. Já fiz em 3 clientes e deu tudo certo.

Alguém conseguiu algum retorno da SEFAZ ? OU mesmo a ajuda do André deu certo com alguém ?

Estou tendo problemas para buscar notas na SEFAZ em alguns clientes. Erro Interno: -2146893815 Erro HTTP:0 URL: https://www1.nfe.fazenda.gov.br/NFeDistribuicaoDFe/NFeDistribuicaoDFe.asmx Erro: 2148073481 Não consegui anexar a imagem.

Misericórdia. Que vergonha. Esqueci de trocar a versão na emissão.

Juliomar, Coloquei todas as configurações que acredito sejam necessárias: //Certificado por número de série if (dmADS.tbEmp.fieldbyname('CERTIFDIGSERIAL').AsString <> '') then begin ACBrCTe1.Configuracoes.Certificados.NumeroSerie := dmADS.tbEmp.fieldbyname('CERTIFDIGSERIAL').AsString; ACBrCTe1.Configuracoes.Certificados.ArquivoPFX := ''; ACBrCTe1.Configuracoes.Certificados.Senha := ''; end else if (dmADS.tbEmp.fieldbyname('CERTPASS').AsString <> '') then begin ACBrCTe1.Configuracoes.Certificados.ArquivoPFX := dmADS.tbEmp.fieldbyname('CERTIFDIG').AsString; ACBrCTe1.Configuracoes.Certificados.Senha := dmADS.tbEmp.fieldbyname('CERTPASS').AsString; ACBrCTe1.Configuracoes.Certificados.NumeroSerie := ''; end; if (not (ACBrCTe1.SSL.CertificadoLido)) then begin try ACBrCTe1.SSL.DescarregarCertificado; ACBrCTe1.Configuracoes.Geral.SSLLib := TSSLLib(StrToIntDef(LerArqINI('', 'Certificado', 'SSLLib' , '4'), 4)); ACBrCTe1.Configuracoes.Geral.SSLCryptLib := TSSLCryptLib(StrToIntDef(LerArqINI('', 'Certificado', 'CryptLib' , '3'), 3)); ACBrCTe1.Configuracoes.Geral.SSLHttpLib := TSSLHttpLib(StrToIntDef(LerArqINI('', 'Certificado', 'HttpLib' , '2'), 2)); ACBrCTe1.Configuracoes.Geral.SSLXmlSignLib := TSSLXmlSignLib(StrToIntDef(LerArqINI('', 'Certificado', 'XmlSignLib' , '4'), 4)); ACBrCTe1.SSL.SSLType := TSSLType(StrToIntDef(LerArqINI('', 'WebService', 'SSLType2' , '0'), 0)); ACBrCTe1.SSL.CarregarCertificadoSeNecessario; except //Exceção on E: Exception do begin MensErro('', 91, '(InificalizaCTe_LerCertificado) ' + E.ClassName + ' - ' + E.Message, true, true); end; end; end; with ACBrCTe1.Configuracoes.WebServices do begin UF := sUFEmit; if (dmADs.tbEmpNFEPRODUCAO.asstring = 'P') then Ambiente := taProducao else Ambiente := taHomologacao; //Se true visualiza mensagens diretamente do componente ACBr //Bom para quando se quer depurar algum retorno Visualizar := false; //Valida o arquivo INI para definir os padrões básicos das consultas if (LerArqINI('', 'NFe', 'TimeOutConsulta', 'ERRO') = 'ERRO') then GravaArqINI('', 'NFe', 'TimeOutConsulta', '5000'); if (LerArqINI('', 'NFe', 'Tentativas', 'ERRO') = 'ERRO') then GravaArqINI('', 'NFe', 'Tentativas', '10'); if (LerArqINI('', 'NFe', 'TimeOutTentativas', 'ERRO') = 'ERRO') then GravaArqINI('', 'NFe', 'TimeOutTentativas', '3000'); if (LerArqINI('', 'NFe', 'TimeOut', 'ERRO') = 'ERRO') then GravaArqINI('', 'NFe', 'TimeOut', '18000'); Salvar := (dmADS.tbEmpGERAARQLOG.value = 'S'); AjustaAguardaConsultaRet := true; AguardarConsultaRet := StrToIntDef(LerArqINI('', 'NFe', 'TimeOutConsulta', '5000'), 5000); Tentativas := StrToIntDef(LerArqINI('', 'NFe', 'Tentativas', '10'), 10); IntervaloTentativas := StrToIntDef(LerArqINI('', 'NFe', 'TimeOutTentativas', '3000'), 3000); TimeOut := StrToIntDef(LerArqINI('', 'NFe', 'TimeOut', '18000'), 18000); end; with ACBrCTe1.Configuracoes.Geral do begin ExibirErroSchema := true; FormatoAlerta := 'TAG:%TAGNIVEL% ID:%ID%/%TAG%(%DESCRICAO%) - %MSG%.'; FormaEmissao := teNormal; ModeloDF := moCTe; VersaoDF := ve400; Salvar := (dmADS.tbEmpGERAARQLOG.value = 'S'); RetirarAcentos := true; ValidarDigest := true; end; with ACBrCTe1.Configuracoes.Arquivos do begin Salvar := true; SepararPorMes := true; AdicionarLiteral := false; EmissaoPathCTe := true; SepararPorCNPJ := false; SepararPorModelo := false; PathSalvar := ExtractFilePath(paramstr(0)) + 'Temp'; PathSchemas := ExtractFilePath(paramstr(0)) + 'EsquemasCTe'; PathCTe := sPastaSis; PathEvento := sPastaSis + '\Eventos'; end;

Estou com o seguinte erro na transmissão da CT-e. CTeRecepcaoSinc não encontrada na sessão CTe_SP_P no arquivo ACBrCTeServicos Comando para enviar: ACBrCTe1.Enviar(iLote, true, true); tentei também: ACBrCTe1.Enviar(iLote, true, false); Não estou conseguindo colar a imagem do erro

Sim zerei e não localizou nada.