ActiveDelphi - Índice do Fórum ActiveDelphi
.: O site do programador Delphi! :.
 
 FAQFAQ   PesquisarPesquisar   MembrosMembros   GruposGrupos   RegistrarRegistrar 
 PerfilPerfil   Entrar e ver Mensagens ParticularesEntrar e ver Mensagens Particulares   EntrarEntrar 

Apenas Enviar...

 
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> NFe
Exibir mensagem anterior :: Exibir próxima mensagem  
Autor Mensagem
lucas_rc
Novato
Novato


Registrado: Terça-Feira, 10 de Julho de 2007
Mensagens: 12

MensagemEnviada: Seg Mar 14, 2011 10:43 am    Assunto: Apenas Enviar... Responder com Citação

Bom dia Pessoal...

Tenho a seguinte situação, hoje emito nf-e por um outro componente, nele consegui monta a seguinte sistemática:

Processo 1 > Transmite todas as NF-e
Processo 2 > Consulta se as notas foram aceitas, e emito o Danfe

Alguem sabe me dizer se tem como fazer o mesmo processo no ACBR, por que pelo que notei, ele transmite a nota e já consulta tudo na mesma hora...

Desde já agradeço...
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular MSN Messenger
CENTURYINF
Membro Junior
Membro Junior


Registrado: Sexta-Feira, 19 de Fevereiro de 2010
Mensagens: 364

MensagemEnviada: Ter Mar 22, 2011 10:00 am    Assunto: Re: Apenas Enviar... Responder com Citação

Ola amigo,
não entendi bem o que voce quer fazer , mas o Acbr faz tudo

a vantagem de transmitir e consultar e ja imprimir tudo na hora
e que se alguma nota conter erros ou for rejeitada, voce fica
sabendo na hora e ja faz as correçoes. Assim voce não corre o
risco também de perder a sequencia de numeração das notas fiscais.

EX: do demo do ACBR

ACBrNFe1.NotasFiscais.Valida; //valida o XML
/////////////////////
ACBrNFe1.Enviar(StrToInt(vNumLote)); //Envia o XML

//Pega o nr do REC e Protocolo ShowMessage(ACBrNFe1.WebServices.Retorno.NFeRetorno.ProtNFe.Items[0].nProt);
ShowMessage(ACBrNFe1.WebServices.Retorno.NFeRetorno.nRec);

MemoResp.Lines.Text := UTF8Encode(ACBrNFe1.WebServices.Retorno.RetWS);
LoadXML(MemoResp, WBResposta);

//Imprime o Danfe e grava o PDF
ACBrNFe1.NotasFiscais.ImprimirPDF;

mais ou menos isto

abraços
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular Enviar E-mail
jarbasm
Aprendiz
Aprendiz


Registrado: Quinta-Feira, 17 de Fevereiro de 2011
Mensagens: 190

MensagemEnviada: Dom Jan 29, 2012 4:05 pm    Assunto: Re: Apenas Enviar... Responder com Citação

CENTURYINF escreveu:
Ola amigo,
não entendi bem o que voce quer fazer , mas o Acbr faz tudo

a vantagem de transmitir e consultar e ja imprimir tudo na hora
e que se alguma nota conter erros ou for rejeitada, voce fica
sabendo na hora e ja faz as correçoes. Assim voce não corre o
risco também de perder a sequencia de numeração das notas fiscais.

EX: do demo do ACBR

ACBrNFe1.NotasFiscais.Valida; //valida o XML
/////////////////////
ACBrNFe1.Enviar(StrToInt(vNumLote)); //Envia o XML

//Pega o nr do REC e Protocolo ShowMessage(ACBrNFe1.WebServices.Retorno.NFeRetorno.ProtNFe.Items[0].nProt);
ShowMessage(ACBrNFe1.WebServices.Retorno.NFeRetorno.nRec);

MemoResp.Lines.Text := UTF8Encode(ACBrNFe1.WebServices.Retorno.RetWS);
LoadXML(MemoResp, WBResposta);

//Imprime o Danfe e grava o PDF
ACBrNFe1.NotasFiscais.ImprimirPDF;

mais ou menos isto

abraços



Caralho, o ACBR é muito facio mesmo de usar cara massa de ++.
Voltar ao Topo
Ver o perfil de Usuários Enviar Mensagem Particular
Mostrar os tópicos anteriores:   
Novo Tópico   Responder Mensagem    ActiveDelphi - Índice do Fórum -> NFe Todos os horários são GMT - 3 Horas
Página 1 de 1

 
Ir para:  
Enviar Mensagens Novas: Proibido.
Responder Tópicos Proibido
Editar Mensagens: Proibido.
Excluir Mensagens: Proibido.
Votar em Enquetes: Proibido.


Powered by phpBB © 2001, 2005 phpBB Group
Traduzido por: Suporte phpBB