Painel de líderes

Boa tarde, A tag vBC não é gerada por ser regime Simples Nacional e CSOSN 101. No Simples apenas o CSOSN 900 permite o destaque do ICMS.

Fiz diversos testes e notei que as configurações estão sendo gravadas corretamente. Testes efetuados com a versão do SVN do ACBrMonitorPLUS. Em todos os casos a Danfe foi gerada corretamente. Abaixo os prints das margens cofiguradas em 0, 2 e 10, para todas as margens, respectivamente.

@Daniel Simoes creio que seja possível implementar a alteração sim, vou verificar e posto aqui quando deve estar pronto.

Precisou passar a chave das notas ou apenas o certificado e CNPJ? Já fez a validação do XML pra verificar se o arquivo e assinatura são válidos?

Conseguimos resolver o problema! Devido a alguma atualização na SEFAZ (01/11), está sendo apresentado a rejeição "502 - Campo ID não corresponde à concatenação dos campos correspondente" que tem alguma relação com a data de emissão da NF-e. Passamos a informar a hora da emissão na tag <dhEmi>2016-11-01T15:01:00-02:00</dhEmi> E a nota foi autorizada!

Hum muito estranho pois uso aqui e não preciso fazer manobra alguma, uso em xe3, xe6, xe7, seattle, berlin e lazarus Hum.. relendo vi que você fala do DANFSe que é da NFSe e não da DANFe e NFe

Bom dia! 01/11/2016 - Em Pernambuco rejeição 502 - Campo ID não corresponde à concatenação dos campos correspondentes SEFAZ com problema!

Já no SVN.... Commit [r12525]

Se usa o instalador não precisa ter um para cada delphi baixado! assim que der vou rodar o delphi 7 e testar

não uses o posprinter, usa o respetivo report para a impressao. neste caso teras de indicas o tipo de impressao como sendo tiNFCe ou tiNFCeA4

Recentemente recebemos uma impressora não fiscal Tanca TP-650 e após diversos testes utilizando os exemplos do ACBr, temos alguns comentários sobre a mesma. Sobre a instalação da Tanca TP-650: O Manual de instalação, Driver da TP-650 além do Tanca Printer Tool podem ser encontrados em: http://tanca.com.br/drivers.php?cat=19&sub=54. A impressora foi testada em uma máquina com Windows 8.1, e foi necessário instalar o driver fornecido pelo fabricante para que a mesma fosse detectada pelo Windows. O Driver USB disponibilizado pela Tanca, não cria uma Porta Serial virtual no sistema operacional, (segundo fabricante, driver VCom em desenvolvimento) . Portanto, para utilizar essa impressora no ACBr, pela porta USB, é necessário efetuar os seguintes passos: Instalar o driver USB da impressora Imprimir uma página de testes do Windows, e verificar se a impressão ocorre com sucesso Compartilhar a impressora no Windows, usando um nome curto. Exemplo: “TANCA” Utilizar no ACBrPosPrinter a porta definida com o nome do compartilhamento. Exemplo: “\\localhost\TANCA” Além da porta USB, a impressora, também possui uma porta Serial, entretanto, a impressora sai da fábrica com a velocidade da porta serial 19200, no caso dos testes foi necessário alterar para 115200 devido à velocidade da porta do computador. Efetuei os seguintes passos: A impressora deve estar conectada via cabo USB Com a comunicação via USB, clicar em Set Printer Em Baud Rate alterar de 19200 para 115200 Caso queira, pode ser alterado também o Code Page Após alterar, clicar em Set, será ouvido um BIP A impressora está pronta para ser utilizada na porta Serial Esse processo também pode ser realizado no próprio Windows. A impressora deve estar conectada via cabo Serial. Nas propriedades da impressora TANCA TP-650, selecione a aba Portas e escolha uma porta serial disponível no computador. Clique em Configurar Porta. Em Bits por segundo, configurar à velocidade da porta do computador. Para a configuração do logo, na impressora basta seguir os seguintes passos: A impressora deve estar conectada via cabo USB Com a comunicação via USB, clicar em Download Em Logo clicar em Add, escolhe o logo, o logo deverá ter a seguinte estrutura: 1. O tamanho do arquivo deve ser inferior a 64K. 2. A largura da imagem: 80mm, em pixel o tamanho deve ser inferior a 567. Após escolher a imagem, selecionar a imagem adicionada e clicar em Download Foi notado que para a impressão do logo, ela utiliza o comando antigo da EscPosEpson (FS + P), portanto foi necessária uma alteração no código do ACBr para seu funcionamento correto (alteração já disponível no SVN). Sobre a utilização da TP-650: Como citado anteriormente, os testes foram realizados utilizando os exemplos do ACBr. Para os testes utilizando o Spool do Windows, foi utilizado o Fortes Report com o Demo SATTeste.exe, e para os testes usando EscPos (impressão direta) foi utilizado o Demo PosPrinterTeste.exe. Testes via USB: Teste utilizando demo SATTeste.exe: Configurado com Largura: 293, Margens – Topo: 2, Fundo: 20, Esquerda: 0 e Direita: 6 e a impressora deve estar instalada no Windows. As impressões realizadas durante esses testes foram cupons de venda com emulador de SAT, onde o mesmo já possuí logo, fonte negrito e normal, QRCode, código de barras, caracteres acentuados, quebra de linha, todos esses detalhes foram impressos corretamente. É realizada a impressão do Cupom de maneira rápida, conforme quantidade de itens: três itens aproximadamente 1 segundos, trinta e três itens: aproximadamente 2 segundos e noventa e três itens aproximadamente 4 segundos. Teste utilizando demo PosPrinterTeste.exe: Impressora Compartilhada: Configurado da seguinte maneira: Modelo: ppEscEpson, 48 colunas, página de código pc850 e na porta o caminho da impressora compartilhada (Ex.: \\localhost\Tanca). Impressão das Tags de Formatação de Carácter, Tags de Alinhamento, Teste de Página de Código e Tags de QRCode: funcionaram corretamente. Tags de Código de Barras: não foram impressos apenas os modelos de códigos de barras: STD25, CODE11 e MSI, em consulta ao manual disponibilizado pela Tanca, esses modelos não são suportados. Tags de Logotipo: configurado da seguinte maneira: em KC1 = 1 e KC2 = 0, o logo foi impresso corretamente. Testes via SERIAL: Teste utilizando demo PosPrinterTeste.exe: Impressora configurada na porta serial: Configurado da seguinte maneira: Modelo: ppEscEpson, 48 colunas, Linhas Pular: 5 e página de código: pc850. OBS: utilizar o cabo serial da própria impressora por conter todos os sinais (RX, TX, CTS, DTS, DTR, RTS e GND), outros cabos podem não funcionar da maneira esperada. Impressão das Tags de Formatação de Carácter, Tags de Alinhamento e Teste de Página de Código: funcionaram corretamente. Tags de Código de Barras: não foram impressos apenas os modelos de códigos de barras: STD25, CODE11 e MSI, em consulta ao manual disponibilizado pela Tanca, esses modelos não são suportados. Tags de QRCode: foi impresso corretamente e sua leitura foi realizada com sucesso. Tags de Logotipo: conforme citado anteriormente, funcionou corretamente. Tag de Leitura de Status: Quando a impressora estava pronta para uso, retornou a mensagem: “Nenhum Erro encontrado”. Quando a impressora estava com a tampa aberta, retornou a mensagem: “stSemPapel, stOffLine, stTampaAberta,” Quando a impressora estava sem papel, retornou a mensagem: “stSemPapel, stOffLine,” Quando a impressora estava com pouco papel (utilizado uma bonina com apenas uma volta de papel), retornou a mensagem: “stSemPapel, stOffLine,” Em todos os testes houve o corte automático. Exemplo de Cupom Impresso Impressão da tags de logotipo Impressão das tags de alinhamento Impressão das tags de QRCode Impressão das tags de Código de Barras Impressão das tags de formatação de caracteres Impressora Tanca TP-650

O maior medo de todo programador, é ver a sua linguagem morrer... Foi assim com o COBOL, com o Clipper, e por várias vezes já se falou do fim do Object Pascal... Hoje em dia é muito difícil achar novos programadores em Delphi, a nova geração nem pensa em aprender ObjectPascal, e para eles, não faz o menor sentido usar um produto pirata, ou pagar caro numa IDE, para aprender a programar... (ainda mais tendo Java, PHP, e tantas outras linguagens disponíveis livremente) Como uma linguagem não morre ? A resposta é simples, com investimento... enquanto houver empresas investindo nela, ela irá crescer e existir... Adquirindo as novas IDEs do Delphi, os programadores (que são dependentes dessa linguagem), mantém o fluxo de investimento e o desenvolvimento da mesma.. Por outro lado, ficar preso a uma IDE de mais de 18 anos... só traz limites... limites de técnicas de programação, limites de tecnologia, limites de interface, de plataforma, etc.... Do ponto de vista de negócios.. é estratégico evoluir para uma nova IDE.. isso DEVE ser planejado e constar no "RoadMap" do produto da empresa... caso contrário o produto (o sistema), ficará preso as limitações da antiga IDE... Sabemos que a decisão é difícil e que irá incomodar muitos usuários do ACBr... mas há tempos já adiamos essa decisão, e agora chegou a hora...

Vou deixar minha experiência, eu migrei do D7 para D2007, depois Delphi 2010, e então XE7, XE8 e agora Seattle, porque estás versões? Porque segui a linha do que era estável para mim, agora com as versões XE7 em diante basta recompilar o projeto, não tem segredo. Quando migrei de D7 para D2010 eu tinha essa mesma cabeça de não mudar porque daria trabalho, era milhões de linhas de código para revisar, centenas de tabelas em um BD Firebird e muita, muita regra de negócio, mas não foi um bicho de 7 cabeças. O ganho com o uso de novas versões foi enorme, hoje o Delphi e Lazarus suportam muitos features de linguagem que o D7 nem sonha ter, coisas que facilitam em muito o dia-a-dia, principalmente para quem pensa em programar multi-plataforma e suportar mobile. A dificuldade sempre vai existir, isso é um fato, migrar um sistema não é fácil quando se vem de uma linguagem muito antiga, mas manter Delphi 7 só tem atrasado o projeto ACBr, sempre que vamos fazer algo temos que pensar na limitações do Delphi 7 e nivelar por ela, isso traz transtornos enormes, um exemplo foi alguns dias atrás quando fui implementar a API IBPT no componente ACBrIBPTax, o retorno a API é em JSON uma tecnologia extremamente corriqueira é que é usada em tudo que diz respeito a troca de informações web, mas o Delphi 7 não tem suporte nativo, já Lazarus e versões mais novas do Delphi sim, tive que implementar uma leitura básica de JSON para suprir a necessidade do Delphi 7 para que não tivéssemos que agregar bibliotecas de terceiros e inchar o ACBr com mais uma biblioteca. Este é um exemplo simples, imaginem todo o resto que temos que passar, leitura de XML, listas e afins que já são suportados nativamente em versões mais novas e temos que sermpre fazer tudo manualmente por conta de limitações do D7. Seu problema é dinheiro, acha caro uma nova versão do Delphi, o Lazarus é tão bom quanto, fora a IDE, ele suporta tudo que uma versão de Delphi mais nova suporta e é GRÁTIS e praticamente idêntico ao Delphi 7 em termos de funcionalidades e IDE.

Vc leu a NT que te passei? Vc viu que o processo é o mesmo e oq muda é que agora ao invés de ter um webservice especifico como o DPEC, o EPEC usa EVENTOS? Sobre Eventos... Vc deve saber que o processo é o mesmo que a Carta de Correção.... Dae lendo a NT vc saberá oq preencher. Mas pelo visto vc deve estar com pressa no seu sistema para ler a NT e descobrir como preencher no componente, entao segue o código do envio do EPEC no meu sistema, basta adaptar: ... loACBrNFe.EventoNFe.idLote := StrToInt(lID); with loACBrNFe.EventoNFe.Evento.Add do begin lDataHora := now; lDataHora := DateUtils.IncMinute(lDataHora,-1); infEvento.dhEvento := lDataHora; infEvento.tpEvento := teEPECNFe; infEvento.cOrgao := 35; infEvento.detEvento.cOrgaoAutor := loACBrNFe.NotasFiscais.Items[0].NFe.Ide.cUF; infEvento.detEvento.tpAutor := taEmpresaEmitente; infEvento.detEvento.verAplic := loACBrNFe.NotasFiscais.Items[0].NFe.Ide.verProc; infEvento.detEvento.dhEmi := loACBrNFe.NotasFiscais.Items[0].NFe.Ide.dEmi; infEvento.detEvento.tpNF := loACBrNFe.NotasFiscais.Items[0].NFe.Ide.tpNF; infEvento.detEvento.IE := loACBrNFe.NotasFiscais.Items[0].NFe.Emit.IE; infEvento.detEvento.dest.UF := loACBrNFe.NotasFiscais.Items[0].NFe.Dest.EnderDest.UF; infEvento.detEvento.dest.CNPJCPF := loACBrNFe.NotasFiscais.Items[0].NFe.Dest.CNPJCPF; if (trim(loACBrNFe.NotasFiscais.Items[0].NFe.Dest.IE) <> '') and (UpperCase(trim(loACBrNFe.NotasFiscais.Items[0].NFe.Dest.IE)) <> 'ISENTO') then infEvento.detEvento.dest.IE := loACBrNFe.NotasFiscais.Items[0].NFe.Dest.IE; infEvento.detEvento.vNF := loACBrNFe.NotasFiscais.Items[0].NFe.Total.ICMSTot.vNF; infEvento.detEvento.vICMS := loACBrNFe.NotasFiscais.Items[0].NFe.Total.ICMSTot.vICMS; infEvento.detEvento.vST := loACBrNFe.NotasFiscais.Items[0].NFe.Total.ICMSTot.vST; end; loACBrNFe.EnviarEventoNFe(StrToInt(lID)); ... []´s

Boa tarde Walter, Primeiramente leia todo o tópico. Segundo o ACBrNFe possui a opção para realizar o Download do XML e até o momento qualquer pessoa pode realizar o Download. Com a nova versão 3.10 isso vai acabar, pois a mesma vai possui um grupo chamado <autXML> onde podemos incluir os CNPJ ou CPF das pessoas autorizadas a realizar o Download, fora as já especificadas ou seja: Emitente, Destinatário e Transportadora.