 |
ActiveDelphi .: O site do programador Delphi! :.
|
Exibir mensagem anterior :: Exibir próxima mensagem |
Autor |
Mensagem |
lucas_rc Novato

Registrado: Terça-Feira, 10 de Julho de 2007 Mensagens: 12
|
Enviada: Seg Mar 14, 2011 10:43 am Assunto: Apenas Enviar... |
|
|
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 |
|
 |
CENTURYINF Membro Junior

Registrado: Sexta-Feira, 19 de Fevereiro de 2010 Mensagens: 364
|
Enviada: Ter Mar 22, 2011 10:00 am Assunto: Re: Apenas Enviar... |
|
|
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 |
|
 |
jarbasm Aprendiz

Registrado: Quinta-Feira, 17 de Fevereiro de 2011 Mensagens: 190
|
Enviada: Dom Jan 29, 2012 4:05 pm Assunto: Re: Apenas Enviar... |
|
|
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 |
|
 |
|
|
Enviar Mensagens Novas: Proibido. Responder Tópicos Proibido Editar Mensagens: Proibido. Excluir Mensagens: Proibido. Votar em Enquetes: Proibido.
|
|