Imprimir Nfse Depois Da Consulta De Situação

[Rafa2012]

Bom dia pessoal

Estou com um problema. Quando envio a nfse em processo assíncrono, logo após faço uma consulta ConsultarSituacao(CNPJ, IM,Protocolo), para ver se a nfse foi processada. Caso O rps for processado preciso imprimir a nfse, como faria isso?

Porque se eu chamar o procedimento ACBrNFSe1.NotasFiscais.Imprimir vai dar erro na impressão, isso porque estarei imprimindo o RPS.

 

Att;

Rafa

 

 

[Leonardo Gregianin]

Olá Rafa,

 

Não sei se estou fazendo o correto mas está funcionando, primeiro faço a consulta situação igual você, se retornar ok, eu faço a "ConsultarLoteRps(lote, protocolo)" e se retornar ok também aí sim chamo a impressão. No meu caso, cada lote é um rps.

[Rafa2012]

Boa tarde IVR

Seguindo este procedimento, ele imprimi corretamento, porém quando fecho o relatório ocorre  erro

 

 

[Content]

RLNFSe: Erro durante a preparação do relatório

EConvertError('' is not a valid floating point value)

 

[OK]

 

 

Att;

Rafa

[Leonardo Gregianin]

Seria bom debugar tudo isso até achar onde está convertendo errado.

Não posso te ajudar muito pois utilizo o QuickReport.

[Rafa2012]

O interessante  é que se eu carregar o xml gravado na pasta e imprimir, ele imprime e fecha normalmente.

Vou ver se encontro o problema.

[Caetano]

Bom dia pessoal.

Também estou encontrando uma situação parecida. Envio o xml e quando vou imprimir a NFSe imprime direitinho, porém quando fecho o relatório ele me retorna o erro abaixo

EConvertError('' is not a valid floating point value)

Como comentou o colega Rafa se eu pegar depois o xml que foi salvo na pasta designada e enviar para impressão ele imprimi e quando fecho não me retorna erro.

Passei a noite tentando resolver e nada. alguém já passo por isso?

 

Att;

Caetano

[Maiquel]

Tente carregar o xml na variável após o retorno

 

sNomeArq := ACBrNFSe1.NotasFiscais.Items[0].NomeArq;

ACBrNFSe1.NotasFiscais.Clear;

ACBrNFSe1.NotasFiscais.LoadFromFile(sNomeArq)

ACBrNFSe1.NotasFiscais.Imprimir;

 

 

Att;

Maiquel

[Caetano]

Ok.. Obrigado deu certo

Valew pela força

[Leandro Araújo]

 

Tente carregar o xml na variável após o retorno

 

sNomeArq := ACBrNFSe1.NotasFiscais.Items[0].NomeArq;

ACBrNFSe1.NotasFiscais.Clear;

ACBrNFSe1.NotasFiscais.LoadFromFile(sNomeArq)

ACBrNFSe1.NotasFiscais.Imprimir;

 

 

Att;

Maiquel

 

 

Olá.

Estou com um erro ao realizar a impressão do DANFE da NFS-e, após consultar a mesma, o DANFE vem incompleto.

Tentei fazer isso mas aqui não funcionou, ele vem faltando informações, só vem o número da nota, o código de verificação e alguns outros dados.

Alguém aqui passou por isso?

Estou utilizando D7 com Fortes Report.

Obrigado.

Editado 16 Junho, 2014 por Leandro Araújo

[Leandro Araújo]

Se eu consultar logo após o envio e o RPS for processado, ele me imprime o Danfe completo, mas se tento consultar depois, o Danfe vem incompleto (Digo no que diz respeito apenas a impressão, o XML vem certo), ou seja, algo haver com o DanfeRL ou algo assim, não sei, estou olhando os fontes do ACBr onde mandar imprimir.

Se alguém passou por algo parecido, toda ajuda é bem vinda, só falta isso para terminar a implementação de NFS-e em nosso sistema.

Muito obrigado.

[Leandro Araújo]

Observei que o problema está acontecendo no 'TNotasFiscais.LoadFromFile'.

[Italo Giurizzato Junior]

Bom dia Leandro,

 

Por favor atualize os fontes e teste novamente.

[Leandro Araújo]

Atualizei os fontes, e continua não trazendo as informações.

Desculpe ter repetido nos tópicos, agora eu continuo nesse mesmo ou nesse outro:

Seria o mais adequado, ou não? Já que o problema é com relação ao carregar as informações do XML a partir do arquivo.

Tentei carregar um XML gerado pelo site, e funcionou. Há algumas diferenças no arquivo.

Muito obrigado.

Editado 21 Junho, 2014 por Leandro Araújo

[Italo Giurizzato Junior]

Bom dia Leandro, 

 

Post como anexo os 2 XML (gerado pelo site e pelo componente) para que possamos analisar.

[Maiquel]

Bom dia Leandro.

Você já conseguiu resolver? 

Estas realizando a consulta após o envio?

 

Maiquel

[Leandro Araújo]

Atualizei os fontes.

Criei uma procedure 'ProcessarAposSucessoConsulta', lá eu:

- Processo ações se houve sucesso de comunicação e verificação via webservices.
- Se a nota foi confirmada gravo as informações referentes a nota, salvo o arquivo

.xml e o DANFE e/ou altero informações de um pedido pendente.

 

Na parte da impressão fiz assim:

DMNFSe.ObjetoDANFENFSe.ImprimirDANFSe(
          DMNFSe.ObjetoNFSe.WebServices.ConsLote.NotasFiscais.Items[0].NFSe);
// Ou
ACBrNFSe1.ImprimirDANFSe(ACBrNFSe1.WebServices.ConsLote.NotasFiscais.Items[0].NFSe);

E funcionou!

Se eu fizer assim, não funciona direito:

ACBrNFSe1.WebServices.ConsLote.NotasFiscais.Items[0].Imprimir;

Vou realizar mais testes.

Qualquer coisa nova posto aqui novamente.

 

Percebi sim algumas diferenças entre os .xml's.

Desculpem mas não queria colocar aqui os .xml's pelo motivo de haver dados de clientes.

Ainda é necessário?

 

Muito obrigado.

Editado 2 Julho, 2014 por Leandro Araújo

[Juliomar Marchetti]

Com certeza pois somente assim pra estar verificando!