Mark Apollo

Realmente foi um erro nesta rotina, mas, se for informado esta variável a mesma deverá ser incrementada logo abaixo. Da forma que o código está possivelmente estaria iniciando sempre do primeiro NSU. Ainda assim havia muito erro de conexão, do tipo, a cada 15 consultas a conexão caia como se não houvesse resposta do webservice. Este problema foi resolvido para mim após reescrever a rotina usando .NET. Hoje realizo a consulta a cada 4 horas para ~15CNPJ em menos de um minuto total de processamento.

Eu utilizo desta forma, olhe que é possível pegar tanto a correção quanto a justificativa a partir da consulta de uma nfe: ACBrNFe.WebServices.Consulta.procEventoNFe.Items[i].RetEventoNFe.InfEvento.detEvento.xCorrecao; ACBrNFe.WebServices.Consulta.procEventoNFe.Items[i].RetEventoNFe.InfEvento.detEvento.xJust; with QryUpd_CCe, ACBrNFe.WebServices.Consulta do begin for i := 0 to procEventoNFe.Count - 1 do begin //Evento := procEventoNFe.Items[i].RetEventoNFe; //procEventoNFe.Items[i].RetEventoNFe.retEvento;//Leitor.Arquivo; AddMensagem('Retorno SEFAZ '+ procEventoNFe.Items[i].RetEventoNFe.xMotivo); //AddMensagem('Retorno: ' + ACBrNFe.WebServices.Consulta.procEventoNFe.Items[i]); Parameters.ParamByName('vCd_Empresa').value := Cd_Empresa; Parameters.ParamByName('vCd_Filial').value := Cd_Filial; Parameters.ParamByName('vNFe_Chave').value := ChaveNFe; Parameters.ParamByName('vCd_Evento').value := procEventoNFe.Items[i].RetEventoNFe.InfEvento.nSeqEvento;// //QryCCe.FieldByName('Cd_Evento').AsInteger; Parameters.ParamByName('vCd_EventoSefaz').value := procEventoNFe.Items[i].RetEventoNFe.InfEvento.TipoEvento;// CodigoEvento; Parameters.ParamByName('vNFe_Status').value := procEventoNFe.Items[i].RetEventoNFe.cStat; Parameters.ParamByName('vNFe_Lote').value := procEventoNFe.Items[i].RetEventoNFe.idLote;//idLote; Parameters.ParamByName('vNFe_Ambiente').value := TpAmbToStr(TpAmb); Parameters.ParamByName('vNFe_Dt_Recepcao').DataType := ftDateTime; Parameters.ParamByName('vNFe_Dt_Recepcao').value := procEventoNFe.Items[i].RetEventoNFe.retEvento.Items[0].RetInfEvento.dhRegEvento;//ACBrNFe.WebServices.EnvEvento.d; Parameters.ParamByName('vNFe_Pt_Recepcao').value := procEventoNFe.Items[i].RetEventoNFe.retEvento.Items[0].RetInfEvento.nProt; case procEventoNFe.Items[i].RetEventoNFe.InfEvento.tpEvento of teCCe: Parameters.ParamByName('vNFe_Correcao').value := procEventoNFe.Items[i].RetEventoNFe.InfEvento.detEvento.xCorrecao; //QryCCe.FieldByName('Ds_Correcao').AsString; teCancelamento: Parameters.ParamByName('vNFe_Correcao').value := procEventoNFe.Items[i].RetEventoNFe.InfEvento.detEvento.xJust; //QryCCe.FieldByName('Ds_Correcao').AsString; else Parameters.ParamByName('vNFe_Correcao').value := ''; //QryCCe.FieldByName('Ds_Correcao').AsString; end; Parameters.ParamByName('vNFe_Correcao').value := procEventoNFe.Items[i].RetEventoNFe.InfEvento.detEvento.xCorrecao; //QryCCe.FieldByName('Ds_Correcao').AsString; Parameters.ParamByName('vNfe_Msg_Sefaz').value := procEventoNFe.Items[i].RetEventoNFe.xMotivo; Parameters.ParamByName('vCd_XML').value := Cd_XML; ExecSQL; end; FreeAndNil(EventosXML); end;

Sendo assim vai precisar de ajuda de outra pessoa, eu uso o FortesReport, não manjo muito bem do RaveCB...

Mas, utiliza o Rave, Quick, Fast ou Fortes Report?

Qual componente você utiliza? o ACBrCTe tem isso a pelo menos uns 2 anos que eu utilizo...

Qual o report que você utiliza? o Fortes Report exibia a descrição quebrada mas, não lembro o porque, tiraram esta possibilidade, eu alterei na mão a banda do item alterando uma opção dela e do label da descrição, não lembro qual opção eu alterei, se interessar, na segunda posso postar aqui.

Galera, vamos imaginar: Para que serve o serviço? Para consultar todas as notas emitidas CONTRA o seu CNPJ. Existe notas emitidas contra seu CNPJ em ambiente de homologação? Experimente realizar os testes em ambiente de produção.

Poderia compartilhar a solução? talvez ajude outros também!

Bom dia, é uma boa pergunta Ricardo, eu o inicio com o valor 0 e nas repetições utilizo o valor retornado da consulta. Att. Rômulo Mayworm Galera, é simples: iniciando-se com 0 o processamento demorará mais, visto que iniciará do evento mais antigo até o mais atual, caso inicie-se do ultimo NSU o processamento continuará a partir do ultimo ponto consultado.

Ainda não tive como testar, tenho o serviço em produção mas ainda inutilizando normalmente, mas ainda não testei esta situação. Tão logo consiga irei postar aqui, ou caso alguém consiga reproduzir este cenário, poderia compartilhar.

Será que a Receita não mudou o código da página, como faz frequentemente?? Afinal, já deixou claro que esta página não é para download automático. IMHO a melhor alternativa é implementar o download através do webservice (NT2012.002) e orientar os riscos de fazer este download.

Estou pensando em, caso eu não consiga recuperar as informações ao enviar, "confirmar" as a inutilização enviando novamente e esperando a rejeição por duplicidade. Ainda vou realizar alguns testes.

Rapaz, é complicado por não conhecermos a linguagem e a forma que está fazendo para conectar no WS, para mim, isso é algum problema no momento da conexão.

Exatamente, simplesmente desenvolva seu software e consiga um certificado para realizar testes em ambiente de homologação, somente isso.

Como foi falado, não existe uma "homologação" como existe no caso do PAF-ECF, quando fala-se em homologar referindo-se à CT-e, NF-e entre outros, nada mais e do que fazer testes em ambiente de homologação (testes) nada mais do que isso.

Amigo, leia a NT2012.002 lá estará falando sobre este método e também sobre o método NfeDownloadNF que é para o download de nfe, como o próprio no me sugere.

Não há ninguém melhor do que você para responder sobre sua urgência, agora, sobre as alterações, elas serão na geração do XML, o restante continuará da mesma forma, logo, IMHO, compensaria iniciar o desenvolvimento sim.

Acredito que ainda não, os eventos só são impressos pelo Rave ou pelo FortesReport. Uma dica é fazer como eu e desenvolver na ferramenta que usa, ou seja, desenvolver no Quick e disponibiliza-lo para a comunidade.

1) o CTe é um outro modelo de documento, diferente do CTRC, logo, começará do 1; 2) a série é opcional, você pode emitir em ambiente de produção até a série 899, a partir da série 900 somente para CTe em contingência; 3) deve-se informar o ano para validação e armazenamento na receita, não poderá ser utilizado em nenhum ano posterior, muito possivelmente eles utilizam este números para poder limpar o BD após X anos.

Sim, é bem parecida, até usa o mesmo webservice. Pela mensagem de erro você está tendo problemas para conectar ao ws. Qual URL está utilizando? a URL de eventos é "https://www.nfe.fazenda.gov.br/RecepcaoEvento/RecepcaoEvento.asmx"

Geralmente eu utilizo a própria página da receita para isso, baixando manualmente.

Qual tecnologia/linguagem esta usando? a conexão vai depender muito disso, lembre-se que a conexão é https

Italo, entendo, Como falei, para o MEU caso vai ficar mais complicado, vamos ver como vai ficar para o restante da galera.

Olá, Italo, Primeiramente parabéns pelo trabalho, não é fácil atender esta quantidade de requisições. Tenho acompanhado estas mudanças e estou "com uma pulga atras da orelha": será esta a melhor alternativa mesmo? ter que liberar dois sistemas? não sei para os outros usuários, mas, para mim é totalmente inviável manter dois sistemas para ler as versões, até porque utilizo um servidor de build, onde, até onde vi, não teria como compilar os dois sistemas, a não ser que, a cada build eu recompile antes o pacote do cte com a diretiva. Se falei alguma besteira, por favor me corrija, mas, são dúvidas que pairam em minha cabeça! Abraços.

Ei, bom dia, está utilizando o ACBr para isso?