Painel de líderes

Bom dia Italo, Atualizei meu repositório para a revisão 11322 hoje e problema continou acontecendo. Na unit ACBrUtil, metodo NativeStringToUTF8 é chamado o "SetCodePage(RBS, 0, False);" que altera a string "CONSULTAR NÃO ENCERRADOS" para "CONSULTAR NÃO ENCERRADOS", alterei para "SetCodePage(RBS, 0, True);" e problema não acontece. Testei a emissão e cancelamento de algumas notas, fiz consulta de status dos serviços e está tudo funcionando. Obs.: Uso Delphi XE7.

https://www.invisionpower.com/ Vou marcar o oftalmologista. Ou teria que marcar algum para tratar a ansiedade, kkkkkkk. De qualquer forma obrigado !!!!

Se vc estiver usando Delphi XE7+ usa os componentes da REST.* Vc vai precisar 3 componentes: REST: TRESTClient; Request: TRESTRequest; Response: TRESTResponse; E vai montar o código parecido com esse: REST.BaseURL := ' http://cosmos.bluesoft.com.br/api'; Request.Client := REST; Request.Response := Response; Request.Method := rmGet; Request.Resource := '/gtins/{codigo}'; Request.Params.AddHeader('X-Cosmos-Token', 'SEU_TOKEN'); Request.Set Params.ParameterByName('codigo').Value := 'GTIN_DO_PRODUTO'; Request.Execute; if (Response.StatusCode = 200) then begin Meu_Objeto_Que_Representa_o_JSON_do_Cosmos := Meu_Parser_De_Json_Para_Algo_Que_Meu_Sistema_Entende(Response.JSONValue); end; Meu_Parser_De_Json_Para_Algo_Que_Meu_Sistema_Entende Aqui vc pode usar xSuperObject como o Renato falou ou outra biblioteca que lê JSON. Recomendo usar as do próprio Delphi System.JSON. Meu_Objeto_Que_Representa_o_JSON_do_Cosmos Aqui pode ser algo que o seu sistema conheça, um Objeto, um DataSet. Algo que represente o retorno do Cosmos. Um pequeno exemplo pra vc pegar valores do retorno do Cosmos usando a System.JSON: ResponseCosmos: TJSONValue; // Para pegar a description que está de exemplo no site: ResponseCosmos.GetValue<TJSONString>('description').Value; // Para pegar a o code do NCM que está de exemplo no site: ResponseCosmos.GetValue<TJSONObject>('ncm').GetValue<TJSONString>('code').Value; ResponseCosmos.GetValue<TJSONObject>('ncm').GetValue<TJSONString>('description').Value; ResponseCosmos.GetValue<TJSONObject>('ncm').GetValue<TJSONString>('full_description').Value; // Note que os Parametros estao em minusculos, é CASESENSITIVE...

Caros deve ser de conhecimento comum que a tabela CEST mantem relacionamento para muitos e ate para todos. Pensei em algumas soluções e fui obrigado a pegar a tabela CEST e passar para TXT separado por (;) para depois para SQL Como o ACBr me ajuda muito, mesmo não sendo mais usuário do SAC, quero poder contribuir. Abraços a todos e parabéns a todos do ACBr. CEST12a.txt

Boa tarde Paulo, O Fortes Report é Free e o ACBr possui componentes para imprimir o DANFE da NF-e e NFC-e usando esse Report.

Aqui rodou os três testes. Quando sobrar um tempo vou te propor uma alteração nesses testes. Mas por enquanto acredito que já podemos encerrar esses tópico.

obrigado

Eu faria o seguinte, se houver mais de um CEST mostre uma tela com todos os CEST para aquele NCM e deixe o usuário escolher. Por experiência própria, fazer tudo automaticamente pelo cliente, gera problemas e inconvenientes.

Boa tarde a todos, O componente ACBrNFe possui um método chamado DistribuicaoDFe que visa baixar as NF-e. Por favor leiam a Nota Técnica 2014/002 versão 1.01 Acredito que futuramente teremos algo semelhante para o CT-e.

O correto vai ser como abaixo , mas só a partir de 01/06/2016 que vai entrar CSOSN 400 , no leiaute 0.07 <ICMS> <ICMSSN102> <Orig>0</Orig> <CSOSN>400</CSOSN> </ICMSSN102> </ICMS> As alterações serão incorporadas na versão 0.07 do leiaute do CF-e-SAT a ser publicada pela SEFAZ. Nova redação, efeitos a partir de 01.06.16. Tributação do ICMS: pelo SIMPLES NACIONAL e CSOSN=102, 300, 400, 500

Na NFCe, não pode mesmo ter este bloco ICMSUFdest. este bloco é exclusivo para consumidor final, fora da UF do emitente. e NFCe NÃo permite emitir NFCe para fora da UF. ou seja, é apenas para dentro da própria UF do emitente. Então programe para que este bloco não seja inserido na NFCe.

Sugestão abre os arquivos no bloco de notas, altera as referencias remove os componentes e abre que vai funcionar seu projeto!

Olá @Dércio Luis Zanatta, @Agnaldo Prates e @Juliomar Marchetti e quem mais possa interessar. Consegui resolver os problemas referentes ao arquivo ACBRNFeServicos.ini da seguinte forma: Apaguei o arquivo ACBRNFeServicos.res que está na pasta \ACBr_trunk2\Fontes\ACBrDFe\ACBrNFe acessei o prompt do DOS estando dentro da pasta \ACBr_trunk2\Fontes\ACBrDFe\ACBrNFe, recompilei o arquivo ACBrNFeServicos.rc utilizando o comando BRCC32.EXE ACBRNFEServicos.rc O Delphi gerará um novo arquivo .res na pasta, copiei este novo arquivo gerado para a pasta \ACBr_trunk2\Lib\Delphi\LibD7 e agora está tudo funcionando perfeitamente sem a necessidade de enviar o arquivo .ini para o cliente. Concluo então que, diferente do que eu havia dito, o arquivo ACBrNFeServicos.ini está sim atualizado, porém o arquivo ACBrNFeServicos.res não é recompilado durante a instalação do componente. Agradeço pela atenção e desejo uma boa semana a todos.