Salvar arquivos do ACBRNFSe

[Diego Campos Rosa]

Pessoal,

Estou com uma duvida em salvar o pdf e o xml da NFSe.

Estou usando os seguintes metodos consecutivos.

1.ACBrNFSe1.NotasFiscais.Items[0].SaveToFile;

2.ACBrNFSeDANFSeRL1.ImprimirDANFSePDF(ACBrNFSe1.NotasFiscais.Items[0].NFSe);

No entanto o primeiro salva o xml com o número (imagem abaixo) circulado em azul e o pdf com o numero circulado em vermelho. Quero que os dois sejam salvos com o número circulado em vermelho.

A minha unit ACBrNFSeNotasFiscais entá assim:

function NotaFiscal.SaveToFile(CaminhoArquivo: string): boolean;

begin

   .......

   if DFeUtil.EstaVazio(CaminhoArquivo)

    then CaminhoArquivo := NotaUtil.PathWithDelim(TACBrNFSe( TNotasFiscais( Collection ).ACBrNFSe ).Configuracoes.Arquivos.GetPathRPS) +

                            Self.NFSe.Numero + '-Rps.xml';

   if DFeUtil.EstaVazio(CaminhoArquivo) or not DirectoryExists(ExtractFilePath(CaminhoArquivo))

    then raise Exception.Create('Caminho Inválido: ' + CaminhoArquivo);

   LocNFSeW.Gerador.SalvarArquivo(CaminhoArquivo); // Até aqui o caminho com o nome do arquivo está como eu quero, mas depois ele muda do nada (não consegui identificar o porque.

   ......

end;

Alquem tem alguma sugestão??

Grato!!

 

Atenciosamente,

Diego Campos Rosa
Analista de Sistemas
Certificado Delphi Developer

 

My profiles:   

IMPORTANT: The contents of this email and any attachments are confidential. They are intended for the named recipient(s) only. If you have received this email by mistake, please notify the sender immediately and do not disclose the contents to anyone or make copies thereof.

[Marcelo Bortolini]

Buenas Diego, cara seguinte :
O ACBr gera sempre o RPS - Recibo Provisório de Serviço, pra apartir disso comunicar com o webservice e assim gerar a NFSe.

Os Números podem ser diferentes, se vc carregar o componente e der o save, só vai ter o numero do RPS, o da NFSe só volta quando é autorizado

--
--
Você recebeu esta mensagem porque está inscrito no "DUG-RS -
Delphi Users Group Rio Grande do Sul" em Grupos do Google.
Acesse o nosso BLOG em http://www.dug-rs.org e contribua com a comunidade Delphi do Rio Grande do Sul
Para postar neste grupo, envie um e-mail para dug...@googlegroups.com
Para cancelar a sua inscrição neste grupo, envie um e-mail para
dug-rs-un...@googlegroups.com
Para ver mais opções, visite este grupo em
http://groups.google.com.br/group/dug-rs?hl=pt-BR
 
Twitter: @dugrs
http://www.facebook.com/groups/dugrs/
http://www.Vimeo.com/dugrs
 
---
You received this message because you are subscribed to the Google Groups "DUG-RS - Delphi Users Group Rio Grande do Sul" group.
To unsubscribe from this group and stop receiving emails from it, send an email to dug-rs+un...@googlegroups.com.
For more options, visit https://groups.google.com/groups/opt_out.
 
 

--
Marcelo Bortolini

[Diego Campos Rosa]

Buenas, Marcelo

Em que momento poderia salvar o pdf para que os números ficarem corretos?

Hoje eu transmito; salvo o xml e depois o pdf 

 

Atenciosamente,

Diego Campos Rosa
Analista de Sistemas
Certificado Delphi Developer

 

My profiles:   

IMPORTANT: The contents of this email and any attachments are confidential. They are intended for the named recipient(s) only. If you have received this email by mistake, please notify the sender immediately and do not disclose the contents to anyone or make copies thereof.

[Samuel N. Junior]

Diego,

Existem dois números na nota de serviços:

• RPS que significa Recibo Provisório de Serviços e é definido pelo usuário (número sequencial crescente sem repetições)
• NFe que é o número da Nota Fiscal de Serviços e é definido pela Prefeitura (também sequencial crescente).
  

O RPS é você quem define e, assim, se você quer que ele seja igual ao número da NFe você terá que "seta-lo" para ser igual ao número da última nota emitida.

Não vale a pena esse trabalho, pois se um dia você cancelar um RPS ou se tem o hábito de "juntar" vários RPSs em uma única NFe a numeração perderá o sincronismo.

[ ]s

Samuel

[Diego Campos Rosa]

Samuel, 

Entendi. O problema maior é que ao salvar o XML ele salva com o número da NF e preciso que salve com o número com o RPS, mas não consigo realizar dessa forma, mesmo ja verificando a rotina .ACBrNFSe1.NotasFiscais.Items[0].SaveToFile;

 

Atenciosamente,

Diego Campos Rosa
Analista de Sistemas
Certificado Delphi Developer

 

My profiles:   

IMPORTANT: The contents of this email and any attachments are confidential. They are intended for the named recipient(s) only. If you have received this email by mistake, please notify the sender immediately and do not disclose the contents to anyone or make copies thereof.

[Marcelo Bortolini]

Bom dia Diego, já tentou usando as propriedades do componente ?

Ex :

 ACBrNFSe1.Configuracoes.Arquivos.AdicionarLiteral:=True;
 ACBrNFSe1.Configuracoes.Arquivos.EmissaoPathNFSe:=True;
 ACBrNFSe1.Configuracoes.Arquivos.PastaMensal:=True;
 ACBrNFSe1.Configuracoes.Arquivos.PathCan:='C:\NFSe\CAN';
 ACBrNFSe1.Configuracoes.Arquivos.PathNFSe:='C:\NFSe';
 ACBrNFSe1.Configuracoes.Arquivos.Salvar:=True;

 ACBrNFSe1.Configuracoes.Geral.PathSchemas := 'C:\Schemas';
 ACBrNFSe1.Configuracoes.Geral.Salvar      := True;
 ACBrNFSe1.Configuracoes.Geral.PathSalvar  := 'C:\NFSe';