luciano_f

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.

Vou colocar o TEF Dedicado da Daruma no meu ERP sei que a Daruma usa tecnologia da Direção e em conversa com o pessoal da Direção eles me informaram que ao fazer as chamadas da DLL deles vai abrir as telas para entrada dos dados da propria DLL mais que também posso trabalhar sem chamar essas telas e criar as minhas proprias telas, eu gostaria de saber se isso é possivel usando o ACBrTEFD se sim existe alguma tipo de parametro especial para isso na chamada dessa DLL. Grato a todos.

Eu pensei que havia alguma validação para esse campo assim como CPF digo isso para eu poder validar para a NFE o Colega tem alguma ideia de como posso validar esse tipo de campo para a NFE Grato.

sim amigo mais o que eu gostaria de saber se existe algum codigo para verificar isso grato.

Gostaria de saber se tem como validar o CAD-Pro aqui no parana é usado para agricultores existe alguma forma de validar isso Grato.

Já existe algum projeto para baixar o XML do novo portal da Receita ??? Grato.

Sim isso é verdade mais a quebra de linhas pode acontecer em um campo com apenas 30 Caracteres

Pessoal em alguns registros como o 0450 que uso um campo com mais de 500 carateres na minha tabela eu estava com erros pois era gerado registros dessa forma no Sped Fiscal |0450|8| IMEI 356518043204693| O validador acusa erro pois a descrição foi para outra linha e deu numero de registros diferente do Layout definido assim resolvi acrescentar o seguinte codigo na unit function DeleteLineBreaks(const S: string): string; var Source, SourceEnd: PChar; begin Source := Pointer(S) ; SourceEnd := Source + Length(S); while Source < SourceEnd do begin case Source^ of #10: Source^ := #32; #13: Source^ := #32; end; Inc(Source) ; end; Result := S; End; e dentro das functions como RFill, LFill, DFill eu coloquei Value := DeleteLineBreaks(Value); Não analisei se gera algum outro problema gostaria que os amigos dessem uma olhada. Grato. ACBrTXTClass.pas

Gostaria de saber o que os administradores acharam dos componentes ? Grato.

O Sintegra eu não analisei muito ele para fazer pegar o codigo das linhas dos registros que tiveram erros assim acredito que dá para se melhorar muito a forma como eu fiz isso. LfResizerVCL.rar Sintegra.rar

Gostaria de saber com os Moderadores como contribuir com dois componentes para o projeto O projeto sultan Sintegra que já está integrado ao ACBR eu fiz modificações no mesmo e coloquei para ele mostra a linha do Arquivo onde gerou o erro. O outro componente de autoria minha é um componente que faz redimencionamento automatico de formulario e componentes para se adaptar a monitores com resoluções diferentes o diferencial é que esse componente consegue redimencional qualquer componente como DbGrids, StringGrid, Treeview, TreeList etc.. fiz ele para clientes que tenho Supermercados onde a tela de venda ocupa toda a tela e os objetos são grandes.

Pessoal desculpem minha ignorância mais gostaria de uma ajuda sobre a melhor forma de padronização do Banco de dados. Todos os impostos atualmente tem muitas informações no caso do ICMS tem informações como CST, alíquota, base de cálculos etc.. Ipi tem ainda código de enquadramento legal Bem e isso ainda pode aumentar pois o governo vive criado normas novas Assim eu não sei se guardo todas essas informações nos itens das vendas ou se coloco apenas o código do Imposto e deixo tudo isso nos cadastros Ou se ainda crio outra tabela especifica só para os dados dos impostos. Isso ainda pode varias para Venda ou Entrada de Produtos. Gostaria da dica dos amigo para ter uma noção de como os amigos tem feito. Grato a todos.

Gostaria de saber como faço para poder fazer uma consulta e ter o numero do Recibo Eu só consigo o numero do Protocolo if OpenDialog1.Execute then begin ACBrNFe1.NotasFiscais.Clear; ACBrNFe1.NotasFiscais.LoadFromFile(OpenDialog1.FileName); ACBrNFe1.WebServices.Retorno.Executar Showmessage(ACBrNFe1.WebServices.Retorno.Recibo); // Não consigo o Numero do Recibo Showmessage(ACBrNFe1.WebServices.Retorno.Protocolo); // Consigo o Numero do protocolo End; Já tentei assim também if OpenDialog1.Execute then begin ACBrNFe1.NotasFiscais.Clear; ACBrNFe1.NotasFiscais.LoadFromFile(OpenDialog1.FileName); ACBrNFe1.Consultar; Showmessage(ACBrNFe1.WebServices.Retorno.Recibo); // Não consigo o Numero do Recibo Showmessage(ACBrNFe1.WebServices.Consulta.Protocolo); // Consigo o Numero do protocolo End; Eu já procurei mais só achei o retorno do Recibo atravez da linha abaixo "ACBrNFe1.WebServices.Retorno.Recibo" Existe alguma outra forma de eu poder obter o numero do recibo ou eu só consigo ele quando envio a nota e logo em seguida capturo pelo retorno do WebServices.