Painel de líderes

Com a inclusão da Unit ACBrImage.pas, a compilação da FMX, foi novamente quebrada... Efetuei vários ajustes e correções, para permitir a compilação em FMX... (já no SVN)

Certo, muito obrigado pela atenção.

Só uma ressalva muito importante mesmo. esse método é para a exceção e não a regra de baixar os xml, seus clientes devem exigir do fornecedor essas notas. muito importante é lembrar que por obrigação após a emissão ele deve disponibilizar por qualquer meio essas notas e não ficar dependente do sefaz, ao momento que começar a passar a validar os downloads de xml que está sendo na totalidade passará a ter implicações os clientes

Verifique se esse tópico ajuda.

Obrigado pela resposta, mas parece que o cliente achou a senha, ao menos não me contatou mais, se precisar anexo o ACBrMonitor.ini para me enviarem a senha em M.P. Por enquanto agradeço.

Respondendo diretamente a sua pergunta: Não no projeto ACBr. De vez em quando surge essa dúvida aqui no fórum. Você pode pesquisar outros tópicos que vai encontrar alguns usuários tentando montar algo similar. Mas um catálogo desses seria muito difícil de manter e causaria uma responsabilidade fiscal. Na verdade, até pra você isso pode ser uma responsabilidade fiscal. É por isso que existem empresas que são especializadas em fornecer isso passando dados de impostos e relacionados. Elas permitem que você integre seu sistema ao delas. Dois exemplos já mencionados aqui no nosso fórum são: http://www.mixfiscal.com.br/ https://cosmos.bluesoft.com.br/

Parabéns pelo empenho.

Boa tarde Renato, Muito obrigado pela colaboração, ainda hoje estarei enviando para o repositório.

Parece bem melhor... notei o mesmo caso em várias outras Units, e apliquei correções no SVN... rev:16359

Bom dia Faltou esta informação...anexe seu log do Monitor ou o ini com os dados do titulo, desta forma teremos todas as informações para lhe auxiliar. Att.

Você tem que fazer o login como software house no portal SGR-SAT. https://satsp.fazenda.sp.gov.br/COMSAT/Account/LoginSSL.aspx?ReturnUrl=%2fCOMSAT%2f

@Italo Jurisato Junior atualizei os fontes e verifiquei a parte do teste que foi ajustado com base no cnpj e na razao, deu certinho !! Obrigado

Bom dia Juarez, A unit que gera o XML de consulta ao webservice DistribuicaoDFe foi escrita conforme consta na Nota Técnica publicada pelo Encat e disponibilizada no Portal Nacional da NF-e, bem como a do CT-e e MDF-e. A rotina que estabelece a conexão com a SEFAZ é exatamente a mesma usada para todos os outros métodos (envio de lote, consulta, envio de eventos, ...). Me parece que a SEFAZ-RS possui um webservice particular para o DistribuicaoDFe, mas acredito que este seja apenas para os contribuintes do RS. Pode se que esses programas que você mencionou se utilizam desse webservice, tai uma coisa para se investigar. Peço que compare o XML gerado com o layout publicado na Nota Técnica, quem sabe cometemos alguma gafe. Outra coisa importante, o componente se utiliza do serviço DistribuicaoDFe disponibilizado pela SEFAZ-Virtual do Ambiente Nacional e os eventos de Manifestação do Destinatário também são enviados para a SV-AN.

Boa tarde.. As empresas que atendo tem 100% dos documentos com base no NSU. Se ocorrer algum erro de "salto de nsu" o sistema apresenta as lacunas e faz as baixas. Sim, ocorrem erros de comunicação com a sefaz (temporários), atrasos (sincronização sefaz estadual com ambiente nacional), certificados digitais, etc... tudo conforme previstos nas notas técnicas. Att. Leandro

Segue em anexo a unit modificada. pcnLeitor.pas

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)

obrigado... JMS Jr vou testar no cliente... depois dou um retorno

Se pegar outro caso, repare se no final da tela de consulta, onde tem a DATA e HORA de inclusão no ambiente nacional não está 01/01/1900 00:00:00. OS casos que já vi isso, ficava essa data inválida ali. Depois de alguns minutos após a consulta, essa data se corrige e a nota gera um NSU. Isso aí acontece a muito tempo. A maioria não percebe pois depois de algumas horas se resolve. Eu só percebo esse problema pois atuo com supermercados e muitos fornecedores emitem a nota e 15 minutos depois estão na porta do supermercado pra descarregar e daí a NFe não aparece pra lançar.

De acordo com o manual, após receber o status "SalvoEmArmazenamentoLocal", deve-se solcitar a digitação dos dados do pagamento e em seguida disparar a função EnviarDadosVenda, porém, esta precisa dos dados coletados pela função VerificarStatusValidador. Estes dados deverão ser inputados manualmente?

Ok, Obrigado.

A Correção estará disponível na versão semanal desta semana...

O que notei de errado no seu log, é que o arquivo TXT está sendo criado com o nome final (ENT.TXT)... e o correto seria criar primeiro um arquivo Temporário (ENT.TMP), e depois renomeá-lo para ENT.TXT, quando o arquivo estivesse terminado e fechado.. Isso caso várias vezes o seguinte erro no Log

obrigado Daniel.

Tópico relacionado:

Boa tarde Nesse caso vc está vendendo como atacadista e portanto deve informar as Tags da Base de cálculo do Icms ST Retido, Alíquota do ST Retido e Valor do ST Retido.. De onde tirar essa informações ? Até onde eu sei, vc deve armazenar em algum lugar a base de cálculo do Icms ST, alíquota do ICMS ST e valor do Icms ST da última compra que vc fez do produto (valores unitários). Dessa forma vc saberá o valor que deverá repassar como crédito para o seu cliente depois... Exemplo: Vc comprou da indústria 2 unidades do Produto x ... Isso gerou uma base de cálculo de ST de 100,00 a uma alíquota de 18 %... Valor do crédito do ICMS ST = 18,00.. Nesse caso, vc armazena para esse produto que a última compra gerou um crédito de : Base de cálculo ST 50,00 alíquota 18 % e valor do ST = 9,00 Agora vc vai vender uma unidade desse produto x para seu cliente que não é consumidor final... Deve-se informar Base de cálculo de ST Retido de 50,00 , alíquota de ST Retido de 18% e Valor do Icms ST Retido = 9,00 É importante ressaltar que não se deve armazenar o valor do Icms ST que consta na nota de compra da indústria, pois ele é apenas parte do crédito.. Ainda existe o Imcs Normal que vai fazer parte do crédito.. Eu aconselho sempre armazenar a base de cálculo e a alíquota e fazer um vezes o outro para chegar no valor de crédito, pois a base de cálculo do Icms ST que vem da indústria sempre contém as duas coisas ( Icms normal e Icms ST). Basta consultar uma NF de compra que foi emitida por uma indústria que da para ver essa questão. Até onde eu sei, seria isso...

Tranquilo @EduardoElias.... Família em 1o Lugar... Agradeço os testes

Como você definiu os valores de KC1 e KC2 ? Na Epson, por padrão eles são 32, 32 Veja que agora podemos programa o Logo e enviar BMPs diretamente a Impressora, usando o ACBrPosPrinter

Boa tarde.. Tente ver esses topicos para ver se ajuda. blz..

@BigWings foi falha minha, tentei achar a propriedade no componente antigo !! Obrigado pela ajuda mais uma vez !!

Perfeito Juliomar, tanta coisa deveria ser exceção e se torna regra....Sei da obrigatoriedade de disponibilização do XML pelo fornecedor, sempre muito comentada aqui no fórum. Mas o mercado é um pouco diferente e depois que um cliente teu visita outra empresa e vê funcionando 100% escanear barras/manifestação/download/importação fica um pouco complicado se justificar com este argumento. Se a sefaz evitar download na verdade que evite 100% também, pelo menos a regra do jogo se iguala. Obrigado por seu comentário e parabéns de novo a toda a equipe do ACBr, sempre atenciosa e interessada.

Izaque, O arquivo *-ped-rec-soap.xml é o que é enviado para a SEFAZ e portanto o outro é o retorno. Abre um chamado na SEFAZ-BA e anexa esses dois arquivos, pede para eles mostrarem no arquivo *-ped-rec-soap.xml onde esta o namespace que não se refere a NF-e ou que esteja fora do padrão.

Farei a comparação e a questão da SEFAZ-RS faz sentido, não custa nada fazer mais uma verificação, obrigado pelas dicas.

Bom dia... Aqui também funciona muito bem, com as mesmas ressalvas feitas pelo Leandro att.

poderia postar como fez? assim ajuda os colegas que ajudaram os demais aqui no fórum

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

Vou investigar um pouco mais Daniel com a sua observação.

Já estudou o demo do ACBrNFe? Trecho onde é informado o CST: Produto.Imposto.ICMS.CST := cst00; Produto.Imposto.ICMS.orig := oeNacional; Basta trocar para: Produto.Imposto.ICMS.CST := cst60; Produto.Imposto.ICMS.orig := oeNacional; Ou: var ok: Boolean; begin [...] Produto.Imposto.ICMS.orig := StrToOrig(ok, '0'); Produto.Imposto.ICMS.CST := StrToCSTICMS(ok, '60');

Boa tarde. Debates sobre o projeto de unificação da Nota Fiscal de Serviços Eletrônica já duram mais de seis anos. "No mês de dezembro de 2017, estava previsto que cidades como Rio de Janeiro (RJ), São Paulo (SP), Brasília (DF), Belo Horizonte (DF), Porto Alegre (RS), Maringá (PR) e Marabá (PA) começariam a testar a novidade, mas isso até o ano de 2018 não ocorreu." fonte:https://blog.sage.com.br/o-que-e-nfs-e-nacional/ Alguém tem alguma nova informação?

Boa tarde. Como disse o José M. S. Junior você deve atualizar as Units do ACBr ou atualizar o ACBrMonitor PLUS dependendo se usa versão compilada ou não. Os ajustes para a versão 3.0 entraram a partir de 31/08/2017. Verifique se atualizou tudo em relação ao CT-e.

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.

Boa tarde Allan, Muito obrigado pela colaboração, já esta no repositório.

Boa tarde, julio.correa. Uma forma é você rodar o INI em um computador com o ACBrMonitorPLUS no modo Debug.

Vamos mudar então o sub-fórum

Boa tarde a todos, Vamos cortar mais algumas gorduras, chegou a vez da Consulta ao Recibo. Tanto a unit que gera o XML de consulta bem como a que lê o retorno foram generalizadas e agora se encontram dentro da pasta PCNComum. Como nem tudo são flores, ocorreu quebra de código, abaixo um exemplo de correção a ser feita em suas aplicações: for i := 0 to (ACBrNFe.WebServices.Retorno.NFeRetorno.ProtNFe.Count - 1) do begin sDataHora := DateTimeToStr(ACBrNFe.WebServices.Retorno.NFeRetorno.ProtNFe.Items.dhRecbto); sProtocolo := ACBrNFe.WebServices.Retorno.NFeRetorno.ProtNFe.Items.nProt; sStat := IntToStr(ACBrNFe.WebServices.Retorno.NFeRetorno.ProtNFe.Items.cStat); sMotivo := ACBrNFe.WebServices.Retorno.NFeRetorno.ProtNFe.Items.xMotivo; sNotaFiscal := Copy(ACBrNFe.WebServices.Retorno.NFeRetorno.ProtNFe.Items.chNFe, 26, 3) + '.' + Copy(ACBrNFe.WebServices.Retorno.NFeRetorno.ProtNFe.Items.chNFe, 29, 3) + '.' + Copy(ACBrNFe.WebServices.Retorno.NFeRetorno.ProtNFe.Items.chNFe, 32, 3); MemoStatus.Lines.Add(' ' + sNotaFiscal + ' ' + sProtocolo + ' ' + sDataHora + ' ' + sStat + ' - ' + sMotivo); end; Alterar para: for i := 0 to (ACBrNFe.WebServices.Retorno.NFeRetorno.ProtDFe.Count - 1) do begin sDataHora := DateTimeToStr(ACBrNFe.WebServices.Retorno.NFeRetorno.ProtDFe.Items.dhRecbto); sProtocolo := ACBrNFe.WebServices.Retorno.NFeRetorno.ProtDFe.Items.nProt; sStat := IntToStr(ACBrNFe.WebServices.Retorno.NFeRetorno.ProtDFe.Items.cStat); sMotivo := ACBrNFe.WebServices.Retorno.NFeRetorno.ProtDFe.Items.xMotivo; sNotaFiscal := Copy(ACBrNFe.WebServices.Retorno.NFeRetorno.ProtDFe.Items.chDFe, 26, 3) + '.' + Copy(ACBrNFe.WebServices.Retorno.NFeRetorno.ProtDFe.Items.chDFe, 29, 3) + '.' + Copy(ACBrNFe.WebServices.Retorno.NFeRetorno.ProtDFe.Items.chDFe, 32, 3); MemoStatus.Lines.Add(' ' + sNotaFiscal + ' ' + sProtocolo + ' ' + sDataHora + ' ' + sStat + ' - ' + sMotivo); end; Notem que devemos trocar o ProtNFe por ProtDFe e chNFe por chDFe (não coloquei em negrito todos, mas acho que ficou claro).

Boa tarde, Note que recentemente foi feito um amplo refactoring nos DFes, o qual também foi documentando, inclusive antes mesmo de ser comitado. Alterações menores são sempre documentadas nos arquivos XXXchangelog.txt, os quais ficam na pasta dos fontes de cada componente. Att.

Fiz esta modificação neste arquivo... Até que funciona só que não estou conseguindo emitir a nota, vou te mandar dá uma verificada. É só substituir o arquivo em C:\ACBr\Fontes\ACBrDFe\ACBrNFe ACBrNFeWebServices.rar

encontrei mais uma que precisou de alteração: ACBrDFeWebService.pas

Solução interessante. O componente deve remover os caracteres não numéricos do RNTRC.

vBCST = Valor da base de cálculo do ST pICMSST = Percentual da alíquota aplicada vICMSST = Valor do ICMS ST o restante das informações como de costume, lembrando de informar o CST correto para a operação