luciano_f

Eu registro o nosso numero completo inclusive com o digito verificador no banco de dados e depois preciso dele para fazer baixa automatica mais o poblema não é só ele como disse está pegando o nosso numero incompleto pois começa da posição 48 e no RLBoleto começa em 47

Pessoal eu usava o RLBoleto como migrei todos os meus relatorios para o Fast Report estou migrando também o componente de boleto. Porém quando faço a leitura do Arquivo de retorno no Layout 240 que está em anexo nessa mensagem não consigo pegar o nosso Numero completo inclusive com o digito verificador o RLBoleto trazia todo o nosso numero e tinha uma variavel para pegar o digito do nosso numero como não encontrei forma de pegar o digito verificar do nosso numero pelo ACBR tive que alterar os fontes bem como a forma como é feito a captura do Nosso numero Porém gostaria de saber o que está certo e o que está errado o RLBoleto ou o AcbrBoleto o problema está na linha 548 NossoNumero := copy( Copy(Linha,48,9),Length( Copy(Linha,48,9) )-TamanhoMaximoNossoNum ,TamanhoMaximoNossoNum); no RLBoleto é Copy(Linha,47,10); Porém como não consigo pegar o digito do nosso numero eu mudei para Copy(Linha,47,11); Ainda tive que comentar as seguintes linhas { if (not LeCedenteRetorno) and (rCNPJCPF <> OnlyNumber(Cedente.CNPJCPF)) then raise Exception.Create(ACBrStr('CNPJ\CPF do arquivo inválido')); if (not LeCedenteRetorno) and ((rAgencia <> OnlyNumber(Cedente.Agencia)) or (rConta+rDigitoConta <> OnlyNumber(Cedente.CodigoCedente))) then raise Exception.Create(ACBrStr('Agencia\Conta do arquivo inválido')); } Pois meu cliente recebe arquivo retorno sem esses dados que geram essa Exception e que no RLBoleto consegue fazer a leitura. A unit alterado também está em anexo. Grato a todos. RETORNOCEF1429.cmp.txt ACBrCaixaEconomica.pas

Hum entendo por isso meu TEF vai ser tudo usando minhas telas sem essa se outro programa. Agora eu consegui uma proesa aqui, consegui criar todo o teclado como HOTKEY e com isso meu programa não perde o focu nunca, bem estou testando isso ainda mais a principio parece ter ficado muito bom.

gostei desse ideia de registrar no Shell do windows mais me responda mesmo com isso precisa de um hotkey para voltar o foco pois pelo que pude testar aqui o foco fica exclusivo no PDV pois fica sem outra aplicação no windows, em sua experiencia mesmo assim precisa disso ??? outra coisa percebi que criando o HotKey eu não consigo usar mais aquela tecla exemplo se eu usar o "F" de foco e o usuario quiser fazer uma busca de produto ele não vai conseguir digitar a Letra "F" mais tem como resolver isso. Grato.

Como você fez isso "Outra modificação foi colocar o sistema no shell" Você mata o processo "Explorer.exe" na abertura do seu PDV e abre novamente quando fecha o PDV ?? que codigo o colega usou para fazer isso poderia postar ? pois eu já usei alguns codigo mais sempre que fecha o "Explorer.exe" ele reinicia automaticamente, e não consigui nada que abra novamente o Explorer.exe sem travar o meu PDV.

Pessoal sei que minha duvida não é especifica sobre o ACBR porém como muitos aqui tem PDV acredito que alguns já tenha passado com esse problema. Eu estou num dilema eu fiz um PDV que usa apenas o teclado ele dispensa completamente o uso do Mouse, porém percebo que em algumas situações a aplicação perde o focu. eu já fiz rotinas matando o processo "Explorer.exe" assim que abre o meu PDV e volta a executar o "Explorer.exe" quando o meu PDV é fechado mais mesmo assim não tenho tido os resultados esperados Eu já usei esse tipo codigo em um Timer if Not Application.Active then begin if Assigned(Screen.ActiveForm) Then ForceWindow(Screen.ActiveForm.Handle); end; Aqui em minha cidade existe uma rede grande de supermercados que o PDV deles é muito interessante pois o mesmo tem um Interface muito bonita, não sei a linguagem que é feito se é Delphi, Visual Studio, Java ou outra mais o interessante que ele não tem Focu nos campos, não aparece o cursor nos campos e trabalha completamente sem o Mouse como isso é possivel será algo feito em eventos do formulario como o "FormKeyDown" seria isso possivel. Bem gostaria de algumas ideias e conselho dos colegas.

Caso a gente não ative a propriedade Autofinalizar do AcbrTefD e usar o VesPague e desliguar a impressora durante a entrada de dados vai dar erro de "Impressora fora de Linha ACK = 0" para resolver isso eu adicionei algumas linha de codigo que apenas copiei o que o Daniel já tinha feito e dupliquei parte do codigo para resolver o problema está a partir da linha 1605. Gostaria que os Administradores dessem uma analisada nisso. ACBrTEFDVeSPague.pas

Sim entendi mais as mensagem que sem usar o evento são mostradas nos Form azul em cima quando ativado a propriedade "ExibeMensagem" que são do tipo impressora trabalhando não deveriam ser mostradas por esse evento ??? e aqui para mim nenhuma mensagem é mostrada nesse evento

Estou tentanto trazer as mensagens do AcbrEcf por esse evento mais não consigo Eu fiz um teste : procedure TForm1.ACBrECF1MsgAguarde(const Mensagem: string); begin Showmessage(Mensagem); end; Com a propriedade ExibeMensagem = True o meu teste sempre traz o Showmessage Vazio se eu colocar ExibeMensagem = False Só me traz algum resultado quando mando fazer uma pesquisa por modelo de Ecf ou Porta O interessante que se eu não usar o evento e ativar "ExibeMensagem" e mandar fazer uma redução X ou Z vai me trazer um form azul em cima Como devo proceder estou usando o "ACBrECF Ver: 1.0.0" Grato a todos.

Muito grato pessoal é que andei lendo um pouco sobre Paf-Ecf e essa parte de trabalhar off-line é a parte mais complicada que achei até agora.

Régys só uma questão viu em outro topico que os homologadores não testam essa questão de ser Off-Line isso realmente procede. Vi isso nesse topico ::: viewtopic.php?f=12&t=2494&p=11409&hilit=Off+Line#p11409

Pessoal estou começando a ler sobre o Paf-Ecf e gostaria de saber dos colegas de forma mais detalhada possivel se não for incomodo para os colegas pois estou completamente perdido nessa questão do sistema trabalhar de forma Off-Line. Meu sistema é feito com banco Firebird 2.1 assim gostaria de saber como se tem projetado essa questão de trabalhar Off-Line, devo colocar um banco de dados em cada estação e ao ser ligado as estações se conectam no servidor para buscar o estoque e tabela de produtos, ou isso deverá ser feito na redução Z do ECF atualizando tanto os cadastro de produtos como a vendas realizadas ?? Esse processo de carga de produtos e descarga de vendas no servidor como os colegas tem feito ? um modulo automatizado especifico para isso ou os usuario fazem isso de forma manual abrindo alguma tela para poder carregar os produtos e descarregar as vendas realizadas. Alguem já fez isso com Tabelas em XML pelo TClientDataSet nas estações será que dá certo ??? Isso realmente tem que trabalhar no dia a dia das empresas ou posso fazer isso só para a homologação e já deixar uma configuração no sistema para poder fazer o sistema trabalhar sempre On-Line ??? deixando a cargos das empresas optarem pela melhor forma de trabalho. Enfim fico agradecido desde já aos colegas que puderem me detalhar como fizeram isso.

Agradeço a atenção colega "markapollo" mais isso eu já faço e não é a solução para meu problema eu gostaria de saber sobre as questões que levantei no topico. com respeito ao meu codigo se está correto e sobre as propriedades : AguardarConsultaRet AjustaAguardaConsultaRet IntervaloTentativas Tentativas e sobre os Loop existentes no metodo Enviar() como aludi acima. Grato.

Pessoal sei que esse topico já foi debatido antes mais meu caso é um pouco diferente pois não está ocorrendo em apenas um cliente e com rede lenta esta ocorrendo em todos os meus clientes em empresa com internet boa. Aqui o parana é um caos direto fica em processamento por cerca de 5 minutos a 10 já liguei para a sefaz e confirmei isso. Por isso gostaria de saber se existe alguma propriedade no ACBRNFE que tenta reenviar a NFE automatico. Para isso gostaria de explicação sobre as propriedades AguardarConsultaRet AjustaAguardaConsultaRet IntervaloTentativas Tentativas A função delas é apenas para ficar consultando a NFE para pegar o XML validado com o recibo, protocolo ? ou existe alguma propriedade que tenta enviar a NFE caso perceba que o site da Receita está lento e não tenha conseguido enviar o XML com sucesso pela primeira vez. Basicamente meu codigo de envio é esse :: Try ACBrNFe1.NotasFiscais.GerarNFe; ACBrNFe1.NotasFiscais.Assinar; ACBrNFe1.NotasFiscais.Valida; Except On E: Exception Do begin ACBrNFe1.NotasFiscais.Clear; Raise Exception.Create(E.Message); Exit; End; End; ACBrNFe1.WebServices.Envia(Codigo_Nota); cStatNFe := ACBrNFe1.WebServices.Retorno.cStat; Gostaria de saber se nessa linha onde tem o "Envia(Codigo_Nota)" o ACBR tem algum Loop que tenta enviar a mesma NFE duas vezes caso encontre lentidão por parte da sefaz para receber o arquivo se os Loops existes são apenas para ficar consultando.

Pessoal em primeiro lugar eu parabelizo os desenvolvedores dessa exelente biblioteca. Eu estou tendo muita dificuldade em fazer os testes de homologação pois não tenho impressora fiscal e nem PinPad a impressora fiscal de emulação da Bematech é complicado em alguns testes que tem que desligar a mesma e estou completamente perdido com esse roteiro extenso de homologação assim gostaria de comprar um projeto já homologado usando o ACBRTefD. Estive estudando o ACBRTefD bem como o Demo e o mesmo está longe de ser um demo que chegue perto do homologado até porque ele é apenas uma base para o estudo e desenvolvimento e demostra o uso de varios tipos de TEF bem como o discado e o dedicado. Eu poderia comprar ou mesmo se algum Colega pudesse passar um demo de apenas um TEF que fosse mais proximo dos requisitos da Homologação ficaria muito agradecido. Eu não preciso de modulo de vendas apenas quero os formularios já programados que fazem o recebimento do TEF assim como é no exemplo do AcbrTefD, para assim incorporar em meu ERP. Obs : é Tef dedicado, posso comprar ou trocar por componentes que tenho licensa. Meu email é [email protected]

Mais será que a Classe atual não suportaria pois deve ser algum parametro que muda na chamada inicial da DLL. Será algum colega do forum já trabalhou com a DLL da direção de forma a criar suas proprias telas ??

Você diz a qual tipo de "TEF" que estou usando eu estou setando "tefCliDTEF" no Demo do AcbrTefD na verdade mesmo sendo na modalidade dedicado a Direção tem duas formas de trabalho uma onde será trabalhada com as telas deles que estão dentro da DLL e outro onde não se usa a tela deles e devemos criar nossa propria tela e nessa segunda modalidade de trabalho que eu gostaria de trabalhar assim como ocorre com o "VeSPague" em modo "Background"

Realmente Daniel era isso mesmo o meu erro pois não tinha programado a forma de pagamento Cartão no emulador Bematech. Muito grato pela atenção.

Estou testando o Tef Direção usando Dll para conexão Dedicado é me mostrado as telas da propria direção eu gostaria de ter as minhas telas eu liguei para a Direção e me disseram que é possivel trabalhar com minhas telas, gostaria de saber se o AcbrTefD suporta isso e se alguem já fez esse tipo de implementação. Grato a todos.

Achei o erro está na procedure de inicialização do componente procedure TACBrTEFDVeSPague.Inicializar; var Erro, Tentativas : Integer ; begin if Inicializado then exit ; if not Assigned( OnExibeMenu ) then // o erro está aqui porque não tem nada no evento do Demo. raise Exception.Create( ACBrStr('Evento "OnExibeMenu" não programado' ) ) ; if not Assigned( OnObtemCampo ) then raise Exception.Create( ACBrStr('Evento "OnObtemCampo" não programado' ) ) ;

Estou usando um Emulador de Porta e inclusive o esta fazendo os cupoms fiscais certinho.

Pessoal estou fazendo testes com o Demo do Acbr usando o VesPague em Background Peguei a ultima versão do emulador da Bematech ativei a impressora na Porta COM1 e o demo do acbrTefd na COM2 quando vou ativar o gpVeSPague dá erro de "AccessViolation" ativei o eurekaLog sobre o projeto para ver onde está o problema Function TACBrTEFDVeSPague.DesConectar : Integer ; begin fSocket.CloseSocket; // o erro está na linha 725 Result := fSocket.LastError; end; Estou usando a ultima versão do "Client Simulator" do site "http://www.vespague.com.br/" o Interessante que tinha feito testes com uma versão anterior do ACBRTEFD e estava funcionando mais com a versão 2.0 está dando esse erro.

Colega "fsaguilieri" você teria algum demo em delphi de sua solução em Scope para me passar ? eu ficaria muito grato [email protected]

O Acbr trabalha com o Auttar DLL sem troca de arquivos ?? como devo proceder para o funcionamento de testes com o DEMO TEFD do acbr com o Auttar dedicado Outra duvida qual o procedimento para testes com venda a cartão e já pesso desculpa pela minha ignorancia. eu faço a venda depois clico no botão "Sub-totalizar" e depois em "Pagamento" e escolho opção "02" referente a cartão mais o Demo do Acbr retorna erro dizendo "Forma de Pagamento: 02 inválida." eu tenho que clicar em algum botão no quadro TEF para realizar a venda pelo tef ?? Desde já agradeço a todos.

Pessoal estou começando os estudos e implementação de TEF no meu ERP e minha duvida é o seguinte Dentre esse TEF tanto Discado como Dedicado qual deles eu poderei criar as minhas proprias telas e fazer o meu proprio ERP ter o controle de tudo. Digo isso pois baixe o SevenPDV e com ele eu terei que interagir com telas do Gerenciado padrão. Eu gostaria de uma forma onde o meu sistema se comunica com DLL ou outra forma mais que não mostre as telas de outras empresas e sim apenas minhas telas, onde eu defino no meu sistema se é Debido ou Credito, qual a bandera etc... E dentre os citados acima alguem pode me dizer sobre qualidade. Grato a todos.