Retorno CCe

[abarino]

Caros amigos,

Tenho visto varias formas de pegar o retorno da CCe, não encontrei a forma correta estou fazendo assim, onde esta o erro ?

Como tem que ficar ?

ACBrNFe1.EnviarEventoNFe(1);

MemoResp.Lines.Text := UTF8Encode(ACBrNFe1.WebServices.EnvEvento.RetWS);

memoRespWS.Lines.Text := UTF8Encode(ACBrNFe1.WebServices.EnvEvento.RetornoWS);

LoadXML(MemoResp, WBResposta);

// Retorno

Try

v_stat := ACBrNFe1.WebServices.CartaCorrecao.CCeRetorno.retEvento.Items[0].RetInfEvento.cStat ;

If v_stat = 135 Then

Begin

QryUpdEvento.Close ;

QryUpdEvento.ParamByName('CODSTATUS').AsInteger := v_stat ;

QryUpdEvento.ParamByName('PROT').AsString :=

ACBrNFe1.WebServices.CartaCorrecao.CCeRetorno.retEvento.Items[0].RetInfEvento.nProt ;

QryUpdEvento.ParamByName('XML').AsString :=

ACBrNFe1.WebServices.CartaCorrecao.CCeRetorno.retEvento.Items[0].RetInfEvento.XML ;

QryUpdEvento.ExecSQL ;

end;

except

end ;

Desde já agradeço aos amigos !

[FocusRJ]

Amigão tente assim:

// Retorno

Try

v_stat := ACBrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.cStat;

If v_stat = 135 Then

Begin

QryUpdEvento.Close ;

QryUpdEvento.ParamByName('CODSTATUS').AsInteger := v_stat ;

QryUpdEvento.ParamByName('PROT').AsString := ACBrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.nProt;

QryUpdEvento.ParamByName('XML').AsString := ACBrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.XML;

QryUpdEvento.ExecSQL ;

end;

except

end ; 

Só uma dúvida talvez alguém possa me ajudar, não estou mais conseguindo salvar o xml da CCE, onde ele salva? Como configuro onde salvo este evento? Estou usando até o

ACBrNFe1.EnvEvento.EnvEventoNFe.GerarXML;

mas não localizo aonde o salva!!!!

Antes salvava no path q eu definia em ACBrNFe1.Configuracoes.Arquivos.PathCCe

Att.

Rômulo Mayworm

[suporteagro]

Rômulo,

Verifique como está o seu ACBrNFe1.Configuracoes.Arquivos.PathSalvar

Att.,

Gabriel

[FocusRJ]

Gabriel,

já verifiquei, está tudo preenchido e configurado, salva tudo porém o evento de CCe não está salvando mais o xml, utilizei o

Anexo1 := ACBrNFe1.EnvEvento.EnvEventoNFe.ObterNomeArquivo(teCCe);

e debugando ele me retorna 1-cce.xml porém não encontro esse arquivo em minhas pastas padrão. Preciso de algum comando p salvar esse xml?

[suporteagro]

Rômulo,

Aqui eu utilizo:

ACBrNFe1.EnviarEventoNFe(Lote);

O arquivo de retorno fica salvo em ACBrNFe1.Configuracoes.Geral.PathSalvar com o nome -ProcEventoNFe.xml

Verifique se seu componente ACBr está atualizado.

Att.,

Gabriel

[FocusRJ]

Coloquei o comando

ShowMessage(ACBrNFe1.EnvEvento.EnvEventoNFe.GetNamePath);

e me retornou:

TEventoNFe

Att.

Rômulo Mayworm

[FocusRJ]

Bingo Gabriel, está lá sim, obrigado cara, estava procurando pelo 1-cce.xml

vlw, obrigado!

Att.

Rômulo Mayworm

[clipsis]

Olá, bom dia a todos!

Estou implementando a CCe, e usando o ACBRNFeMonitor para isso.

Preciso apenas esclarecer apenas 2 questões:

1 - Em qual pasta é salvo o XML da CCe ? Tem como configurar essa pasta no Monitor ?

2 - Como faço para enviar uma correção que tenha mais de uma linha. Ex:

Numero do endereco do Destinario correto: 1011

DDD correto : 011

Separo as linhas com ";" ?

Abraços

Clipper Sistemas

[clipsis]

Olá, bom a noite a todos

Alguém, por favor, tem alguma resposta para a questão anterior ?

Abraços

[Angelo Gomes]

Sobre a primeira questão, não sei com é no monitor, mas no componente tem uma propriedade para configurar a pasta das CCe assim como das Autorizadas, Canceladas, etc...

Sobre a segunda questão, o texto da correção é um texto livre. Pode escrever todas as alterações na sequência, sem necessariamente ter um separador entre elas.

[clipsis]

Olá, boa tarde a todos

Angelo Gomes, obrigado pela resposta. Porém não tenho conhecimento em Delphi, e uso apenas o ACBRNFeMonitor.

Alguém que use o Monitor saberia me informar se é possível e como posso: configurar a pasta onde serão armazenadas as CCe ?

Da mesma forma como é feito com as notas emitidas, as nota canceladas, os pdf's, as inutilizadas e as DPEC ?

Fico no aguardo,

Abraços.

[Kiko Fernandes]

No monitor ela usará o mesmo caminho das emitidas.

Mas vc pode usar um comando da linguagem em que vc programa e gerenciar isto, enviando o arquivo para a pasta que vc desejar.

[clipsis]

Olá, Kiko Fernandes. Tudo bem?

Fiz um teste agora de emissão de CC-e, mas XML foi gerado em uma subpasta (ano/mes) dentro da pasta onde configurei: "Salvar Arquivos Enviado/Recebidos p/ WebService". Não na pasta das Emitidas

Estou em Ambiente de Homologação.

Abraço

[Kiko Fernandes]

Olá, Kiko Fernandes. Tudo bem?

Td. tranquilo!

Fiz um teste agora de emissão de CC-e, mas XML foi gerado em uma subpasta (ano/mes)...

Eu uso apenas a primeira opção marcada. [v]Salvar Arquivos em pastas separadas.

Mas se deseja criar uma pasta só para CC-e após o arquivo pronto copie ele para a pasta da CCe.

Se vc programa em clipper, se não me engano tem um comando fcopy que vc pode usar. fcopy(c:\suapastaorigem\arqorigem,c:\suapastadestino\arqdestino). Não tenho certeza se é bem isto, mas é algo parecido.

[clipsis]

Na verdade queria uma pasta apenas para CC-e mesmo, só queria ter certeza onde grava para fazer a cópia.

Só mais uma questão: Se tenho 2 correções na mesma CC-e, como devo proceder para que saiam em linhas separadas.

Fiz com CHR(13)+CHR(10) para mudança de linha. O XML foi gerado até o primeiro CHR(13)+CHR(10).

Se ficar as duas na mesma linha acaba ficando confuso. Existe alguma maneira de quebrar a linha e o Monitor mandar as 2 linhas.

Abraço

[Kiko Fernandes]

Até o momento eu não conheço uma opção para separar. Estou usando texto contínuo.

[clipsis]

Olá, bom dia a todos

Também começar a usar dessa forma.

Vou continuar usando assim então.

Obrigado

Abraços

[SISCON]

Bom dia a todos,

no AcBrMonitor deveria ter uma linha tipo PathCCe=C:\NFE\NFe_CCE onde poderíamos configurar no .INI onde seriam salvos os XMLS da CCe.

Obrigado,