Painel de líderes

O que é o ACBrPosPrinter e Esc/Pos ? Para quem ainda não conhece, o ACBrPosPrinter é o nosso componente para acesso a Impressoras de Bobinas, Não fiscais... Essas impressoras, denominadas Impressoras POS (Point of Sale), contemplam uma linguagem de impressão de linha, interna, onde podemos realizar tarefas como: Modificar os atributos de impressão Imprimir códigos de barras 1D e 2D (QRCode) Acionar dispositivos ligados a Impressora, como Gaveta de Dinheiro, Guilhotina Ler status da Impressora (Tampa aberta, pouco ou sem papel, etc) No mercado brasileiro, há vários modelos, que contemplam várias linguagens, como por exemplo: EscPos, EscBema, EscDaruma, etc... As linguagens são chamadas de "Esc", pois os comandos geralmente iniciam com o caractere não imprimível, ESC ou #27... Exemplo: se enviarmos para a Impressora a String: chr(27) + 'E' + chr(01), ligaremos o modo Negrito A grande maioria dos fabricantes, procurou seguir o padrão Epson, que é a marca mundialmente líder nesse segmento, e a sua linguagem Epson Esc/Pos... O componente ACBrPosPrinter suporta a grande maioria das linguagens e modelos existentes no mercado brasileiro... mas nem todos os recursos, estão disponíveis em todas as linguagens... Usar o ACBrPosPrinter é extremamente simples, e não requer o conhecimento de Esc/Pos... Através de suas Tags, você pode construir ricos relatórios, com várias formatações de fontes, alinhamento, Imagens, códigos de barra e QRCode... A título de Exemplo, usamos o próprio componente ACBrPosPrinter, para criar o Extrato do SAT, Unit ACBrSATExtratoESCPOS.pas e o DANFCe, unit ACBrNFeDANFeESCPOS.pas Se você usa o ACBrMonitorPLUS, poderá acessar o ACBrPosPrinter pelo objeto ESCPOS... Veja no manual: https://acbr.sourceforge.io/ACBrMonitor/ESCPOSImprimirTags.html Você pode baixar um Demo compilado do ACBrPosPrinter em: Você pode baixar uma Apresentação sobre o ACBrPosPrinter em: Se você não programa em ObjectPascal (Delphi/Lazarus), pode baixar a biblioteca (DLL) ACBrLibPosPrinter em: https://www.projetoacbr.com.br/forum/files/category/35-acbrlibposprinter/ Sobre a Impressão de Imagens no ACBrPosPrinter A muito tempo eu sentia falta dos seguintes recursos, no componente ACBrPosPrinter Impressão de Imagens Gravação e manipulação de Logos na memória da Impressora... Agora isso já é possível... Após muita pesquisa, e com a ajuda de vários outros artigos que encontrei na Internet (veja referência nos fontes), consegui implementar a Impressão de Imagens no modo "Raster Image"... Devido a característica desses equipamentos, apenas a impressão de Imagens monocromáticas é suportada. Existem vários sites de conversão de Imagem, para BMP Monocromático, on-line, como por exemplo: https://online-converting.com/image/convert2bmp/ Novos métodos no componente ACBrPosPrinter procedure ImprimirImagemStream(ABMPStream: TStream); // Permite Imprimir uma Imagem, no formato BMP Monocromático, de um Stream procedure ImprimirImagemArquivo(ArquivoBMP: String); // Carrega e imprime uma Imagem de um Arquivo. Em aplicações visuais (não console) será usado o Objeto TPicture, que permite carregar vários formatos de Imagem, podendo ser Colorida ou em Escala de cinza. A Imagem será convertida para BMP Monocromática. Entretanto, procure sempre usar Imagens BMP Moncromáticas, para evitar processamento desnecessário procedure ImprimirImagemRasterStr(const ARasterStr: AnsiString; AWidth, AHeight: Integer); // Imprime uma Imagem a partir de uma String no formato "Raster Image" (veja abaixo) procedure ImprimirLogo(AKC1: Integer = -1; AKC2: Integer = -1; AFatorX: Integer = -1; AFatorY: Integer = -1); // Imprime um Logo préviamente gravado na memória da Impressora. Se os parâmetros não foram informados, serão usados os valores de ACBrPosPrinter.ConfigLogo procedure GravarLogoStream(ABMPStream: TStream; AKC1: Integer = -1; AKC2: Integer = -1); // Grava uma Imagem de Logo, no formato BMP Monocromático, a partir de um Stream, nas posições informadas. Se os parâmetros não foram informados, serão usados os valores de ACBrPosPrinter.ConfigLogo procedure GravarLogoArquivo(ArquivoBMP: String; AKC1: Integer = -1; AKC2: Integer = -1); // Grava uma Imagem de Logo, a partir de um arquivo em Disco, nas posições informadas. Se os parâmetros não foram informados, serão usados os valores de ACBrPosPrinter.ConfigLogo procedure ApagarLogo(AKC1: Integer = -1; AKC2: Integer = -1); // Remove um Logo da memória da Impressora. Se os parâmetros não foram informados, serão usados os valores de ACBrPosPrinter.ConfigLogo Nova Tag de Bloco <bmp> - Imprime Imagem BMP monocromática. Conteúdo pode ser: Path da Imagem, Stream em Base64 ou AscII Art (0 e 1) Veja alguns exemplos de uso: Inicializa </zera>, define o alinhamento no centro </ce>, e efetua a impressão da Imagem em disco, no Path "C:\temp\acbrmono.bmp" </zera></ce><bmp>C:\temp\acbrmono.bmp</bmp> Imprimir uma Imagem de BMP Mono, codificada em Base64 <bmp> Qk3eDQAAAAAAAD4AAAAoAAAA+gAAAG0AAAABAAEAAAAAAKANAAAAAAAAAAAAAAIAAAAAAAAAAAAAAP///wD/////////////////////////////////////////wP/////////////////////////////////////////A/////////////////////////////////////////8D/////////////////////////////////////////wP4AAAAAAAAAAAAAAA8A8AAAAAAAAAAAAAAAAAAAAD/A/AAAAAAAAAAAAAAADwD4AAAAAAAAAAAAAAAAAAAAD8D4AAAAAAAAAAAAAAAPAHwAAAAAAAAAAAAAAAAAAAAHwOAAAAAAAAAAAAAAAA8APgAAAAAAAAAgAAAAAAAAAAHAwAAAAAAAAAAAAAAADwAfAAAAAAAAAcAAAAAAAAAAAcDAAAAAAAAAAAAAAAAPAA+AAAAAAAAfgAAAAAAAAAAAwIAAAAAAAAAAAAADgAQAB8AAAAAAAH+AAAAAAAAAAABAgAAAAAAAAAAAAACAAAABAAAAAAAAAAAAAAAAAAAAAEAAAAAADDvjnnNn489ngHw4zM+cPM/MD8w7PO4AAAAAAAAAAAAMN+e/c2fn7+/A/nzMz9x+z8wP7Hd27gAAAAAAAAAAAA/2ZnNzZ2YO7ODGxszf3ODOzAxsdx7uAAAAAAAAAAAABmZmc3Nj7gfs4cDGzN/c4MfMDO4ffu4AAAAAAAAAAAAH5mYzd2BmYOzBwObuzNzmxMwPzgdg7gAAAAAAAAAAAAfGb55+5+fHx4HAfP/Pn3zHzAzvvz7uAAAAAAAAAAAAA8AGAAAAAAAAAO4AAAAAAAAMDOAAAA4AAAAAAIAAAAADwAIAAAAAB4AA/AAAMAAAwAwPwAAA7gAAAABAgAAAAAAAAAAAAAAADwA4A+H/4AADwAAAAAAAAAAAAEDAAAAAAAAAAAAAAAAPAAAB//4AAAfAAAAAAAAAAAAAwOAAAAAAAAAAAAAAAA8AAAD/8AAAB4AAAAAAAAAAAAHA8AAAAAAAAAAAAAAADwAAAH/AAAAHAAAAAAAAAAAAA8D4AAAAAAAAAAAAAAAPAAAAPAAAAA4AAAAAAAAAAAAHwP4AAAAAAAAAAAAAAA8AAAAAAAAAHgAAAAAAAAAAAB/A/////////////////////////////////////////8D/////////////////////////////////////////wP/////////////////////////////////////////A/////////////////////////////////////////8D///////gAP///Af////gA//////+Af//4B///////wP///+AAeAB4AB4D+AAB/ADwAAAAf+B4AHgH///////A////4AA4AHgAHgfgAAB+APAAAAAH8HgAeAf//////8D////wADgAeAAeD4AAAB8A8AAAAAHweAB4B///////wP////AAPABwABw+AAAAB4DwAAAAAHx4AHgH///////A////+AA///AAPD4AAAAHwPAAAAAAPHgAeAf//////8D////4AB//8AA4eAAAAAHg8AAAAAAeeAB4B///////wP////wAH//wAHj4AAAAAeDwAAAAAB54AHgH///////A/////AAf/+AAePAAAAAA8PAAAAAADngAeAf//////8D////8AAAAAADx4AAAAAD48AAAAAAPeAB4D///////wP////wAAAAAAPHAAAAAAHjwAAAAAA94AHgP///////A/////gAAAAAA48AAP8AAOPAAP/gAB3gAeA///////8D////+AAAAAADjwAB/4AA48AA//AAH+AB4D///////wP////8AAAAAAe+AAP/wADzwAD/+AAf4AHgf///////A/////wAAAAAB/4AB8PgAPPAAOf4AB/gAeB///////8D/////AAAAAAP/AAHgfAAc8AA7zgAH+AB4H///////wP////+AAAAAA/8AA8A8AP7wAD/+AAd4AHg////////A/////4AAAAAD5wADgBwH/vAAP/4AD3gAeD///////8D/////wAH/AAePAAOAHB/+8AA//AAPeAA4P///////wP/////AAf8ABw8AA4Af/8DwAD/gAA54ADg////////A/////8AB/gAPDwAHgB//APAAAAAAHngAPH///////8D/////4AH+AA8PAAeAD+AA8AAAAAA+eAAf////////wP/////gAf4ADw8AB4APgADwAAAAAHx4AB/////////A/////+AA/gAf7wAHgAwAAPAAAAAA+HgAH////////8D/////8AD8AB//AAeAAAAA8AAAAAfweAAHP///////wP/////wAHwAH/8AB4AAAADwAAAAB+B4AAAf///////A//////gAfAA8fwAHgA4AAPAAAAAB8HgAAA///////8D/////+AB4ADwPAAOAH+AA8AAAAADweAAAD///////wP/////4ADgAeA8AA4Af/gDwAAAAAHh4AAAP///////A//////wAMAB4BwADgB//+PAAP/AAPHgAgAf//////8D//////AAwAHAHAAPAHP/+8AA/+AA8eACAB///////wP/////+ADAA8AcAAfx8A/7wAD/4ADx4AMAD///////A//////4AEADgB4AB//gAPPAAODgAHHgA4AP//////8D//////gAQAOAHgAD/+AA88AA8+AAeeADwB///////wP//////AAAB4AOAAH/gADjwAD/4AB5////////////A//////8AAAHgA8AAP8AAOPAAP/gAHn///////////8D//////wAAA8ABwAAAAAB48AA/wAAef///////////wP//////gAADwAHgAAAAAPDwAAAAABwAAH/////////A//////+AAAOAAOAAAAAA8PAAAAAAPAAAf////////8D//////8AAB4AA+AAAAAHg8AAAAAA8AAD/////////wP//////wAAHgAB4AAAAA8DwAAAAADgAAf/////////A///////AAA8AAD4AAAAHwPAAAAAA/AAD/////////8D//////8AADwAAPgAAAA+A8AAAAAD+AAP/////////wP//////4AAPAAAfgAAAHwDwAAAAAf4AB//////////A///////gAA4AAAfgAAB+APAAAAAHzwAP/////////8D///////AAHgAAA/gAAfwA8AAAAD/PgA//////////wP/////////8AAAB////8AD//////wfAH//////////A//////////wAAAB////gAP//////88A//////////8D//////////gAAAB///4AB////////4H//////////wP//////////AAAAAP/wAAHgAAAAB//w///////////A//////////+AAAAAAHAAA8AAAAAAf/n//////////8D//////////8AAAAAAcAAHwAAAAAAB////////////wP//////////4AAAAABwAAeAAAAAAAAf///////////A///////////wAAAAAHAADwAAAAAAAA///////////8D///////////gAAAAAcAAeAAAAAAAAH///////////wP///////////AAAAABwAD4AAAAAAAA////////////A////////////AAAAAHAAeAAAAAAAAH///////////8D///////////8AAAAAeAD4AAAAAAAA////////////wP///////////4AAAAB4APAAAAAAAAH////////////A////////////4AAAAHgB4AAAAAAAB////////////8D////////////wAAAAeAPAAAAAAAAP////////////wP////////////wAAAB4B8AAAAAAAD/////////////A/////////////gAAAHgHgAAAAAAAf////////////8D/////////////AAAAOA8AAAAAAAD/////////////wP/////////////AAAA4HwAAAAAAA//////////////A//////////////AAADgeAAAAAAAP/////////////8D//////////////AAAPHwAAAAAAD//////////////wP//////////////AAA8eAAAAAAA///////////////A///////////////AADz4AAAAAAH//////////////8D///////////////AAPeAAAAAAD///////////////wP///////////////gA/4AAAAAA////////////////A////////////////wD/AAAAAA////////////////8D////////////////wH4AAAAAP////////////////wP////////////////4fAAAAAH/////////////////A//////////////////8AAAAP/////////////////8D//////////////////8AAA///////////////////wP/////////////////////////////////////////A/////////////////////////////////////////8D/////////////////////////////////////////wA== </bmp> Imprimir uma Imagem, baseado em ASCII ART Na Unit ACBrImage.pas, do pacote ACBrComum, é onde a mágica acontece... essa Unit implementa os seguintes métodos function IsPCX(S: TStream; CheckIsMono: Boolean = True): Boolean; // Retorna True se o Stream contém uma Imagem em PCX function IsBMP(S: TStream; CheckIsMono: Boolean = True): Boolean; // Retorna True se o Stream contém uma Imagem em BMP procedure RasterStrToAscII(const ARasterStr: AnsiString; AWidth: Integer; InvertImg: Boolean; AscIIArtLines: TStrings); // Converte uma String codificada em "Raster Image", para ASCII ART procedure AscIIToRasterStr(AscIIArtLines: TStrings; out AWidth: Integer; out AHeight: Integer; out ARasterStr: AnsiString); // Converte uma String codificada em ASCII ART para "Raster Image" procedure BMPMonoToRasterStr(ABMPStream: TStream; InvertImg: Boolean; out AWidth: Integer; out AHeight: Integer; out ARasterStr: AnsiString); // Converte uma Imagem no formato BMP Monocromático, gravada em um Stream, para uma String codificada em "Raster Image" procedure RasterStrToBMPMono(ARasterStr: AnsiString; AWidth: Integer; InvertImg: Boolean; ABMPStream: TStream); // Converte uma String codificada e "Raster Image", para uma Imagem no formato BMP Monocromático, gravando-a em um Stream {$IfNDef NOGUI} procedure BitmapToRasterStr(ABmpSrc: TBitmap; InvertImg: Boolean; out AWidth: Integer; out AHeight: Integer; out ARasterStr: AnsiString; LuminosityThreshold: Byte = C_LUMINOSITY_THRESHOLD); // Apenas disponível se a aplicação não for console. converte uma Imagem de um TBitMap, para uma String codificada e "Raster Image" {$EndIf} Use a força, leia os fontes Não deixe de estudar os fontes do Projeto Demo, PosPrinterTeste, na pasta: \ACBr\Exemplos\ACBrSerial\ACBrPosPrinter\Delphi Nesse projeto há vários exemplos de como Imprimir Imagens, e manipular Logotipos, usando as Tags e Métodos do componente ACBrPosPrinter O que é o modo "Raster Image" ? O Modo Raster é um fluxo de Bytes que representam os Pixels da Imagem... https://pt.wikipedia.org/wiki/Raster Exemplo: Imagine a Seguinte imagem, de 16 x 16 Pixels... Se fôssemos representá-la em ASCII ART, teríamos: 1010101010101010 1010101010101010 1010101010101010 1010101010101010 1010101010101010 1010101010101010 1010101010101010 1010101010101010 1010101010101010 1010101010101010 1010101010101010 1010101010101010 1010101010101010 1010101010101010 1010101010101010 1010101010101010 Para transformá-la em Raster, agrupamos os Bits, em Bytes (8 bits)... portanto a primeira linha ficaria: Em Binário: 10101010 + 10101010 Em Hexa: AA + AA Em Decimal: 170 + 170 Então a String em Raster Image, da Imagem acima seria o equivalente a: #170+#170+#170+#170+#170+#170+#170+#170+#170+#170+#170+#170+#170+#170+#170+#170+#170+#170+#170+#170+#170+#170+#170+#170+#170+#170+#170+#170+#170+#170+#170+#170 Para imprimir uma String em Raster, é fundamental sabermos qual a largura em Pixels, da imagem A Epson disponibiliza utilitário, para converter imagens para o formato Raster: Epson BmpToRaster (o estudo do conteúdo do arquivo gerado por esse Utilitário, foi essencial na implementação dos métodos de ACBrImage)

Segue a ata da reunião. Ata das Reunião Sefaz RS Icms EFETIVO .docx

o ACBrInStore faz o trabalho de ler o codigo de barras através de mascaras da uma olhada no demo "...\Exemplos\ACBrDiversos\ACBrInStore\"

kkkkk, verdade.. fizeram um bem bolado de liberar aqueles schemas bugados.. Peço desculpas que eu acabei não comparando com os que vc tinha ajustado, achei que eles tivessem liberado mais alguma coisa, então por favor desconsidere...

Beleza, muito obrigado, vou fazer como voce me pediu e verificar !! Obrigado pela atenção

Isso depende da marca e modelo da impressora. Geralmente o manual explica como deve-se fazer, e não costuma ser muito complicado. Mas talvez, você deva adaptar seu programa para lidar com as duas maneiras, permitindo uma configuração para usar de uma ou outra forma.

Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.

apaguei os fontes e baixei tudo novamente e funcionou, coloquei a pasta na raiz tbm. Muito obrigado.

Confira o conteudo do CNPJ ( nrinscr ) informado. Pela mensagem é este o motivo do erro. Sucesso

Bom dia William, Você esta usando o programa exemplo para os seus testes? Veja que com ele, você marca o evento que deseja gerar ou gerar e enviar. Estude o programa exemplo.

Agradeço a atenção, já estou fazendo os testes e atualizando as dlls.

Aparentemente você não está enviando a mesma instrução que o ACBrPosPrinter... http://svn.code.sf.net/p/acbr/code/trunk2/Fontes/ACBrSerial/ACBrEscBematech.pas rocedure TACBrEscBematech.LerStatus(var AStatus: TACBrPosPrinterStatus); var B: Byte; Ret: AnsiString; begin try Ret := fpPosPrinter.TxRx( GS + #248 + '1', 5, 500 ); B := Ord(Ret[1]); if TestBit(B, 2) then AStatus := AStatus + [stImprimindo]; // Overrun if TestBit(B, 3) then AStatus := AStatus + [stOffLine]; if TestBit(B, 4) then AStatus := AStatus + [stImprimindo]; B := Ord(Ret[2]); if TestBit(B, 1) then AStatus := AStatus + [stPoucoPapel]; if TestBit(B, 2) then AStatus := AStatus + [stSemPapel]; if not TestBit(B, 4) then AStatus := AStatus + [stGavetaAberta]; if TestBit(B, 5) then AStatus := AStatus + [stSemPapel]; if TestBit(B, 6) then AStatus := AStatus + [stErro]; if not TestBit(B, 7) then AStatus := AStatus + [stTampaAberta]; except AStatus := AStatus + [stErroLeitura]; end; end;

verdade.. nem me toquei.

Bom dia, izaquesouza. Capicom está obsoleta, sugiro que altere para as configurações abaixo e refaça os testes: SSLCryptLib := cryWinCrypt; SSLHttpLib := httpWinHttp; SSLXmlSignLib := xsLibXml2; SSLType := LT_TLSv1_2;

Bom dia Thiago, Todos os provedores (empresas contratadas pelas prefeituras) que seguem a versão 2 do layout da ABRASF a principio disponibiliza o serviço de envio Síncrono. Neste caso não temos o serviço para consultar a situação do lote. O que temos é o Consultar Lote que se o lote enviado foi processado com sucesso, teremos como retorno o XML da NFS-e, caso contrario teremos a lista de rejeições. Estude o programa exemplo do componente ACBrNFSe.

Defina valores múltiplos de 1024... deve resolver o problema de Buffer Overflow da Daruma

Bom dia! RogérioHFB e Felipe.Pollux, poderiam por gentileza entrar em contato com o Suporte da Gertec no telefone 011 2575 1000 opção 1 para eles fazerem alguns testes remoto nos aparelhos? O post de vocês já foi passado para a Equipe e basta se identificar com membro do Fórum ACBr. Desde já agradeço. att. Wilmar Poli Gerente Comercial

Obrigado... já no SVN, rev: 16344

olá, Pessoal Ao gerar o PDF os DANFe fica dando mensagem ao tentar o PDF. Ha um erro nesta página,talvez o acrobat não exiba a pagina corretamente. Entre em contato com a pessoa que criou este documento. Usando o DanFeRL

Boa tarde! Segue alteração para preencher corretamente a propriedade ArquivoPDF nas gerações de PDF de CT-e e MDF-e com FastReport. Obrigado. ACBrCTeDACTEFR.pas ACBrMDFeDAMDFEFR.pas

Mais dois, importante passar pra um advogado analisar. 9001052-49.2019.8.21.0001(CNJ) - BELSHOP PERFUMARIA E COSMÉTICA LTDA (Giovanni Strmer Dallegrave 78867/RS, Luis Alberto Buss Wulff Junior 70812/RS, Pedro Wulff Schuch 111165/RS). Decisões:(...) Ante o exposto, DEFIRO EM PARTEA LIMINAR requerida por BELSHOP - PERFUMARIA E COSMÉTICA LTDA (matriz e filiais)para suspender os efeitos do Decreto Estadual 54.308/2018 de 01 de janeiro de 2019 a 05 de fevereiro de 2019.Oficie-se à SEFAZ. Intime-se. A impetrante deverá protocolar o ofício na SEFAZ, devendo comprovar o protocolo. 9000323-23.2019.8.21.0001(CNJ) - CASSOL MATERIAIS DE CONSTRUÇÃO LTDA (Gabriel Lopes Moreira 57313/RS). Decisões: Vistos. (...) 3. Em face do exposto, DEFIRO o pedido de tutela de urgência para afastar, em relação à empresa demandante, os efeitos do Decreto n. 54.308/2018, no tocante à complementação do ICMS-ST. Intime-se.Oficie-se à Secretaria da Fazenda do Estado do Rio Grande do Sul para cumprimento da medida. 4. Tratando-se de feito em que é parte a Fazenda Pública, justifico a não designação de audiência de conciliação ou mediação prevista no art. 334 do NCPC, porque manifesta a impossibilidade de transigir, de plano, nas ações que envolvem interesse público, com exceções que serão observadas. Ressalto que tal providência não trará prejuízo às partes, ao contrário, agilizará o andamento do processo e atenderá os critérios de economia processual e celeridade - princípios que devem nortear as demandas de direito público. (...) Ofício à disposição para impressão e encaminhamento, devendo a parte autora comprovar o protocolo do ofício nos autos.

Boa tarde Mauricio, Muito obrigado pela colaboração, mas os seus fontes estão desatualizados. Favor atualizar todos os fontes de todas as pastas, reinstale usando o ACBrInstall_Trunk2 marcando a opção para apagar os arquivos antigos. E veja como eu fiz na unit que gera o XML para o Equiplano, não há necessidade de se criar mais uma propriedade.

Essa era a minha preocupação mesmo... Acabei de atualizar os fontes e pelos testes está tudo certo agora. Muito obrigado pela atenção.

Obrigado, Daniel, pelas observações. Repassarei suas sugestões. Obrigado pela atenção.

A propriedade VersaoStr é usada na montagem dos XML então alterar o retorno causaria invalidação dos arquivos. Enviei correção para o repositório, rev. 16351, favor reverter as suas alterações, atualizar os fontes e testar novamente.

O seu diretório onde está localizada a pasta do ACBr está muito grande...Baixe novamente os fontes, colocando na raiz do C, tente refazer o processo que te falei acima.

Segue em anexo a unit modificada. pcnLeitor.pas

Bom dia Italo, Muito obrigado, era isso mesmo, estava sendo inserido um regime de tributação incorreto!

Eu encaminhei um email para sefaz e eles me responderam que estava em manutenção mesmo.. mas já tinha resolvido. Imagino que vc irá conseguir agora.

Aqui está os arquivos, agradeço. 3050-env-lot.xml 3050-rec.xml 291200009223565-ped-rec.xml 291200009223565-pro-rec.xml 29190127361739000185550010000024291000024290-nfe.xml NFe-Temp.xml

Bom dia Leo, O grande problema é que os provedores disponibilizam um Schema para que possamos validar o Lote de RPS antes do seu envio, mas o schema usado pelo validador do webservice é outro. Segundo o Schema disponibilizado pelo provedor entre o grupo <Tomador> e o elemento <OptanteSimplesNacional> temos: <xsd:element name="Tomador" type="tcDadosTomador" minOccurs="0" maxOccurs="1" /> <xsd:element name="Intermediario" type="tcDadosIntermediario" minOccurs="0" maxOccurs="1" /> <xsd:element name="ConstrucaoCivil" type="tcDadosConstrucaoCivil" minOccurs="0" maxOccurs="1" /> <xsd:element name="RegimeEspecialTributacao" type="tsRegimeEspecialTributacao" minOccurs="0" maxOccurs="1" /> <xsd:element name="OptanteSimplesNacional" type="tsSimNao" minOccurs="1" maxOccurs="1" /> Note que os grupos: <Intermidiario>, <ConstrucaoCivil> e o elemento <RegimeEspecialTributacao> que aparecem na mensagem de rejeição, segundo o Schema são opcionais. Mas como dito antes, o Schema usado no webservice exige que o elemento <RegimeEspecialTributacao> seja obrigatório. Sendo assim informe o Regime Especial de Tributação que as chances do RPS ser aceito é grande.

Bom dia Italo, eu não consegui enviar apenas um evento, tive que gerar todos para que o 2200 fosse enviado, atualmente estou utilizando o comando eSocial.Enviar(TESocialGrupo(rdgGrupo.ItemIndex + 1)); tem algum outro comando para enviar evento por evento? ou sou obrigado a ter os outros anteriores para enviar o S-2200?

Obrigado por reportar. Fechando. Para novas dúvidas, criar um novo tópico.

Bom dia João, Estamos analisando esse efeito colateral.

ACBrNFe1.NotasFiscais.LoadFromString(ClientDataSet1XML.Text ); ACBrNFe1.NotasFiscais.Items[0].GravarXML('C:\teste\teste.xml' ); deu erro

ok. obrigado

Paulo posso te dizer que alguns tokens isso acontece, normalnente fornecedores primarios, certsign, serasa, serpro isso nao ocorre. Ja verifiquei que esse comportamento independe de ser o acbr ou nao no proprio emissor gratuito se vc usar uma vez o a3 e nao fechar o emissor vc tera que mostrar sim o certificado mas ele nao vai te pedir senha , com alguns gerenciadoees de certificado isso nao acontece, vai te pedir a semha sempre. O que fazer se depende de terceiros ?!

Entendi, vou aguardar novidades então pelo site da sefaz; Obrigado!

Já resolvi pessoal, se o registro K200 não tiver nenhum registro ele dá esse erro, o que faz sentido, pois nesse caso é SemDados, quando acertei o filtro para trazer os registros corretos do banco de dados passou. No entanto, fica uma observação cabulosa quanto ao Delphi (o que não é o objetivo desse grupo), o if estava retornando false com informações anteriores e mesmo assim ele entrava. Mas isso fica para outro debate. Obrigado.

Boa tarde William, Acabei de fazer um teste usando o programa exemplo, o XML do evento 2200 foi gerado, assinado e validado com sucesso. Você esta com todos os fontes de todas as pastas atualizados? Reinstalou a Suite ACBr usando o ACBrInstall_Trunk2 com a opção: apagar arquivos antigos marcada? Configurou o programa exemplo para usar os schemas da pasta: ...\trunk2\Exemplos\ACBrDFe\Schemas\eSocial ?

bom tarde a todos sobre o Fortes notei o que o evento rlbItensServicoBeforePrint não estava vinculado ao dfm segue unit para correção abraços ACBrNFSeDANFSeRLRetrato.dfm

Notícias sobre prorrogação ou não ? Eles confirmaram nessa reunião que haveria essa prorrogação? Atenciosamente, Matheus

Bom dia.. voce teria de pedir essas informacoes, e adicionando cada percurso .

opensource. tu pode usar a vontade e se quiser contribuir com implementação também

Boa tarde @Italo Jurisato Junior Implementei a leitura do retorno do evento S-5013 OBS: falta apenas as classes referente a períodos anteriores. pcesConversaoeSocial.pas pcesRetConsultaLote.pas

RAW = crua Ele usa o Spool como túnel, para envio direto de comandos... os comandos não serão interpretados pelo spool, mas sim pela impressora...

Olá Gr@c@ Realmente alterei a rotina a poucos minutos, mudei o formato. Ao invés de passar '22' passei '00022' O problema deixou de ocorrer, acho estranho que já fazem alguns dias venho testando, enviei e encerrei mais de 50 MDF-e(s) no ambiente de homologação, sem problemas. Do nada começou a se comportar dessa forma mas agora está processando novamente. Forte Abraço.

Tente formatar para 022 ou preencha com 0 a esquerda até o tamanho max do campo

Mesmo problema aqui...