Ir para conteúdo
  • Cadastre-se

Agnaldo Prates

Membros
  • Total de ítens

    1.031
  • Registro em

  • Última visita

  • Days Won

    5

Tudo que Agnaldo Prates postou

  1. Serviço normalizado por aqui. Tudo indica que a pane era na Receita, mas o cenário mais grave é o silêncio do Estado. O painel apontava que a disponibilidade estava Ok, mas nenhuma NF-e passava. Essa falta de transparência e respeito com quem desenvolve precisa mudar urgentemente. Não dá para aceitar que milhares de programadores fiquem caçando erros invisíveis no código enquanto o fisco esconde suas próprias falhas técnicas.
  2. Já coloquei tentativas e nada. Em uma versão que não foi atualziada, está funcionando 100%, agora, depois que atualizei começou a oorrer erros no envio. TimeOut, já aumentei para 30.000 e nada. Deve haver alguma coisa nesta versão. Em um cliente, a pasta shemas aparece /servidor/nfe/Schemas/ e está configurado para \servidor\nfe\Shemas\ aí, dispara o erro que não foi encontrado o tiposBasico_v4.00.xsd.
  3. Provavelmente: Enviado o arquivo assinado e validado, a função enviar(nLote, True,false, false), assina e valida novamente. Observei que na segunda tentativa o xml é enviado. Fiquei sem entender.
  4. Antes que alguem pergunte acerca do teste no exemplo:
  5. Agnaldo Prates

    Erro de timeout

    Algum relato sobre o envio de NFe (ACBrNFe1.Enviar(nLote, False, True). Sistema estava funcionamento liso, de repente começou a parar no envio. Em Debug, timeout, no cliente nada acontece, ainda que tenha uma proteção: If Enviar(nLote, False, True) then // dados enviados. else ShowMessage('Erro'); Webservice RO, ambiente virtual RS.
  6. Tente assim: procedure TdtmSysMsg.AguardeForm(Formulario: TForm; Mensagem: string); var pngAguarde: TPanel; begin FimAguardeForm(Formulario); Mensagem := Mensagem + ' ...'; Screen.Cursor := crSQLWait; pngAguarde := TPanel.Create(Formulario); with pngAguarde do begin Name := 'pngAguarde'; Parent := Formulario; Align := alNone; BorderStyle := bsNone; Color := clSkyBlue; Font.Charset := DEFAULT_CHARSET; Font.Color := clWindowText; Font.Name := 'Tahoma'; Font.Size := 10; Font.Style := [fsBold]; ParentFont := False; ParentColor := False; ParentBackground := False; Caption := Mensagem; Height := 59; Width := (Length(Mensagem) * 9) + 40; Left := (Formulario.ClientWidth - Width) div 2; Top := (Formulario.ClientHeight - Height) div 2; BringToFront; Application.ProcessMessages; end; end;
  7. Acontece que esqueci de anexar a unit ACBrPIXUtil que adicionei também a função StringToPIXAmbiente. ACBrPIXUtil.pas ACBrPIXBase.pas
  8. AdicionACBrPIXBase.pasei a função: function StringToPIXTipoChave(const AString: String): TACBrPIXTipoChave; à unit ACBrPIXBase.pas em anexo.
  9. <ICMS51> <orig>0</orig> <CST>51</CST> <modBC>3</modBC> <vBC>1000.00</vBC> <pICMS>18.0000</pICMS> <vICMSOp>180.00</vICMSOp> <pRedBC>59.000</pRedBC> <vBCEfet>410.00</vBCEfet> <pDif>41.0000</pDif> <vICMSDif>73.80</vICMSDif> <vICMS>106.20</vICMS> </ICMS51> </ICMS> Talvez seja essa informação.
  10. Faz sentido sua observação. Ao analisar algumas legislações acerca do tema, há restrição expressa para que, em se tratando de agrotóxico não há permissão para que a NF-e contenha outro produto que não seja compatível com o tipo de carga. Em RO, por exemplo, o Decreto 13563/2008, estabelece o seguinte: Art. 19. É proibido o transporte de agrotóxicos e afins: (...) III – Juntamente com outro tipo de carga, salvo se houver compatibilidade entre os diferentes produtos transportados; e Portanto, é aconselhável analisar a legislação Estadual que pode vedar a inclusão de itens que não sejam da mesma categoria na NF-e.
  11. Eu salvo o flag do MDF-e autorizado e eventos de cancelamentos. Ai se o status do MDF-e estiver 0, calcela, se não, mensagem de alerta ao usuário da impossibilidade de cancelamento.
  12. Ao que parece, o NCM informado está caindo na regra ZF02-20, NT 2024.003, p.11, publicada em 11/03/2026, o NCM indicado não é defensivo agrícola, portanto, pelo o que se apresenta, trata-se de equívoco no NCM. https://www.nfe.fazenda.gov.br/portal/exibirArquivo.aspx?conteudo= cVstk1aziE=
  13. Possivelmente algum erro na sefaz, segundo os validadores, o XML é válido, embora esteja com evento de cancelamento. https://www.sefaz.rs.gov.br/NFE/NFE-VAL.aspx https://dfe-portal.svrs.rs.gov.br/NFE/ValidadorNfe
  14. Então, abaixo alguns tópicos e fontes acerca do tema. https://legislacao.fazenda.sp.gov.br/Paginas/RC22122_2020.aspx https://legislacao.fazenda.sp.gov.br/Paginas/RC20069_2019.aspx https://legislacao.fazenda.sp.gov.br/Paginas/art273.aspx https://legislacao.fazenda.sp.gov.br/Paginas/art274.aspx
  15. Como você mesmo afirma que possui o montante do desconto, basta pegar o total líquido e dividir pelo total do desconto: 2.100,00/210=10. No vDesc do item = RoundABNT( 3 x 0.1, 2), após, acumular o valor do desconto de cada item. Por fim, leva o total do desconto para o vDesc da tag total da NFe.
  16. CST60 não permite destaque do imposto. Se desejar destacá-lo, é necessário utilziar uma CST que permita, não parece ser o caso de redução para uso da CST70, parece sugestivo a utilização da CST10 para o seu caso.
  17. Cria uma VM se assim o desejar. Mas meu sistema é D2010 e está rodando liso com o ACBr atual e todas as funcionalidades. O qeu eu faço é atualziar o ACBr toda sexta-feira. Se der algum conflito, tenho o final de semana para solucionar.
  18. O @Juliomar Marchetti indicou as funções corretas que constam da unit, a função do IS pode ser que ja esteja lá, mas para mim ela está assim: Ao que parece, você precisa referenciar ambas. // unit pcnConversaoNFe function StrToCSTIS(const s: string): TCSTIS; function CSTISToStr(const t: TCSTIS): string; // unit ACBrDFe.Convereao function StrToCSTIBSCBS(const s: string): TCSTIBSCBS; function CSTIBSCBSToStr(const t: TCSTIBSCBS): string; function CSTICMSToStr(const t: TCSTIcms): string; function StrToCSTICMS(const s: string): TCSTIcms; function StrToCSOSNIcms(const s: string): TCSOSNIcms; function CSOSNIcmsToStr(const t: TCSOSNIcms): string; function StrToCSTPIS(const s: string): TCSTPIS; function CSTPISToStr(const t: TCSTPIS): string; function StrToCSTCOFINS(const s: string): TCSTCofins; function CSTCOFINSToStr(const t: TCSTCofins): string;
  19. Confira detalhadamente as tags do xml gerado, mas atenção especial às regras de negócio.
  20. Na minha configuração do ACBrNFe eu utilizo: NFE.DANFE.MargemInferior:=0.1; NFE.DANFE.MargemSuperior:=0.1; NFE.DANFE.MargemEsquerda:=0.1; NFE.DANFE.MargemDireita :=0.1; Funciona certinho no fastreport.
  21. Veja esssa nota da Sefaz SC. https://inventti.com.br/sefaz-sc-nf-e-nfc-e-ato-diat-74-2024-prorroga-obrigatoriedade-do-preenchimento-dos-campos-relacionados-ao-credito-presumido-de-icms/
  22. Tente assim. {Aqui lê todos os produtos e joga no ClientDataSet para depois fazer as verificações} // Na cláusula uses: // Vide Demo do ACBrNFe. { ACBrUtil.XMLHTML, ACBrNFe.Classes, ACBrNFe.EnvEvento, ACBrNFe.EventoClass, ACBrDFe.Conversao, pcnConversao, pcnConversaoNFe, ACBrNFe.XmlReader...} for iContItens := 0 to NotasFiscais.Items[0].NFe.Det.Count - 1 do begin cdsXML.Append; (...) With AcbrNFe1.NotasFiscais.Items[0].NFe.Det.Items[icontitens] do begin With Imposto do begin { Tags dos impostos } With ICMS do begin if ACBrNFe1.NotasFiscais.Items[0].NFe.Emit.CRT in [crtSimplesExcessoReceita, crtRegimeNormal] then cdsXMLcst.AsString := CSTICMSToStr(CST) else cdsXMLcst.AsString := CSOSNToStr(CSOSN); {demais campos do ICMS} end; end; end; cdsXML.Post; end;
  23. Vejo que muitas pessoas recorrerem ao reclame aqui. Um exemplo: https://www.reclameaqui.com.br/embarcadero/oferecem-um-produto-vitalicio-e-quando-precisa-usar-nao-pode-ativar_Mi7DVsxznpBr06Qk/ Caso não seja solucionado pelo canal alternativo, recomendo nesse caso uma interpelação judicial, infelizamente no seu caso, trara-se de descumprimento de acordo o que por consequencia viola o disposto na lei 8078/90. Duvido que não resolvam.
  24. Couvert Artistico e Valet para nfc-e? Não, NFS-e. Atenção que isso vai ter alterações na reforma tributária; Pode ser adicionado na observação, mas isso é um tema espinhoso, há debates infinitos sobre essa questão. Se a empresa emitir a NFC-e, vai constar d faturamento, e, segundo o STJ isso não deveria ocorrer. Mas isso é um caso para parecer jurídico. Gorjeta. Hoje, se ultrapassar 10% do valor da conta, deve fazer parte da BC do ICMS, devendo ser rateado o valor nos itens, se individual, CFOP 5929. Na RTC o limite alterou para 15%. Assim sendo, quem assina o balanço é o contador, é importante questioná-lo acerca destes "espinhos", porque, a gorjeta é do atendente, couvert do artista, já o valet, tando pode ser da própria empresa como de outra que explora o serviço. Cada caso é um, basta identificar isso, mas trata-se de prestação de serviços e assim, é NFS-e.
  25. Alíquota deve ser reduzida a zero. pRed = 100. Faça uma simulação oficial para saber exatamente como deve ficar o seu xml em: https://dfe-portal.svrs.rs.gov.br/Cff/ValidadorRtcNfe
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.