tchuck

Magno mas se eu fizer dessa forma eu não consigo abrir a Gaveta de Dinheiro

Regys eu ja fiz isso mas da erro o mesmo erro no fechamento da venda....

Alguém ja passou por esse problema de abrir gaveta usando o ACBrNFeDANFeESCPOS

Kiko desculpe a demora eu estava de ferias, vou atualizar e fazer os teste

Tive esse problema do DesignIntf no EX5 referente aos componentes virtuais

ACBrECFVirtualNFCe

Bom dia Regys tem uma coisa errada no log a unica coisa que grava nele é a comunicação inicial da aplicação ou seja sempre a mesma coisa a baixo e mais nada. -------------------------------------------------------------------------------- ATIVAR - 06/01/15 09:18:53:528 - Modelo: ECFVirtual - Porta: COM5 - TimeOut: 3 Device: BAUD=9600 DATA=8 PARITY=N STOP=1 HANDSHAKE= MAXBANDWIDTH=0 --------------------------------------------------------------------------------

Eu estou usando, mas tive que fazer varias mudanças para o componente pois eu uso a minha aplicação PAF-ECF para emitir tbm a NFC-e sem precisar criar uma outra aplicação

Regys fiz o teste e não funcionou, quando eu mando imprimir no ACBrNFeDANFeESCPOS ele fala que esta sendo usado a porta da Impressora..

Estou com um problema quando eu uso o conjunto de componente: ACBrECF + ACBrECFVirtualNFCe + ACBrNFe + ACBrNFeDANFeESCPOS O problema é que o ACBrNFeDANFeESCPOS tem que passar a porta para o Device.Porta mas o ACBrECF ja esta usando essa porta o legal seria que quando ACBrECF estiver usando essa porta o ACBrNFeDANFeESCPOS ja interpretar essas função ja que o mesmo esta interligado ao conjunto. para quem for usar esse conjunto vai ter esse mesmo problema, que estou tendo. Alguém tiver alguma ideia de como resolver esse problema.

segue o link da documentação http://www.sefa.pa.gov.br/legislacao/interna/instrucao_normativa/in2014_00011.pdf a que refere a mudanção esta no Art. 4 Fiz essa mudança no componente 15: begin if AModeloDF = moNFCe then Result := NotaUtil.GetURLSVRS(AAmbiente,ALayOut, AModeloDF, AVersaoDF) //PA else Result := NotaUtil.GetURLSVAN(AAmbiente,ALayOut, AModeloDF, AVersaoDF); //PA end; segue unit da alteração https://www.dropbox.com/s/y3lwjkhpk3uccxd/ACBrNFeUtil.pas?dl=0

Estava com um problema no Pará para emitir a NFC-e sempre retornava a mensagem URL não disponível para o estado solicitado. e o problema foi resolvido com a alteração na unit ACBrNFeUtil.pas mudando de GetURLSVAN para GetURLSVRS Antes 15: Result := NotaUtil.GetURLSVAN(AAmbiente,ALayOut, AModeloDF, AVersaoDF); //PA Depois 15: Result := NotaUtil.GetURLSVRS(AAmbiente,ALayOut, AModeloDF, AVersaoDF); //PA agora esta enviando e validando as NFCe

Esta fazendo o cancelamento das notas mas quando imprimo um danfe cancelado o mesmo não aparece a mensagem de cancelamento no danfe fiz o debug o componente esta recebendo os dados abaixo FieldByName('Contingencia_Descricao').AsString := 'PROTOCOLO DE HOMOLOGAÇÃO DO CANCELAMENTO' mas não aparece no danfe essa informação ou nada referente ao cancelamento estou usando o Fast Report.

vc tem q colocar a UF igual a do ambiente de homologação foi essa a resposta que tive da SEFAZ do AM

Juliomar talvez estressei mau na escrita, mas não é para usar junto com o paf-ecf, e sim as mesmas configurações do paf-ecf. Mas aonde tem a NFC-e não pode usar o paf-ecf correto? então como eu ja tenho um pdv pronto quando eu for usar a NFC-e não preciso criar outro pdv. Como o próprio Daniel e o Regys ja postaram aqui no fórum os componentes Virtuais são para usarem o Mesmo PDV PAF para SAT e NFC-e assim podemos criar parâmetros para cada finalidade.

Não sei se estou infringindo algum regra do fórum em abrir esse novo tópico para destacar as alterações feitas no componente, pois vi alguns tópicos abertos mas nada a respeito de alterações no mesmo. Fiz algumas alterações no componente para trabalhar com as mesmas configurações do meu PAF-ECF, da forma que estava anteriormente estava dando algumas incompatibilidade em alguns pontos do sistema, fiz as seguintes alterações Foi alterado para permitir troco, desconto e acréscimo no final da Venda e cancelamento de varios itens antes eu não conseguia fazer esses processos e como a ideia é usar o componente com o paf-ecf estou sempre revisando e testando o componente. Por favor fiquem a vontade para avaliar as mudanças link da Unit alterada https://www.dropbox.com/s/qlj3z4o64eusc8q/ACBrECFVirtualNFCe.pas?dl=0

aproveitei o problema que tive com desconto fiz uma alteração no componente para dar desconto e acrescimo no total do item tbm como é feito com os ecfs, a alteração foi feira na procedure SubtotalizaCupomVirtual segue o link do arquivo abaixo codigo da alteração procedure TACBrECFVirtualNFCeClass.SubtotalizaCupomVirtual(DescontoAcrescimo: Double; MensagemRodape: AnsiString); Var i: Integer; ValorDescontoAcrescimo : Double; begin with fsACBrNFCe.NotasFiscais.Items[0].NFe do begin ValorDescontoAcrescimo := 0; if DescontoAcrescimo > 0 then begin ValorDescontoAcrescimo := DescontoAcrescimo / Det.Count; for i := 0 to Det.Count - 1 do Det.Items[i].Prod.vOutro := Det.Items[i].Prod.vOutro + ValorDescontoAcrescimo;//se o produto ja tiver acrescimo soma end else begin ValorDescontoAcrescimo := (DescontoAcrescimo / Det.Count) * -1; for i := 0 to Det.Count - 1 do Det.Items[i].Prod.vDesc := Det.Items[i].Prod.vDesc + ValorDescontoAcrescimo; //se o produto ja tiver desconto soma end; if DescontoAcrescimo > 0 then Total.ICMSTot.vOutro := DescontoAcrescimo else Total.ICMSTot.vDesc := DescontoAcrescimo; InfAdic.infCpl := MensagemRodape; end; end; https://www.dropbox.com/s/qlj3z4o64eusc8q/ACBrECFVirtualNFCe.pas?dl=0

No fast Report, mas acho que esta funcionando agora normal, eu paguei todas units e fiz atualização novamente, vou fazer mais uns teste

Estou fazendo desconto no Item, mas me deparei com um problema no somatório no DANFE os valores são diferentes do gerado no xml, o DANFE esta descontando 2 x o desconto dado. Segue anexo xml e pdf do exemplo gerado. Link do PDF https://www.dropbox.com/s/rwetnp6qb3wen3m/DANFeNFCe.pdf?dl=0 Link do XMl https://www.dropbox.com/s/trcnjc56bztpyqh/32141211475728000196650010000006581000006588-nfe.xml?dl=0

Bom dia, André fiz o teste com o lazarus e esta com o mesmo problema que encontrei no delphi um exemplo que e fiz no lazarus e no delphi foi vendi 4 itens cancelei o Item 1 OK cancelou corretamente, mas quando fui cancelar o Item 4 ele já não cancela ou seja não entra na condição abaixo with fsACBrNFCe do begin if (NumItem > NotasFiscais.Items[0].NFe.Det.Count) or (NumItem < 1) then exit; NotasFiscais.Items[0].NFe.Det.Delete(NumItem-1); end;

eu nao estou usando o lazarus mas estou usando a mesma sequencia ACBrECF ACBrECFVirtualNFCe ACBrNFe ACBrNFeDANFeESCPOS Na sangria e outros lugares tive tive que usar da seguinte forma: frmPrincipal.ACBrECF.Desativar; frmPrincipal.ACBrECF.ECFVirtual := frmPrincipal.ACBrECFVirtualNaoFiscal; frmPrincipal.ACBrECF.Ativar; frmPrincipal.ACBrECF.Sangria(ed_valor.Value,'','SANGRIA',list_forma.Items.Strings[list_Forma.ItemIndex]); frmPrincipal.ACBrECF.Desativar; frmPrincipal.ACBrECF.ECFVirtual := frmPrincipal.ACBrECFVirtualNFCe; frmPrincipal.ACBrECF.Ativar;

O componente não imprime nada e ja joga direto para a procedure acima procurando algo referente a NFCe o mesmo acontece quando vou cancelar o não fiscal ele joga direto para o cancelamento da NFC-e tive q fazer uma manobra para evitar tal problema fazer a troca de componentes quando executa as funções de sangria, suprimento e cancelamento não fiscal eu troco para o ACBrECFVirtual e quando emito a NFC-e eu uso ACBrECFVirtualNFCe. Outro problema que estou enfrentando é o cancelamento de Item no componente esta deletando da lista, mas como no PAF eu tenho q mostrar os itens cancelados quando vou cancelar o segundo item passando o parâmetro por item ja não consigo ou seja so consigo cancelar apenas 1 Item

Estive fazendo uma bateria de teste com o componente ACBrECFVirtualNFCe e me deparei com alguns problemas que no ACBrECFVirtual não encontra, mas no ACBrECFVirtualNFCe esta dando ja que a ideia do projeto é usar o componente junto ao ACBrECF, por exemplo não consigo efetuar alguns processo com o ACBrECFVirtualNFCe Não consigo efetuar sangria e nem supereminente sempre quando executo esse metro o componente me redireciona para a procedure TACBrECFVirtualNFCeClass.SubtotalizaCupomVirtual( DescontoAcrescimo: Double; MensagemRodape: AnsiString); dessa forma sempre da erro e no processo de cancelamento desse erro ele tambem me redireciona para o cancelamento da NFC-e e não do comprovante não fiscal

Estou com problemas usando o ACBrECFVirtualNFCe uso minha aplicação usando o componente quando vou cancelar 1 item funciona correto mas o Segundo item começa a dar problema, fiz uma varredura e notei que o componente apaga os Itens da lista, mas o problema que notei foi na condução imposta ao componente como esta abixo with fsACBrNFCe do begin if (NumItem > NotasFiscais.Items[0].NFe.Det.Count) or (NumItem < 1) then exit; NotasFiscais.Items[0].NFe.Det.Delete(NumItem-1); end; como esta aqui if (NumItem > NotasFiscais.Items[0].NFe.Det.Count) or (NumItem < 1) then e da um Count para contar o total de itens mas por exemplo se tiver 3 itens e o item 1 ja cancelado e quando for cancelar o item 3 o componente vai ver o total de itens mas se eu ja tiver cancelado um item antes ai ele sai da condição; creio que o componente deveria verificar se o item é igual ao item informado assim não causaria o problema

Bom Dia estou tentando capturar o numero do item usando NotasFiscais.Items[0].NFe.Det.Items[0].Prod.nItem mas o mesmo não trás nada estou usando o ACBrECFVirtualNFCe na venda do item eu estou informando Det.Prod.nItem := iItem; ou seja para cada produto vendido eu informo o item mas na hora de cancelar o produto estou precisando capturar esse Item e estou usando a informação acima mas não esta m retornando nada;