Painel de líderes

Bom dia pessoal! No dia 29/11/2023 foi publicado no Diário Oficial o Decreto Nº 599 de 28 de Novembro de 2023. A publicação adiciona novos incisos no decreto que regulamentou ICMS em 2014. Um dos novos incisos tem a seguinte redação: De maneira resumida, os novas adições instituem a vinculação dos pagamentos eletrônicos ao emissor de NF-e e NFC-e, de maneira semelhante ao que foi feito no estado do Rio Grande do Sul. (Para mais detalhes veja o tópico Sefaz do RS pode obrigar TEF integrado a aplicação. A matéria ainda será regulamentada pela Sefaz do MT e deverá ser publicada ainda este ano, com os detalhes técnicos e calendário de obrigatoriedade

@willian_delan Reportando. Falando com o time de boletos, como só existe a inclusão a tk esta congelada aguardando a conclusão do banco ref as outras funções, como baixa, alteração e principalmente consulta de titulos. Nós entendemos que casa API tem um comportamento, mas está não tem o mínimo para subirmos nem uma consulta, mas os usuários (clientes dos desenvolvedores) não entendem certas situações. Exemplo disso o bancoob q nao tem consulta em lista instantanea. que tem muitas reclamações. (mas q segundo bancoob, estao analisando o caso)

Alexandre, Eu vou me informar melhor e em breve escrevo aqui.

Boa tarde Renato, É uma boa solução, mas seria interessante separar o código da mensagem. Já inclui na minha lista de tarefas para analise do problema. TK-4807

Pessoal Consegui emitir nota com a configuração Parece que está solucionado o problema. 3 - Optante - Microempresa ou Empresa de Pequeno Porte (ME/EPP); 1 – Regime de apuração dos tributos federais e municipal pelo SN; 0 -Tipos de Regimes Especiais de Tributação

Basta ter o java instalado XmlSoma.jar

Boa tarde, Criada a TK-4805 para avaliação. Obrigado.

Opa, segue o XML, temporariamente resolvi assim: if (Codigo <> '00001') and (Codigo <> '00001 - Sucesso') then begin 1473-lista-nfse-ger.xml

teste essa rotina procedure Base64ToPNG(base64String: string; outputPath: string); var dataPos: Integer; stream: TBytesStream; png: TPngImage; begin // Encontre a posição da primeira vírgula (',') na string base64 dataPos := Pos(',', base64String); // Verifique se a vírgula foi encontrada e, em seguida, remova o prefixo if dataPos > 0 then Delete(base64String, 1, dataPos); // Crie um stream de bytes a partir da string base64 decodificada stream := TBytesStream.Create(DecodeBase64(AnsiString(base64String))); try // Crie uma imagem PNG a partir do stream png := TPngImage.Create; try stream.Position := 0; // Certifique-se de que o stream está no início png.LoadFromStream(stream); // Salve a imagem PNG no arquivo desejado png.SaveToFile(outputPath); finally png.Free; end; finally stream.Free; end; end;

Olá boa tarde, mas é exatamente isso, o Funrural depois de calculado vai diminuir no total da nfe. Então se por ventura a NFe de Entrada for de Venda de Bovino para um Frigorífico no valor de R$1000 e o funrural for 1.5%, calcula-se o funrural que será R$15.00. o Total da nota será os 1000 - 15 = 985,00. Espero ter ajudado!

Boa tarde, A alteração nos componentes do ACBr é simples e com certeza será realizada. Porém é preciso uma informação mais específica de quando a mudança vai ocorrer para podermos aplicar as alterações. Se tiver os links dos webservices novos também facilita a atualização. Obrigado

Boa tarde, Criada a TK-4801 para avaliação. Obrigado pela contribuição.

ITALO, HOJE FIZ O TESTE E FUNCIONOU, A NOTA NACIONAL FOI ENVIADA, SEM ERROS! ABRACOS

Obrigado. Éra a configuração que estava errada mesmo.

Bom dia Osmar, Você poderia anexar o XML de retorno para que possamos analisar e fazer os devidas correções?

Bom dia, concordo plenamente Renato, porém no codigo está assim: Codigo := ObterConteudoTag(ANodeArray[I].Childrens.FindAnyNs('codigo'), tcStr); AMSG := ACBrStr(ObterConteudoTag(ANodeArray[I].Childrens.FindAnyNs('Mensagem'), tcStr)); { Codigo = 00001 significa que o processamento ocorreu com sucesso, logo não tem erros. } if Codigo <> '00001' then begin .... end; Nesse caso teria que comparar assim: if Codigo <> '00001 - Sucesso' then begin .... end;

o problema esta na interpretação do base64: data:image/png;base64,PD94bWwgdmVyc2lvbj0iMS4wIi... data: é o tipo de arquivo, que no caso é image/png base64, é o tipo de configuração. resumindo vc precisa decodificar o texto depois de: "data:image/png;base64," (PD94bWwgdmVyc2lvbj0iMS4wIiBlbmNvZGluZz0i.....) esse texto:"data:image/png;base64," server para os navegadores conseguirem interpretar e renderizar o arquivo (png,jpg,pdf etc.)

Boa tarde pessoal! Conferindo no Portal da Nota Fiscal Eletrônica, é possível observar que consta contingência agendada para a Sefaz de Minas Gerais no dia 29/11/2023, com previsão de início ás 07h00 e término ás 08h30 do mesmo dia. Para utilizar o ACBr em contingência durante este período, siga às orientações deste tópico: Um agradecimento ao membro @Felipe Marianopor compartilhar a informação no canal #sefaz em nossa comunidade do Discord.

usando synapse: Var http: THTTPSend; sURLRedirect: string; Begin http := THTTPSend.Create; Try sURLRedirect := ''; HTTP.HTTPMethod('POST', 'SUAURL'); If (http.ResultCode = 301) or (http.ResultCode = 302) Then Begin HeadersToList(http.Headers); sURLRedirect := http.Headers.Values['Location']; sURLRedirect := Trim(sURLRedirect); End; If sURLRedirect <> '' Then HTTP.HTTPMethod('POST', sURLRedirect); Finally Begin http.Free; End; End; End;