Agnaldo Prates

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.

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.

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.

Antes que alguem pergunte acerca do teste no exemplo:

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.

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;

Acontece que esqueci de anexar a unit ACBrPIXUtil que adicionei também a função StringToPIXAmbiente. ACBrPIXUtil.pas ACBrPIXBase.pas

AdicionACBrPIXBase.pasei a função: function StringToPIXTipoChave(const AString: String): TACBrPIXTipoChave; à unit ACBrPIXBase.pas em anexo.

<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.

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.

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.

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=

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

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

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.