Painel de líderes

Fala galera! eu ja garanti o meu... Att Ricardo

boa tarde vou te mandar um exemplo cte valeu ent_cte__criarcte.txt

Já atuamos no transporte internacional, inclusive procurei no fórum se tinha alguma coisa desenvolvida para o internacional, mas não achei. E estamos começando com o nacional. Vou imprimir o manual e dar uma olhada. Obrigada.

Bom dia Marcos, Enviei para o repositório as alterações no componente visando a implementação do provedor AEG, favor atualizar todos os fontes de todas as pastas e inicie os testes. Muito obrigado pela colaboração.

Precisaria pegar junto ao gerente da sua agencia o manual e verificar se não possui alguma particularidade para o estado do MT, pois nestes dois casos houve particularidade para ambos os estados

@Souza, bom dia ! Associação é realizada apenas uma vez, não tem a necessidade de você realizar associação toda vez que chamar alguma função do SAT. Você ativa o equipamento e faz a vinculação do mesmo no caso associar assinatura, após isso não nem mais necessidade... Sua lentidão pode ser exatamente por conta desta associação, pois o SAT aguarda a resposta desta função para depois executar a função de EnviarDadosVenda ou qualquer outra função do SAT

Bom dia! Estou a alguns meses testando a alteração que fiz nos fontes, somente tive este problema com 0,01 centavos depois do refactory que teve no ACBrBoleto, mas de qualquer forma eu atualizei meus fontes e alterei novamente o ACBrBoleto.pas (Linha 4357, trocada a função Round por TruncFix ). Não tive mais problemas com o 0,01 centavos na geração do código de barras do boleto. Entretanto, observei que mesmo assim o registro do boleto estava sendo feito com esta diferença, portanto tive que alterar também a unit ACBrBancoBradesco.pas, (linha 382, mesma troca de função). Desde então não tenho mais deparado com este problema. Segue em anexo os arquivos para análise. ACBrBoleto.pas ACBrBancoBradesco.pas

Bom dia é no componente mesmo o problema ao transformar o ini em xml

Pronto pessoal, Resolvido, com a ajuda do programador nesse fim de semana otimizaram lá o webservice, a pesquisa está mais rápida e a geração também está respondendo rapidinho, timeout lá foi resolvido. Vamos lá que o de vocês vai ficar certinho agora também. Obrigado à todos pela ajuda.

Ontem instalamos o bartender pego no site da elgin para ver se poderia ser a etiqueta com problemas, mas imprimiu normalmente na Elgin L42Pro sem pular. Hoje, após ver a resposta aqui no fórum conectei no cliente para fazer o procedimento proposto, mas antes de qualquer ajuste tentei uma impressão sem alterar nada, e por incrível que pareça funcionou perfeitamente. Coisas de informática! Como as duas impressoras estão no mesmo PC, pode ter sido algum arquivo do bartender que atualizou ao ser instalado ou ao imprimir por ele a detecção da etiqueta foi feita corretamente. Mas de qualquer forma funcionou. Quanto a zebra por hora não vamos mais usar, depois passamos ela em outro PC para testes. Obrigado pela atenção.

sim.. isso parece estar errado.. o MonitorPLUS, deveria ler novamente o XML, se ele está modificando o INI, removendo os acentos... Assim que o @José M. S. Junior tiver um tempo, ele dá uma olhada nisso...

O XML esta correto sem acentos. O problema é que o Monitor alimenta o componente com as vogais acentuadas e depois gera o XML. O DANFE é impresso e o PDF é gerado com as informações que estão carregadas no componente.

Boa tarde Amarildo! Muito obrigada, vou dar uma olhada.

verifique se a caixa ANSI, está marcada

boa tarde.. sim marcos.. como esta marcado para retirar acentos.. ele realmente retira.. vou dar o meu exemplo do nosso erp. nao usamos acentuacao, pois depedendo da acentuacao vai dar erro na transmissao de nfe.

humm.. pode ser um Bug no MonitorPLUS... ele deve estar alimentando o componente antes, de remover os acentos... Vamos ter que investigar...

Boa tarde Marcos, Pelo que notei esse XML não contem as vogais acentuadas.

ACBrNFe1.EnviarEvento(nLote); cStat := ACBrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.cStat; nProt := ACBrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.nProt; xMotivo := ACBrNFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.xMotivo;

Estava pegando o retorno do cstat pelo método incorreto: if ACBrNFe1.WebServices.Retorno.cStat = 100 then alterei para : if ACBrNFe1.WebServices.enviar.cStat = 100 then Deu certo assim,. obrigado a todos

Pelo log mostra que esta ocorrendo a configuração do componente de impressão antes do mesmo ser impresso. Vou fazer testes para ver se consigo reproduzir mas é bem provável que não ocorra visto que as margens são passadas para o componente de impressão antes de imprimir.

bacana, vou testar hoje a noite. Muito obrigado pessoal

realmente deve ser o espaço no nome da pasta... O erro vem do próprio compilador do Lazarus, quando tenta passar os parêmetros para o compilador de Resource, windres.exe

Seria possível anexar o XML com esse problema ?

Tópico movido para a área do SAC, para que o SLA de respostas seja considerado

Bom dia, Alessandro eu baixo a tabela NCM atualizada da internet e faço a consulta local por esta tabela.

Bom dia. Na vdd o tópico está aberto sim, porém note que foram pedidos exemplos, mas ainda não foram retornados. Vamos seguir no tópico citado, vou fechar aqui. Obs. Caso tenha problemas para postar lá por favor me mande msg privada. Att.

Sim no arquivo ini

Já está disponível no SVN. se for do SAC próxima compilação já está ok. caso compile é necessário atualizar e refazer a IDE e recompilar

Bom dia. No manual temos um exemplo de titulo informado com desconto. https://acbr.sourceforge.io/ACBrMonitor/ModeloTituloArquivoINI.html Att.

Tente remover o espaço no nome da pasta "pacotes lazarus". Isso costuma gerar esse tipo de problema.

Logo que possível farei a correção e subirei ao SVN.

Maravilha!

Olhe sua msg privada que mandei Arturo

Entendi, vou verificar as mudanças necessárias conforme a possibilidade, e posta-las neste tópico o mais rápido possível.

A pré-venda para o Dia do ACBr Online 2020 começou! Garanta já o seu ingresso por apenas R$ 20,00! O que é o Dia do ACBr? Para quem ele é feito? O Dia do ACBr surgiu de ideias propostas pela própria comunidade do ACBr. Dedicimos então criar um dia, não somente para celebrar, mas para agregar conhecimento e promover encontros, que anteriormente, só aconteciam no meio online. Sendo assim, o Dia do ACBr é feito para que desenvolvedores(as) e Software Houses de todo o Brasil, possam encontrar-se com os criadores e mantenedores do ACBr, além de outros grandes nomes da Automação Comercial, que você provavelmente já deve conhecer. Nós já tivemos duas edições presenciais, com muito sucesso e aprovação dos participantes, e agora, para a terceira edição, criamos o Dia do ACBr Online. Clique aqui e conheça a nossos palestrantes. *A grade de palestras será divulgada em breve. Além de nossas palestras, os participantes poderão interagir também com os patrocinadores. *A grade de patrocinadores será divulgada em breve. Muito mais do que uma Live. Participe de uma experiência Online. Você não vai perder a primeira edição do Dia do ACBr Online 2020, vai? Em tempos de distânciamento social, para a sua segurança, criamos um evento 100% Online, prometendo ser uma versão virtual do Dia do ACBr. Através de uma plataforma web, teremos 3 trilhas de palestras para desenvolvedores e Sw. Houses, contando também com networking com nossos patrocinadores e também com os demais participantes, sorteios de brindes, e mais! Você participa de tudo isso Por apenas R$ 20,00 por ingresso. Quero Realizar Minha Inscrição OFERTA VÁLIDA SOMENTE ATÉ O DIA 11 DESTE MÊS! Ou até os lotes esgotarem. De qualquer forma, garanta já a sua vaga! Caso tenha alguma dúvida, ou deseje falar conosco, envie um e-mail para [email protected] Acompanhe-nos em nossas mídias Sociais Publicaremos conteúdos sobre o evento em breve. {unsubscribe_text} | Portal do Projeto ACBr Todos os direitos reservados ©.

Olá pessoal , apenas posicionando que após a ultima compilação 1.3.0.311 funcionou perfeitamente , o gerente do homologou a remessa . Obrigado

Juliana, boa tarde. Farei um teste e te reporto tá ok. Até, Daniel, boa tarde. Ok, entendido, também enxergo que a solução proposta reduz drasticamente a performance da aplicação , principalmente se o arquivo é escrito em rede. Vamos estudar mais um pouco aqui e qualquer resultado diferente que consigamos aqui eu reporto tá ok. Obrigado e até mais,

'essa mensagem ocorre?' - Sim, ela esta no evento de erro que aparece quando acaba o papel procedure TDMVendaService.ECFErrorSemPapel(Sender: TObject); begin inherited; raise EACBrECFSemPapel.Create('FIM DO PAPEL'); end; procedure TDMVendaService.ECFErrorSemPapel(Sender: TObject); begin inherited; raise EACBrECFSemPapel.Create('FIM DO PAPEL'); end; Fazendo mais testes aqui percebi que a diferença para o ecf retornar o erro de 'sem papel' ou 'sem resposta' é muito pequena, vou continuar os testes aqui e retorno com alguma novidade, por enquanto obrigado pela atenção.

Retorno de qual método? Do envio da nota ou da consulta? Se for do envio, note que dependendo do modo que usar, síncrono ou assíncrono, não é preenchido o objeto ACBrNFe1.WebServices.Retorno. Estude o programa exemplo do componente.

Bom dia, Desinstalamos e reinstalamos os componentes acbr; Baseado no exemplo da PosPrinter fizemos um outro projeto teste e conseguimos imprimir direto na porta COMX; Implementamos os mesmos códigos no projeto PDV oficial e os testes de comunicação deu certo, porém continua não imprimindo nfc-e; Descartamos que o problema possa ser relacionado com os componentes acbr ( instalação, configuração ou falha ); Obrigado pelo retorno;

Bom dia a todos, 10/08/2020 Implatada NT 2020.002 - GTVe na SVRS de HMLE Foi implantada e NT 2020.002 do CT-e que trata da emissão da GTVe no ambiente de homologação de empresas da SVRS.

Bom dia pessoal, 10/08/2020 Implantada a NT 2020.001 - Evento Excesso de Bagagem Homologação Foi implantada a NT 2020.001 do BP-e que trata do evento Excesso de Bagagem no ambiente da SVRS de Homologação de empresas. O componente ACBrBPe já esta preparado para o envio do Evento de Excesso de Bagagem, favor manter todos os fontes de todas as pastas atualizados e sempre procure realizar os testes usando o programa exemplo.

Boa tarde Eliezer, Você tem certeza que o novo provedor da cidade de Santarém é SiapNet? Estou achando muito estranho, pois as alterações que você fez não batem com os Schemas que temos desse provedor.

Olá pessoal, tudo bem com vocês? Nesse post eu gostaria de compartilhar com vocês, como fazer para utilizar duas impressoras Epson no mesmo computador. Imagine um cenário onde você tenha apenas uma CPU, mas tenha uma impressora no caixa e outra na cozinha. Nesse caso como seria possível uitilizar a InterfaceEpsonNf para comunicar com ambas? Independentemente da interface da impressora, basta que você utilize a função para iniciar a comunicação, se cumunicar com a impressora e na sequencia usar a função para fechar a porta. Dessa maneira a InterfaceEpsonNf ira conseguir sem nenhuma dificultade interagir com ambas as impressoras. A função que você irá utilizar para iniciar é essa: Function IniciaPorta (pszPorta:Pchar):Integer; StdCall; External 'InterfaceEpsonNF.dll'; após se comunicar, você irá usar essa outra função para deixar a comunicaçao disponível para falar com a outra impressora: function FechaPorta ():Integer; StdCall; External 'InterfaceEpsonNF.dll'; DICA: faça download da InterfaceEpsonNF, descompacte o arquivo baixado e irá conhecer essas e todas as demais funções disponíveis em nossa biblioteca de alto nível, aqui esta o linnk para download: https://epson.com.br/peps-drivers-apis-impressoras-nao-fiscais Um forte abraço e até o próximo post!

Quando acabar o papel você precisa dar um retorno ao usuário pra que ele coloque papel. Pegue o subtotal depois que ele colocar o papel no ECF e continuar com a venda.

A pedido do mesmo... a conta do usuário foi excluída...

Obrigado pela contribuição, em breve será validada para possível inclusão ao svn

AEG.ini Cidades.ini ACBrNFSeWebServices.pas pnfsConversao.pas pnfsNFSeW_ABRASFv2.pas

Olá Pessoal, A lista de cidades que é possível emitir NFS-e através do componente ACBrNFSe já passa de 1.100, sendo não vou listar aqui nesse tópico. Quem desejar saber se a cidade XYZ consta dessa lista peço que abra o arquivo Cidades.ini que se encontra na pasta: ...\Exemplos\ACBrDFe\ACBrNFSe\ArqINI http://svn.code.sf.net/p/acbr/code/trunk2/Exemplos/ACBrDFe/ACBrNFSe/ArqINI/Cidades.ini Veja um exemplo abaixo: [3503208] Nome=Araraquara UF=SP Provedor=GINFES Na primeira linha temos o código IBGE, depois o Nome, UF e por fim qual é o provedor, ou seja, empresa contratada por licitação pela prefeitura. Os contratos por licitação tem prazos de termino definido e não poder ser renovados automaticamente. Sendo assim quando o contrato termina uma nova licitação é feita com varias empresas e pode ocorrer como ocorreu em diversas cidades de uma outra empresa ganhar. Algumas cidades tem o seu próprio sistema. O componente hoje reconhece por volta de 113 provedores (empresas que implementam nas cidades os seus webservices para recepcionar as notas). Dos quais 16 possuem um layout próprio, os demais, ou seja, 97 se dividem metade se utilizam da versão 1 do layout da ABRASF e a outra metade se utilizam da versão 2. Na mesma pasta mencionada acima que contem o arquivo Cidades.ini, vocês encontram os arquivos INI de cada um desses provedores. Peço a todos que não deixem de ler os artigos abaixo:

Como você não mencionou a mensagem exata de erro que está dando, vou dar outra sugestão; Limpar o componente antes de criar um evento. (Se tiver uma nota fiscal carregada no ACBr e você tentar criar um evento, terá a mensagem abaixo) Por tanto, certifique-se de limpar as notas fiscais e eventos que estão previamente carregados no ACBr. with ACBrNFe1 do begin NotasFiscais.Clear; EventoNFe.Evento.Clear; with EventoNFe.Evento.New do begin InfEvento.cOrgao := 91; //91 - Ambiente Nacional. No caso de evento de manifestação, sempre será 91 InfEvento.chNFe := ''; //Chave de acesso da NFe InfEvento.CNPJ := ''; //CNPJ da empresa que está emitindo o evento (o mesmo do certificado digital) InfEvento.dhEvento := now; //Data do evento InfEvento.tpEvento := ''; //teManifDestCiencia, teManifDestConfirmacao, teManifDestOperNaoRealizada, teManifDestDesconhecimento InfEvento.detEvento.xJust := ''; //Justificativa, caso seja desconhecimento ou op não realizada end; EnviarEvento(IdLote); end;