Daniel_FC

Daniel. mais uma coisa, que percebi tanto no demo quanto no meu pdv No evento do OnPoucoPapel do Componente, coloquei so isso para mosntrar em tela. blz LbMretornoECFp.Font.Color := clRed; LbMretornoECFp.Caption:= 'ATENÇÃO... POUCO PAPEL NA ECF'; LbMretornoECFp.Refresh; Testei com uma impressora bematech MFD e Matricial, funciono correto a menssagem de pouco papel na tela. mas agora com a mecaf, toda vez que abro um cupom ele entra na funcao e aparece a menssagem de pouco papel. mesmo tendo papel na ecf. isso ocorre no demo Tambem, mas é so com a mecaf. sera que isso pode ser um bug. no agardo.

Daniel. Descobri uma caisa interessante. olha so. dentro desta funcao do evento do componente: OnMsgPoucoPapel, estava executando a seguinte rotina try Application.ProcessMessages; Result := False; if (AcbrECF.PoucoPapel) then begin Frm_MainP.LbMretornoECFp.Font.Color := clRed; Frm_MainP.LbMretornoECFp.Caption:= 'ATENÇÃO... POUCO PAPEL NA ECF'; Frm_MainP.LbMretornoECFp.Refresh; end; except end; Tudo bem , comentei o codigo, o resultado é que leu o numCOO. certo agora, quando volto o codigo erro novamente. eo mais interessante é que so acontece com esta ecf.. as outras estao exatamente igual.. e funcionando. Pergunto? 1 O que pode estar errado com este codigo. para esta ecf. falta alguma informacao.. Aguardo....

vou colocar o trecho do codigo que é onde esta dando o erro.. Esta funcao le os dados necessarios para o PDV, apos ativar o componente ECF ============================= function LerDadosECF : Boolean; begin try Splash.LbSplashP.Caption := 'Lendo Dados do ECF Aguarde...'; Splash.LbSplashP.Refresh; Splash.ProgressBar1.Position := 200; Result := False; {DADOS ECF GLOBAL} try if (Frm_MainP.ImpFiscal.EmLinha(100)) then begin GECF_NUMERO := Frm_MainP.ImpFiscal.NumECF; end; except end; try if (Frm_MainP.ImpFiscal.EmLinha(100)) then begin GECF_LOJA := Frm_MainP.ImpFiscal.NumLoja; end; except end; try if (Frm_MainP.ImpFiscal.EmLinha(100)) then begin GECF_SERIE := Frm_MainP.ImpFiscal.NumSerie; end; except end; try if (Frm_MainP.ImpFiscal.EmLinha(100)) then begin GECF_DATA := Frm_MainP.ImpFiscal.DataHora; end; except GECF_DATA := Now; end; try if (Frm_MainP.ImpFiscal.EmLinha(100)) then begin GNCF := StrToInt(Frm_MainP.ImpFiscal.NumCOO); end; except GNCF := StrToInt(Frm_MainP.ImpFiscal.NumCupom); end; try if (Frm_MainP.ImpFiscal.EmLinha(100)) then begin GNCF := StrToInt(Frm_MainP.ImpFiscal.NumCOO); end; except end; [b]OBS: aqui é que jo nos label para mostrar em tela[/b] Frm_MainP.LbNecfP.Caption := Completa_Esquerda(copy(GECF_NUMERO,2,3),3,'0'); Frm_MainP.LbcfP.Caption := Completa_Esquerda(IntToStr(GNCF),6,'0'); Frm_MainP.LbNpdvP.Caption := Completa_Esquerda(NomeComputador,3,'0'); Frm_MainP.LbDataP.Caption := DateToStr(GECF_DATA); Frm_MainP.LbHoraP.Caption := copy(TimeToStr(Time),1,5); Splash.LbSplashP.Caption := 'Inicializando Sistema [ pDV1 - Cupom Fiscal - Verssão - '+Frm_MainP.LbVersaoOS.Caption+' ]'; Splash.LbSplashP.Refresh; Result := True; except end; end; =====================================

Ok. ja fiz os teste com o DemoEcf e acredite executa a funcao do NumCOO correto. e pq que no meu pdv quando faço isso ta dando erro... o mais engracado que nunca tive este problema antes, eu tenho uma versao mais antiga de 1 mes atras, e funciona.. eo pior é que esta com os mesmos parametros de requisição. que mostra no log. que enviei.. pessoal to Ficando maluco, meu cliente tem 5 ecf destas... Alguma outra dica?

Ok Daniel vai o log que gerei hoje. cara nao sei o que esta acontecendo, meu cliente tem 5 ecf destas e hoje pela manha parou todos os pdv.. fico no aguardo. LogECF.txt

Boa tarde! Pessoal estou com um problema com as ecf Mecaf, so que o interessante e que sao em funcoes diferentes. ao solicitar esta funcao: AcbrEcf.NumCOO (esperando comando anterior) cai na except ai nao concigo pegar o numero do cupom. eo mais interanssante que isso sempre fuincionou ja uso o acbr a mais de 2 anos.. Alguem ja passou por isso?

Beleza Isaque, agora esta gerando os registros. Obrigado.

Pessoal Preciso de uma opiniao, acho que vc podem resolver minha duvida sobre as seguintes funcoes do Ecf com o TEF. Hoje na minha aplicacao estou usando o AcbrECF eo AcbrTEFD da seguinte maneira (1 Opsao) 1 AcbrECF.Abrecupom 2 AcbrECF.vendaItem 3 Tela de Final Cupom 4 if AcbrTEFD.CTR(.....) then 5 AcbrECF.SubTotaliza 6 AcbrECF.EfetuaPgamento(....) 7 AcbrECF.FechaCupom(...) 8 AcbrTEFD.ImprimeTransacoesPendente E porque nao usar Desta forma Pergunto é possivel? (1 Opsao) 1 AcbrECF.Abrecupom 2 AcbrECF.vendaItem 3 Tela de Final Cupom 4 if AcbrTEFD.CTR(.....) then 5 AcbrTEFD.SubTotalECF 6 AcbrTEFD.ECFPagamento(....) 7 AcbrTEFD.FinalizarCupom(...) 8 AcbrTEFD.ImprimeTransacoesPendente 1 Desta Forma esiste possibilidade de dar erro.? 2 Alguem Usa desta Forma Passando tudo pelas Funcoes do TEF mesmo sendo pgto em DINHEIRO, CHEQUE, ETC..? 3 Qual a forma correta de se usar.? Obrigado ...

Bom dia Estou com o mesmo problema, não esta gerando os registros C400, C405, C481, C485 e C489 Alguém sabe o que pode ser ?

Boa tarde. Também estou no inicio do desenvolvimento do sped pis/cofins na minha aplicação usando o componente, mas pelo que entendi no layout, se você esta gerando o C400, tem que gerar também os c405, c481, c489. Me corrijam se eu estiver errado.

Pessoal ! Obrigado por me ajudar a resolver..

Ok, vou olhar a dll. tem cada cliente... rsrsrs outra coisa. como que faço para passar uma funçao expecifica usando o AcbrTefD ex: em vez de assim Frm_MainP.AcbrTEFD.ADM(TACBrTEFDTipo(gpCliSiTef)); assim Frm_MainP.AcbrTEFD.ADM(300)); que corresponde a recarga de celular. ou algo semelhante a isso.. preciso chamar uma funcao especifica que esta no menu do tef, e nao queria que aparecesse um monte de opçoes. isso é possivel. obrigado...

Ola amigos! Preciso de uma ajuda em relacao a capturar a leitura do cartao pelo PinPad. Vou Explicar minha situacao. Meu cliente tem um cartao Proprio tipo ''convenio'' e este cartao tem tarja magnetica. quando ele passar o cartao pelo pin, preciso ler os numero que estao na tarja e comparar com Bando de dados para poder gerar umas promoções especiais. tipo: quanto este cliente gasta com este cartao etc.... 1- existe uma funcao que me retorne os dados lidos pelo pin? 2- ou que possa chamar esta funcao em qualquer situacao? obrigado!

Bom dia Daniel Bom ja que isso nao tem na mp20 da Bematech, vc pode me dar uma sugestao de como usar flags, para poder realizar isso com o tef.? deichando o ecf em estado de NaoFiscal. Obrigado.

Estou usando o Demo O Modelo da impressora é Bematech MP20 Fiscal

oK, ELTON VAI ANEXO O LOG. EXECUTEI AS MESMAS FUNCOES.. ACBrECF.AbreNaoFiscal; ACBrECF.RegistraItemNaoFiscal('03', 5, ''); // 03 indice cnf (recebimento da minha ecf) -- 5 é o valor ACBrECF.SubtotalizaNaoFiscal; ACBrECF.FechaNaoFiscal; o interessante é que apos este comando a ecf imprime. que coisa... acbrlog.txt

Ola Pessoal.. Uso: AcbrECF, AcbrTEFD no PDV ja Homologado. Gostaria de tirar algumas duvidas com minha aplicacao PDV. Preciso fazer recebimento nao fiscal, com o TEF, isso acontece quando o cliente quer pagar contas que ele fez durante o mes, no mercado. Minha dificuldade é o seguinte no pdv. Criei um (03 Recebimento nao fiscal) na ecf ok passei os seguintes parametros para o ecf. ACBrECF.AbreNaoFiscal; ACBrECF.RegistraItemNaoFiscal('03', 5, ''); // 03 indice cnf (recebimento da minha ecf) -- 5 é o valor ACBrECF.SubtotalizaNaoFiscal; Obs: Detelhe que ate aqui a ECF nao imprimiu nada sendo assim o estado da ecf ainda esta em LIvre chama o pagamento via cartao do tef na moeda 04 no valor de 5 reais if ACBrTEF.CRT( 5, '04', dmECF.ACBrECF.NumCOO ) then begin ACBrECF.EfetuaPagamentoNaoFiscal('04', 5); ACBrECF.FechaNaoFiscal; ACBrTEF.ImprimirTransacoesPendentes; end ao executar este bloco, o tef diz que o estado do ecf nao esta em (NaoFiscal). oque pode estar errado... nao consigo identificar.. preciso ajuda dos colegas... Obrigado.

Boa tarde. Tenho o tef dedicado homologado com a software express utilizando o componente do acbr. Gostaria de saber se o componente trabalha com recarga de celulares pre-pagos ? Como faço para habilitar esta opção ? Aguardo retorno. Obrigado. Daniel.

Bom dia. Realmente o XML esta sem os dados do destinatario, mas o componente esta gerando assim porque esta sem o CEP do destinatário. Se eu colocar o cep 99999999 ele gera com os dados do destinatário, mas dá erro na UF conforme abaixo: Falha na validação dos dados da nota 0 TAG: ID:B02/cUF(Código do UF (Unidade da Federação)) mesmo a uf estando com EX não esta aceitando, devido ao cep. Aguardo retorno. Obrigado

Boa tarde, Estou tentando validar uma NFE de Importação, sendo que preenchi todos os dados conforme descrito, ou seja, sem cnpj e inscrição do destinatario, sem cep, codigo da cidade 9999999, UF como EX, etc, mas esta retornando o erro Falha na validação dos dados da nota 1790 TAG: ID:E02-E03/CNPJ-CPF(CNPJ/CPF) - Nenhum valor informado. TAG: ID:E04/xNome(Razão Social ou Nome) - Nenhum valor informado. Segue anexo o xml gerado para avaliação. O que deve estar errado ? Desde já agradeço a colaboração. 43110489316608000133550010000017901000017902-nfe.xml

Boa tarde. Já consegui gerar os boletos pelo componente, normalmente, já conferi os dados da linha digitável com alguns bancos, mas não consigo fazer a leitura do código de barras dos boletos. foram testados vários leitores, e simplesmente não lê. Comparando um código de barras gerado pelo componente com um outro boleto normal, o gerado pelo componente parece que tem as barras mais largas. Estou usando a impressão como o quickreport. Por favor, me ajudem. Obrigado.

Comecei a usar o NFE 2.0 esta semana, esta funcionando normalmente, mas comecou a ocorrer o seguinte problema: As notas são autenticadas, geram o xml normalmente mas nao estao gerando o PDF da nota. Tenho varios clientes usando o mesmo programa que desenvolvi usando o componente acbrnf2 e em alguns esta gerando o pdf e em outros simplesmente nao gera. Ja verifiquei configuracoes, estao todas iguais. Sera que pode ter a ver com algum problema no windows do cliente ? O que posso fazer para verificar ? Aguardo retorno. Obrigado.

Ok!! Daniel. ja atualizei pelo svn, fiz alguns teste aqui, agora deu certo, esta funcionando novamente Suprimento/Sangria Pelo Demo do Acbr e pela minha aplicaçao. O que tinha de errado... ? obrigado.... pela ajuda abraço....

Blz Daniel era isso mesmo... tb estava deduzindo isso, se puder acertar a atualizar no svn.. agradesso mesmo... obrigado.. fico agardando seu ok para eu atualizar novamente...

Bom dia Daniel ok, tb vi isso, mas o interessante é q nao faz a impressao do suprimento ou sangria. o demo fica processando, processando. e nada. muito estranho nao tive problema algum ainda com o Acbr. tava tudo indo bem até a ultima atualizacao onde veio a DLL, libeay32.dll apos isso ferro.... estou usando a impressora Bematech mp-20 matricial versao 3.10 To meio perdido....