Dhauch

vou ver a documentação e posto aki

Pix Banrisul - Alguma previsão

Ipm não retorna Xml completo, falei com o suporte, falaram q só para o futuro

Como faço para salvar xml? imprimir e salvar pdf? ipm não retorna xml ? não retorna o xml completo da nota? para imprimir só pelo linknfse?

meu código try try ConsultarSituacao(QRYCONSULTAPROTOCOLO.ASSTRING, QRYCONSULTALOTE.ASSTRING); except on E: Exception do begin if WebServices.ConsSitLoteRPS.Msg <> '' then widRespAux := WebServices.ConsSitLoteRPS.Msg else if E.Message <> '' then widRespAux := E.Message else widRespAux := 'RPS em processamento aguarde e consulte mais tarde!'; frm_aviso(widRespAux); end; end; Situacao := StrToIntDef(WebServices.ConsSitLoteRPS.Situacao, 0); if (Situacao = 4) then begin strArquivo := Configuracoes.Arquivos.GetPathNFSe(qryConsultaDATA.value) + '\NFSe\Recibos\' + inttostr(qryconsultanumero.value) + 'E-RPS.XML'; if not FileExists(strArquivo) then begin strArquivo := Configuracoes.Arquivos.GetPathGer(qryConsultaDATA.value) + '\Recibos\' + inttostr(qryconsultanumero.value) + 'E-RPS.XML'; end; qrygravalotenota.close; qrygravalotenota.ParamByName('numero').value := NotasFiscais.Items[0].NFSe.IdentificacaoRps.Numero; qrygravalotenota.Open; qrygravalotenota.edit; qrygravalotenotaSITUACAO.value := Situacao; if FileExists(strArquivo) then begin NotasFiscais.Clear; NotasFiscais.LoadFromFile(strArquivo); ConsultarNFSeporRps(NotasFiscais.Items[0].NFSe.IdentificacaoRps.Numero, NotasFiscais.Items[0].NFSe.IdentificacaoRps.Serie, TipoRPSToStr(NotasFiscais.Items[0].NFSe.IdentificacaoRps.Tipo)); end else begin ConsultarNFSeporRps(qryConsultaNUMERO.ASSTRING, dtmdados.serie, TipoRPSToStr(trRPS)); end; // Grava numero da NFSe qrygravalotenotanota.Value := strtofloat(NotasFiscais.Items[0].NFSe.Numero); strArquivo := Configuracoes.Arquivos.GetPathNFSe(qryConsultaDATA.value) + '\NFSe\Notas\' + NotasFiscais.Items[0].NFSe.Numero + 'E-NFSE.XML'; // procura NFSe if not FileExists(strArquivo) then begin strArquivo := Configuracoes.Arquivos.GetPathGer(0) + '\Notas\' + qryConsultaNOTA.AsString + 'E-NFSE.XML'; if not FileExists(strArquivo) then begin strArquivo := Configuracoes.Arquivos.GetPathGer(qryConsultaDATA.value) + '\Notas\' + qryConsultaNOTA.AsString + 'E-NFSE.XML'; if not FileExists(strArquivo) then begin strArquivo := Configuracoes.Arquivos.GetPathGer(qryConsultaDATA.value) + qryConsultaNOTA.AsString + 'E-NFSE.XML' end; end; end; // procura RPS if not FileExists(strArquivo) then begin strArquivo := Configuracoes.Arquivos.GetPathGer(0) + '\recibos\' + inttostr(qryconsultanumero.value) + 'E-RPS.XML'; if not FileExists(strArquivo) then begin strArquivo := Configuracoes.Arquivos.GetPathGer(qryConsultaDATA.value) + '\recibos\' + inttostr(qryconsultanumero.value) + 'E-RPS.XML' end; end; NotasFiscais.Clear; NotasFiscais.LoadFromFile(strArquivo); if FileExists(strArquivo) then begin Configuracoes.Arquivos.NomeLongoNFSe := True; NotasFiscais.Imprimir; NotasFiscais.ImprimirPDF; end; end; finally if dtsgravalotenota.State in [dsEdit] then begin qrygravalotenota.POST; QRYGRAVALOTENOTA.Transaction.CommitRetaining; end; end; end;

Amarildo Eu não estou Gerando o XML Eu Gero o RPS. Esta tabulação Volta quando Consulto a situação é um retorno do servidor

Amarildo veja o rps esta sem as tabulações mas no retorno com a nota validada vem com as tabulações 5589E-nfse.xml 5589E-rps.xml

Amarildo Eu não encontrei a solução ainda.

como retiro as tabulações na impressão da nfse ou como faço para imprimir tabulado veja como esta saindo na impressão

Após a atualização para ultima versão no trunk2, meus aplicativos começaram a apresentar erro de out off memory, principalmente no momento da ativação dos componentes da nfe. Abri o sistema e fiquei monitorando no gerenciador de tarefas notei que o sistema esta usando muita memória. antes da atualização eu utilizava o delphi 2007 e acbr e nunca tive problema de memória após atualização para o trunk2, mudei para o xe10 .

bom dia estou tentando gerar xml para o servidor Thema da cidade de Não-Me-Toque. pelo q vi não estou gerando esta linhas <?xml version="1.0" encoding="ISO-8859-1"?> <EnviarLoteRpsEnvio xmlns="http://www.abrasf.org.br/ABRASF/arquivos/nfse.xsd"> <LoteRps> <NumeroLote>14052113560689</NumeroLote> <Cnpj>00123456000123</Cnpj> <InscricaoMunicipal>000000000000123</InscricaoMunicipal> <QuantidadeRps>1</QuantidadeRps> <ListaRps> oque devo fazer para gerar estas informações no xml em anexo tem o xml gerado pelo demoacbr e um exemplo enviado pela thema meu xml.xml ExemploXmlRps(1).xml

segue em anexo o retorno 602603382325969-sit.xml

Boa tarde Sim, fui eu que inclui em homologação funcionou tudo 100% só em produção que esta dando este erro.

ao consultar lote da a seguinte mensagem - erro de validação de script servidor: betha cidade: Palmeira das Missões oque devo fazer?

Alguns Clientes estão reclamando da velocidade no envio da nfce para o Sefaz RS tem momentos q chega a levar uns 30 segundos para envio da nfce. tem alguma coisa que possa fazer para melhorar a conexão?