
edudidu
Membros-
Total de ítens
169 -
Registro em
-
Última visita
Tipo de Conteúdo
Blocks
Notes ACBrLibNFe
Fóruns
Downloads
Calendário
Tudo que edudidu postou
-
Olá Amigos.. Tenho uma dúvida ..No manual do contribuinte diz assim: "a Chave de Acesso da NF-e é a mesma Chave de Acesso da DPEC autorizada" pois bem ..a dúvida é o seguinte .. quando se vai transmitir a NFe é gerado uma chave em que o tipo de Emissão "tpEmis" é 1 .. quando ocorre algum problema no webserver e vai transmitir esse XML por DPEC o Componente então Muda esse Tipo para 4 e conseguentemente muda o digito verificador logo.. a chave de acesso não é mais a mesma nesses dois campos.. isso esta certo mesmo néh ? .. outra coisa na impressão da NFe por DPEC imprimi-se a chave com o Tipo de Emissão 4 e quando se transmite de forma normal imprimisse a chave gerada com tipo 1 ? não sei se vcs me entendem .. desde ja agradeço
-
Então Regis fiz o que vc disse .. NFe.NotasFiscais.Clear; NFe.NotasFiscais.LoadFromString(XML); if NFe.WebServices.EnviarDPEC.Executar then begin end; else begin Retorna A Rejeição end; agora se faço assim: NFe.NotasFiscais.Clear; NFe.NotasFiscais.LoadFromString(XML); NFe.NotasFiscais.SaveToFile(D:\....); NFe.NotasFiscais.Clear; NFe.NotasFiscais.LoadFromFile('D:\..'); if NFe.WebServices.EnviarDPEC.Executar then begin // Autoriza o DPEC end; else begin end;
-
Olá Regys Obrigado pela ajuda então .. ta retornando a mesma regeição .. falha no Schema XML..
-
Olá .. Amigos assim tive que parar os testes de desenvolvimento resolver outra urgência rssr Retomei os testes para o desenvolvimento da Rotina.. quando executo o código Abaixo ele da uma falha de Schema XML.. agora se eu salvar o conteudo das tags em um arquivo XML .. dar um LoadFromFile nesse arquivo e enviar ele Transmite e fica tudo certo .. vcs conseguem ver algum problema no método LoadFromStream que ele da erro na Transmissão ? desde ja agradeço StStreamNF := TStringStream.Create(Xml); NFe.NotasFiscais.Clear; NFe.NotasFiscais.LoadFromStream(StStreamNF); NFe.WebServices.EnviarDPEC.Executar
-
Bom dia Igor. A Idéia é enviar esses dados para o Ambiente de Homolocação para testar o desenvolvimento dessa nova rotina que esta sendo desenvolvida.. estou apenas rascunhando ainda tentando enviar para depois desenvolver os tratamentos necessários.. e assim por isso perguntei se o "tpAmb" do la do conteúdo do XML teria que estar setado como homolocação também ja que faço isso nas confiturações do acbr desde ja agradeço. NFe := TACBrNFe.Create(nil); NFe.Configuracoes.Certificados.NumeroSerie := 'XX XX XX XX XX XX XX XX'; NFe.Configuracoes.WebServices.Ambiente := TpcnTipoAmbiente(StrToInt('2') - 1); -> Ambiente de Homolocação. NFe.Configuracoes.Geral.PathSchemas := ConfigByName('pPathShemaNFe'); StStreamNF := TStringStream.Create(Xml); NFe.NotasFiscais.Clear; NFe.NotasFiscais.LoadFromStream(StStreamNF); NFe.WebServices.EnviarDPEC.Executar a := UTF8Encode(NFe.WebServices.StatusServico.RetWS); b := UTF8Encode(NFe.WebServices.StatusServico.RetornoWS);
-
Olá Amigos bom dia.. só mais uma pergunta.. Se configurar ACBRNfe.Configuracoes.WebServices.Ambiente := tpHomolocacao la no "tpAmb" do xml é necessário também configurar como tipo 2 ? para testar na homolocação ? desde já agradeço.
-
Olá Igor obrigado por ajudar.. no nosso caso aqui como tinha dito .. não usamos ACBR para Transmitir ..e nem geramos o Arquivo xml .. o que o sistema Faz aqui e salvar as tags do arquivo xml diretamente em uma coluna no banco de dados... ai se não fosse abusar teria alguma função que conseguiria ler diretamente as tags ? desde ja agradeço
-
Olá Amigos. Preciso desenvolver a rotina da transmissão da NFe por DPEC .. e assim a rotina de transmissão da NFe não foi desenvolvida utilizando ACBR assim todos dos dados que são adicionados nas tags do xml devem ser carregados na acbr como se fosse uma NFE normal ? desde ja agradeço
-
Entendi .. isso quer dizer que terei que salvar os dados das transações no banco de dados .. pois precisarei delas para utilizar os um dos 2 comandos sugeridos ? .. Obrigado..
-
Olá Amigos .. estou com uma dúvida em relação ao cancelamento.. pela lei so posso cancelar o Ultimo cupom.. então para teste .. gerei um cupom com um pagamento TEF por cartão.. e testei o cancelamento como no exemplo. bom na impressora beleza .. estornou o pagamento e cancelou o cupom.. porém na autorizadora não foi cancelado. lembrando que a transação já estava confirmada. ACBRECF.CancelaCupom; ACBrTEFD.CancelaTransacoesPendentes;
-
Bom dia Daniel é isso mesmo .. muito Obrigado.
-
Olá Amigos .. preciso de uma ajuda.. ja desenvolvi o TEF.. assim sem usar a ACBR.. por troca de arquivos pela autar utilizando a bematech .. nossa deu um trabalhão danado .. o que foi feito em 2 dias com ACBR la demorei 2 semanas .. Agora por recomendação estou utilizando o componte ACBR GP. auttar integração do tipo TEF-IP. Vamos ao problema situação é a seguinte: Imaginem o usuario realizando uma transação TEF em apenas 1 vez.. ele joga o valor o GP é chamado e nesse momento ele desiste.. o gerenciador é fechado retornando a tela para ele escolher outra forma de pagamento.. a dúvida eu pego o status de cancelado do gerenciador.. quando eu fiz da outra forma ia la na pasta pegava a resposta .. por la eu decidia qual procedimento seguir o que imprimir etc... então pensei ... vou pegar pelo estado da impressora .. nesse caso deu certo porque quando desisti da transação ela ainda não tinha sido confirmada e ACBrECF1.EstadoECF era igual a 'P' de pagamento então pensei vou colocar um if aqui se for igual a 'L' sinal que posso faturar .. se for 'P' espera o cara tentar fazer denovo.. so que no caso de 2 transações o usuario realiza a primeira e em seguida desista da outra.. acbr chama o gerenciado para digitar o numero do cartão que da primeira transação para que a transação anterior seja estornada e o cupom cancelado .. e nesse caso não posso faturar concorda.. quando so que quando ele volta no ACBrECF1.EstadoECF esta como 'L' e fatura sendo que teria que esperar para retomar o processo.. queria ver com vc se tem alguma função na acbr que pegue esse status.. para que eu possa trabalhar na logica para o desenvolvimento correto da rotina do pagamento no sistema.. desde ja agradeço.
-
Adicionei -> ACBrTEFD1.ImprimirTransacoesPendentes; troquei ACBrECF1.FechaCupom por ACBrTEFD1.FinalizarCupom; Obrigado valeu.
-
Parou de dar o Erro.. obrigado
-
Olá Daniel .. a Subtotalização que vc diz seria depois da venda dos Itens.. neh ? na minha procedure de venda dos Itens .. tenho o seguinte codigo var P:TFinProduto; CP: TProduto; AliqICMS:string; begin for p in CamposFaturamento.Produtos.FItems do begin CP := TProduto.Create; //Carrega o Produto na Classe Produto CP.GetProduto(P.CodProd); case AnsiIndexStr(CP.SitTributaria.Codigo,['NN','FF','II']) of 0,1,2:AliqICMS :=CP.SitTributaria.Codigo; else AliqICMS := FormatFloat('0.00',CP.SitTributaria.Aliquota); end; try ACBrECF1.VendeItem(IntToStr(p.CodProd), CP.Descricao, AliqICMS, p.Quantidade, p.ValorUnitario, p.PorcDesconto, CP.UnidadeMedida); except Application.MessageBox('Erro ao Vender ítem.','SIGC',64); ACBrECF1.CancelaCupom; abort; end; FreeAndNil(CP); end; ACBrECF1.SubtotalizaCupom(); end; depois disso tenho outra procedure EfetuaPagamento.. que é acionada no clique do botão .. antes disso o usuario digita o valor do pagamento .. se o valor pago for menor que o valor total .. sinal que tem outra forma de pagamento .. essa seria a logica operacional.. -> No caso do pagamento com cartão ..TEF -> ACBrTEFD1.CRT( FCamposFaturamento.CampoValorPago.AsFloat ,FormaPagamento,ACBrECF1.NumCOO); -> Se for em dinheiro ACBrECF1.EfetuaPagamento(FormaPagamento,FCamposFaturamento.CampoValorPago.AsFloat,'',False); Quando tem 2 tipos de pagamento no mesmo cupom ... Ele Paga o Primeiro pelo cartão .. e o restante no dinheiro .. da o erro ao contrário não da.. assim pelo que me disse que a regra do dedicado seria ..o dinheiro por ultimo e depois o cartão .. mas deu a entender que o erro não seria por isso .. então o que poderia ser .. ? seria na manipulação desses metodos do TEF com ECF ? desde ja agradeço
-
Opa Daniel era isso mesmo .. me passaram um numero de cartão de testes diferente e ele retorna os dados certinho.. problema estava com a GP utilizada.. A estou com outra dúvida agora acho que até te vi respondendo essa.. no caso do pagamento com Cartão e Dinheiro .. Se eu Pago em dinheiro Primeiro depois com cartão .. blz ele da certo .. agora se eu pago com cartão depois em dinheiro .. "Erro - cupom não totalizado" essa é a logica mesmo .. se eu for fazer um pagamento em dinheiro e cartão .. dinheiro tem que vir sempre antes ? desde ja agradeço
-
Olá Amigos .. estamos desenvolvendo o TEF.. utilizando o componente da ACBR nos baseamos no exemplo da mesma .. agora estou com uma dúvida em relação a impressão do cupom não fiscal vinculado .. nesse logo abaixo .. realizei uma operação com 2 tipos de pagamentos diferentes.. 50 reais em dinheiro e 50 reais no cartão .. pois bem .. ele fez tudo certinho . até o comprovante do TEF .. o cabeçalho esta certo apartir dai ele joga sempre valores fixos na parte em Negrito .. se alguem puder ajudar agradeço. S W E D A Rua Dona Brígida, 713 Vila Mariana - São Paulo - SP CNPJ: 53.485.215/0001-06 IE: 111.072.115.110 SIMULADOR SWEDA CONNECT/SIM ———————————————————————————————————————————————————————— 30/08/2012 11:32:13 CCF:000002 COO:000004 CUPOM FISCAL ITEM CÓDIGO DESCRIÇÃO QTD. UN. VL UNIT(R$) ST VL ITEM(R$) 1 300 BALA PRODASA 700G - YOG 10 x 10,00 I1 100,00 —————————————————— TOTAL R$ 100,00 Dinheiro 50,00 C. Débito 50,00 SOMA 100,00 Projeto ACBr http://acbr.sf.net ———————————————————————————————————————————————————————— BV9A1I9@eKNuDakETH?sFKIe1KAqp@VIGa3uTJpLeRw68WZVGsCL SWEDA IF ST200 ECF-IF VERSÃO: 01.00.01 ECF: 001 OVVVV 30/08/2012 11:32:43 FAB: 00000000000000000001 BR S W E D A Rua Dona Brígida, 713 Vila Mariana - São Paulo - SP CNPJ: 53.485.215/0001-06 IE: 111.072.115.110 SIMULADOR SWEDA CONNECT/SIM ———————————————————————————————————————————————————————— 30/08/2012 11:32:44 GNF:000001 COO:000005 CDC: 0001 NÃO É DOCUMENTO FISCAL COMPROVANTE DE CRÉDITO OU DÉBITO C. Débito 1ª VIA COO do documento vinculado: 000004 Valor da compra: R$ 100,00 Valor do pagamento: R$ 50,00 REDECARD REDESHOP SIMULADOR PDV REDECARD COMPR:025485 VALOR TOT. : 000000002500 ESTAB:000000023 03/03/2008-172733 TERM:PV040000/000415 CARTAO: *********1118 AUTORIZACAO: 025485 TRANSACAO AUTORIZADA MEDIANTE USO DE SENHA PESSOAL CUPOM: 00000000000000000004 MAC: 8834 NSU_CTF: 000078 LOJA: 0080 PDV: 001 ---------------------------------------------------------- REDECARD REDESHOP SIMULADOR PDV REDECARD COMPR:025485 VALOR TOT. : 000000002500 ESTAB:000000023 03/03/2008-172733 TERM:PV040000/000415 CARTAO: *********1118 AUTORIZACAO: 025485 TRANSACAO AUTORIZADA MEDIANTE USO DE SENHA PESSOAL CUPOM: 00000000000000000004 MAC: 8834 NSU_CTF: 000078 LOJA: 0080 PDV: 001 ———————————————————————————————————————————————————————— SWEDA IF ST200 ECF-IF VERSÃO: 01.00.01 ECF: 001 OVVVV 30/08/2012 11:32:59 FAB: 00000000000000000001
-
Olá Juliomar Obrigado por estar ajudando .. o que esta desenvolvido no exemplo para auttar seria por troca de arquivos .. quando desenvolvi para nossa aplicação antiga.. o codigo ficou gigante.. vou dar uma olhada no exemplo pra ver como foi feito então .. deve estar mais enxuto .. valeu Juliomar..
-
Então.. se for para Auttar não tem como utilizar o componente .. terei que desenvolver a rotina .. como tinha feito anteriormente.. por troca de arquivos .. e chamava o a aplicação diretamente na pasta ..?
-
Olá Amigos.. preciso de ajuda de vcs.. no nosso projeto antigo aqui da empresa foi desenvolvido a algum tempo.. quando comecei a trabalhar aqui a rotina do Cupom Fiscal já estava desenvolvida e funcionando todo o desenvolvimento foi baseando na impressora bematech onde foram utilizadas suas funções nativas. bom pela obrigatoriedade da legislação nosso cliente foi obrigado a realizar as transações através do TEF.. e contratou uma empresa a Auttar acho que vcs conhecem .. para fazer essa intermediação das transações.. como tinhamos pouco tempo o desenvolvimento do TEF também foi realizado direcionadamente para auttar e Bematech.. hoje ta funcionando certinho no cliente. Em paralelo aqui na empresa foi desenvolvido um sistema em Delphi 2007 .. com novos recursos para substituir esse antigo. O Programador que era o resposável pelo desenvolvimento desse novo projeto desligou-se a algum tempo e até então ele estava parado. Agora retomamos o projeto e foi desenvolvido até o cupom fiscal.. e acredito que para ser mais genérico entre as impressoras o antigo programador desenvolveu utilizando o Componente ACBRECF da ACBR. O que acontece agora precisamos desenvolver o TEF para essa aplicação e chegamos a conclusao que para ser mais generico entre G.Ps nao so da Auttar também desenvolver através da ACBR. Assim queria ver como funciona primeiramente atraves do Exemplo fornecido pela ACBR.. tenho instalado na minha maquina a DLL da Auttar ja para testes.. so queria saber como configuro o componente da ACBR setando os parametros para ele poder chamar o Gerenciador da Auttar .. desde ja agradeço
-
Opa EMBarbosa então cara uso windows 7 .. emulador de Portas Virtual Serial Ports Emulator .. Porta serial COM3.. Emulador.. Bematech MP-2100 TH FI.. timeOut 10
-
Agora testei diretamente com o executável do projeto .. tem hora que ele força e vai .. chega até a imprimir mais de 2 cupons .. a ACBR dispara o seguinte .. "Impressora Bematech não responde(ACK=0) Se o problema persistir, verifique os cabos, ou experimente desligar a impressora durante 5 segundos liga-la novamente. e repetir a operação.. Deseja tentar Novamente ? " acredito que deve ser alguma configuração.. ou problema com o Emulador sei la .. como não tenho impressora de verdade pra testar .. fico nessa duvida do que pode ser.. no nosso projeto antigo . a impressora funciona perfeitamente.. visto que utilizamos as funções nativas da Bematech.. não sei o que pode ser
-
Sim.. ja Sai debugando . o código e .. quando eu chamo o metodo ECF.Ativar.. ele ja dispara a exceção ..como eu disse anteriormente se eu forçar .. ele imprime o cupom.. as vezes ele tbm aborta.. depende. desde ja agradeço