Mark Apollo

Amigos, Testado e funcionando o Cancelamento e CCe por evento com o código disponibilizado pelo Italo no Branches. Posto os código já atualizados com algumas atualizações que foram feitas no trunk bem como uma alteração que precisei para pegar o nome do xml final da CCe. Obs.: 1 - Lembrando que os arquivos estão em Branches; 2 - Estou utilizando o código em produção para Cancelamento e CCe;

Olá, aqui geramos uma vez por ano, se não me engano.

Acredito que, realmente, não ira conseguir enviar estas notas, elas são de janeiro, já deviam ter sido enviadas, salvo engano, você tem até 30 dias para enviar as nfe em fsda.

Ops, foi mal, eu faço assim: for IdNota := 0 to ACBrNFe.NotasFiscais.Count - 1 do begin ..... cStat := ACBrNFe.WebServices.Enviar.CStat; Lote := IntToStr(pLote); Recibo := ACBrNFe.WebServices.Enviar.Recibo; dhRecbto := ACBrNFe.WebServices.Enviar.dhRecbto; TpAmb := ACBrNFe.WebServices.Enviar.TpAmb; .... end; quando preciso pegar alguma informação da nota, percorro os itens com um for for IdNota := 0 to ACBrNFe.NotasFiscais.Count - 1 do begin nr_nota = ACBrNFe.NotasFiscais.Items[IdNota].NFe.Ide.nNF; ... end;

Já existem alguns tópicos falando sobre isso, também tem o exemplo no demo, mas, basicamente, é fazer u while com o Add.NFe: with ACBrNFe.NotasFiscais.Add.NFe do begin Ide.cNF := QryNfeDados.FieldByName('NF_NUMERONOTAFISCAL').AsInteger; //Caso não seja preenchido será gerado um número aleatório pelo componente Ide.natOp := QryNfeDados.FieldByName('NF_DESCRICAOCFOP').AsString; Ide.indPag := TPcnIndicadorPagamento(QryNfeDados.FieldByName('NF_CODIGOFORMAPAGAMENTO').AsInteger); ..... end;

qual estado? tenho percebido uma lentidão (as vezes até indisponibilidade) no SVAN já há uns 5 dias..

Olá, Claudeir, segundo o link que eu te passei, este projeto foi suspenso, visto que a sefaz já se mostrou que irá alterar a página para que projetos como este não funcionem.

Ok, durante a semana testarei na empresa.

Olá, ainda não foram pro SVN.

italojjr, obrigado pela resposta, minha idéia é justamente esta, fazer algo que possa ser utilizado nos eventos. Estou, neste momento, implementando a CCe no meu sistema e convertendo o cancelamento da CCe para evento, logo, a implementação seria no evento mesmo, algo como ACBrNFe.EnvEvento.EnvEventoNFe.Itens[x].EnviarEmail(xxxxxx) assim como no envio da NFe autorizada.

acho legal, mas, para isso seria preciso pegar informações dos sistemas que usam acbr, coisa que já entra no âmbito legal, pois seria vazamento de informações, ou, os usuários do acbr preencherem estas informações, o que já não daria um valor real. Por curiosidade, hoje viramos 76 mil notas emitidas no ACBr só este ano aqui na empresa.

stonebit, pergunto a você qual seria o procedimento para a seguinte situação: Eu realizo uma compra com você, você emite a nota e tenta entregar esta compra para mim, durante o dia inteiro, mas, eu viajei. No outro dia você tenta entregar novamente, mas, eu não cheguei. Passado 24 horas, eu chego e resolvo que não quero mais a compra, mas, não quero nem fazer a recusa no verso da nota. Qual seria a saída para este processo? não pode ser cancelada a nota e eu poderia dizer também para o fiscal que não realizei a compra, IMHO a saída é única: Nota de devolução.

anfm, será que há uma possibilidade da implementação destes procedimento (enviar email) para outros eventos que não simplesmente o envio da nfe? pois temos que enviar email também para cancelamento e cce. O que impede? Caso eu implementasse e disponibilizasse, esta alteração poderia ser disponibilizada no svn? Abraços.

Qual relatório você usa? Rave? Fortes? Quick? poderia postar um xml para testes?

O erro já foi, não há forma de cancelar a nota, fazendo da forma que falei, tanto o estoque será retornado, quanto os impostos serão "anulados". Por via das dúvidas, procure o contador da empresa.

Veja em: http://www.nfe.fazenda.gov.br/portal/di ... euqr8PQBY= a Carta de Correção é feita através do webservice: "Recepção Evento"

Leia: viewtopic.php?f=6&t=825

Faça a devolução desta nota e emita a nota corretamente. Não há como cancelar esta nota.

Olá, alguém está realizando testes com as implementações do italojr? Estou realizando alguns testes e está funcionando tanto a carta de correção quanto o cancelamento por evento através das alterações. Fiz as alterações no Demo para estes 2 novos recursos, de acordo com que eu conseguir testar, vou tentar colocar no demo e disponibilizar depois.

57 também, o que muda no ambiente de homologação/produção somente é o ambiente.

Amigo, você esqueceu de criar o componente: function AutoECF_FI_Ativar( Modelo, Porta, TimeOut, Intervalo, Buffer: String ): Integer; StdCall; var ACBrECF1: TACBrECF; begin //Faltou esta linha ACBrECF1 := TACBrECF.Create(); if ACBrECF1.Ativo then ACBrECF1.Desativar; //aqui dá o erro de access violation ACBrECF1.Modelo := TACBrECFModelo( 4 ); //impressora Daruma ACBrECF1.Porta := 'COM1'; ACBrECF1.Ativar ; end; Obs: Não testei o código.

Para NFe existia um componente para isso, citado pelo anfm e que não funciona mais, para CTe, ao que me lembre, nunca existiu.

Interessante esse site, mas, eu não me sinto confortável em entregar meus xml para alguém desta forma. Vivemos em tempos em que um simples endereço de email passado para uma pessoa errada dá problema, quanto mais informações fiscais da empresa.

Sim, realmente, também acompanhei este tópico e vi que não era o que eu queria, mas, os ultimos posts são sobre o mesmo problema, já postei a dúvida lá tb, vamos continuar por lá então!

Olá, anfm, qual é o problema? estou pendente com isto na empresa, eu poderia ajudar nessa correção. Já tentei várias coisas, até passei a manhã hoje atualizando o windows para desencargo de consciência...