Leonardo Gregianin

Ao compilar o ECFTeste com XE3, localizado em trunk\Exemplos\ACBrECF\Delphi\ECFTeste.dpr aconteceu o seguinte erro de compilação: EfetuaPagamento.pas(77): Undeclared identified: "DecimalSeparator" Corrigi com o seguinte código: $IFDEF VER240} Key := FormatSettings.DecimalSeparator {$ELSE} SysUtils.DecimalSeparator {$ENDIF} Era para corrigir ou estou com problemas no meu Delphi ? Att.

Tenho material do concentrador da Wayne (dll e manual das funções em C#). Deve ajudar.

Foi exatamente por este motivo que criei outro tópico (). Este tópico, nesta seção classificados ficou fora de tópico.

Alguém interessado neste assunto a fim de dar continuidade ao projeto ou incluir os fontes já disponibilizados em outrs tópicos ao projeto atual? Para constar os tópicos relacionados:

Alguém interessado neste assunto a fim de dar continuidade ao projeto ou incluir os fontes já disponibilizados acima no projeto atual? Para constar os tópicos relacionados:

Ótima notícia.

Nunca aconteceu comigo. Qual o estado/uf acontece isso?

Eu não queria causar nenhum mal estar, só constatar que existe muito discussão repetida. Ao sugerir aquela alteração, postei também uma mensagem privada para um adminstrador e também nada de resposta. Eu acho que esta crítica é válida, tem várias pessoas com muito conhecimento aqui neste fórum que gostariam de colaborar mais para o projeto. Talvez a inclusão de mais administradores, ou criar um novo grupo de colaboradores, ou integrar mais o fórum com o mantis.

Se houvesse uma melhor organização neste fórum nem precisaria ter aberto este tópico. [*]

Hoje (27-11-2012 10:58:11 UTC-4) consegui cancelar NF-e por evento pelo SCAN. Segue em anexo o retorno do SCAN. Alterações no ACBr: ...\Fontes\ACBrNFe2\ACBrNFeUtil.pas: + linha 881: LayNFeCCe, LayNFeEvento: Result := NotaUtil.SeSenao(AAmbiente=1, 'https://www.scan.fazenda.gov.br/RecepcaoEvento/RecepcaoEvento.asmx', 'https://hom.nfe.fazenda.gov.br/SCAN/RecepcaoEvento/RecepcaoEvento.asmx');

Já existe o webservice para recepção de eventos no SCAN: https://www.scan.fazenda.gov.br/RecepcaoEvento/RecepcaoEvento.asmx Seria possível implementar? Obs.: Pelo emissor da Sefaz em modo SCAN a carta de correção não funciona, mas o cancelamento funciona bem.

Posta o código que você faz para cancelar uma nota. Eu passo assi> // Envio do evento de cancelamento NFe.EventoNFe.Evento.Clear; with NFe.EventoNFe.Evento.Add do begin infEvento.chNFe := Chave da NF-e autorizada; infEvento.CNPJ := copy(Chave,7,14); infEvento.dhEvento := Now; infEvento.tpEvento := teCancelamento; infEvento.detEvento.xJust := Texto da justificativa; infEvento.detEvento.nProt := Número do protocolo da NF-e autorizada; infEvento.cOrgao := StrToInt(copy(Chave,1,2); end; NFe.EnviarEventoNFe(StrToInt(idLote)); // XML retorno MemoResp.Lines.Clear; MemoResp.Lines.Text := UTF8Encode(NFe.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.XML);[/code]

Eu envio o cancelamento em homologação normalmente para MT, assim: // Envio do evento de cancelamento NFe.EventoNFe.Evento.Clear; with NFe.EventoNFe.Evento.Add do begin infEvento.chNFe := Chave da NF-e autorizada; infEvento.CNPJ := copy(Chave,7,14); infEvento.dhEvento := Now; infEvento.tpEvento := teCancelamento; infEvento.detEvento.xJust := Texto da justificativa; infEvento.detEvento.nProt := Número do protocolo da NF-e autorizada; infEvento.cOrgao := StrToInt(copy(Chave,1,2); end; NFe.EnviarEventoNFe(StrToInt(idLote)); // XML retorno MemoResp.Lines.Clear; MemoResp.Lines.Text := UTF8Encode(NFe.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.XML);[/code]

Boa tarde, Esta alteração deveria ter sido feita? Obrigado.

Mas a informação "infEvento.dhEvento" é obrigatória na validação, eu poderia passar assim "infEvento.dhEvento := Now" e o componente ajusta internamente? De onde o ACBr busca a hora? Do computador ou da internet?

Para ficar mais claro, poderia citar um exemplo de como utiliza a nova função do horário? with NFe.CartaCorrecao.CCe.Evento.Add do begin infEvento.chNFe := Chave; infEvento.cOrgao := StrToInt(codOrgao); infEvento.CNPJ := CNPJ; infEvento.dhEvento := ??? infEvento.tpEvento := 110110; infEvento.nSeqEvento := StrToInt(nSeqEvento); infEvento.versaoEvento := '1.00'; infEvento.detEvento.descEvento := 'Carta de Correção'; infEvento.detEvento.xCorrecao := Correcao; infEvento.detEvento.xCondUso := ''; // O acbr faz o preenchimento end;

Dá uma olhada nestes outros tópicos: http://www.djsystem.com.br/acbr/forum/search.php?keywords=A+data+do+evento+nao+pode+ser+maior&terms=all&author=&sc=1&sf=all&sk=t&sd=d&sr=posts&st=0&ch=300&t=0&submit=Pesquisar São as mesmas indagações suas.

Ao executar a consulta de NF-e que já esteja cancelada como um evento, o protocolo e data de recebimento que me retornam é da NF-e autorizada e não do cancelamento. ACBrNFeWebServices.pas -> TNFeConsulta.Executar -> Linhas 2325 e 2326: FProtocolo := NotaUtil.SeSenao(NotaUtil.NaoEstaVazio(NFeRetorno.retCancNFe.nProt),NFeRetorno.retCancNFe.nProt,NFeRetorno.protNFe.nProt); FDhRecbto := NotaUtil.SeSenao(NFeRetorno.retCancNFe.dhRecbto <> 0,NFeRetorno.retCancNFe.dhRecbto,NFeRetorno.protNFe.dhRecbto); e não deveria ser: FProtocolo := NFeRetorno.procEventoNFe.Items[I].RetEventoNFe.retEvento.Items[j].RetInfEvento.dhRegEvento; FDhRecbto := NFeRetorno.procEventoNFe.Items[I].RetEventoNFe.retEvento.Items[j].RetInfEvento.nProt; O ACBr teria como tratar os dois código até lá? (Exemplo: CancelamentoPorEvento := (Now > StrToDateTime('01/12/2012 00:00:01'));

O código ACBrNFe1.WebServices.Consulta.dhRecbto irá lhe retornar o que quer.

Tenho duas dúvidas: 1- Meu código está assim, continua o mesmo? NFe.NotasFiscais.Clear; NFe.NotasFiscais.LoadFromFile(path); NFe.Cancelamento(Justificativa); RetornoCancelamento := NFe.WebServices.Cancelamento.cStat; 2- De acordo com o manual de integração agora existe o código de retorno 151: "Cancelamento fora do prazo". Pergunto: Alguém conseguiu transmitir o cancelamento fora do prazo? E se conseguiu, esta NFe foi realmente cancelada? No meu caso, a SEFAZ-MT me retorna: "Rejeicao: Prazo de Cancelamento Superior ao Previsto na Legislacao".

Como ficou o novo comando para envio e retorno do evento de cancelamento? Quando será atualizado o AcbrMonitor no svn?

Estou com o mesmo problema, não tem solução para este caso?

Funcionou. Eu estava limpando a cada carregamento do xml. Muito obrigado.

É isso mesmo que eu quero. Então eu devo estar carregando as notas de uma a uma no componente. Como você faz para carregar todas de uma vez e depois utilizar "ACBrNFe1.NotasFiscais.Imprimir" ?

Exatamente, a primeira nota eu quero que apareça o Setup do rave para selecionar se eu vou visualizar ou imprimir todas as notas, para que a configuração permaneça para todas as próximas notas selecionadas. O problema é que não existe, ou eu não sei como fazer, para saber se o usuário selecionou "preview" ou "printer" no Setup do Rave.