Pesquisar na Comunidade
Showing results for tags 'padraonacional.gravarxml'.
Encontrado 1 registro
-
ACBR-8701 NFS-e nacional - Operação com benefício municipal
um tópico no fórum postou leonardo.gomes ACBrNFSe
Prezados, Para atender à operação de envio de DPS ao ambiente nacional em cenários com benefício fiscal, foi necessário realizar um ajuste pontual no método GerarXMLBeneficioMunicipal do objeto PadraoNacional.GravarXml.pas, de modo que seja enviada apenas a informação do campo nBM (Identificador do benefício parametrizado pelo município). Com o envio exclusivo desse campo, o próprio ambiente nacional passa a identificar corretamente qual alíquota deve ser aplicada, conforme a parametrização do benefício. - ALTERAÇÃO DE: function TNFSeW_PadraoNacional.GerarXMLBeneficioMunicipal: TACBrXmlNode; begin Result := nil; if NFSe.Servico.Valores.tribMun.nBM <> '' then begin Result := CreateElement('BM'); // Result.AppendChild(AddNode(tcStr, '#1', 'tpBM', 1, 1, 1, // tpBMToStr(NFSe.Servico.Valores.tribMun.tpBM), '')); Result.AppendChild(AddNode(tcStr, '#1', 'nBM', 14, 14, 1, NFSe.Servico.Valores.tribMun.nBM, '')); if NFSe.Servico.Valores.tribMun.vRedBCBM > 0 then Result.AppendChild(AddNode(tcDe2, '#1', 'vRedBCBM', 1, 15, 1, NFSe.Servico.Valores.tribMun.vRedBCBM, '')) else Result.AppendChild(AddNode(tcDe2, '#1', 'pRedBCBM', 1, 5, 1, NFSe.Servico.Valores.tribMun.pRedBCBM, '')); end; end; PARA: function TNFSeW_PadraoNacional.GerarXMLBeneficioMunicipal: TACBrXmlNode; begin Result := nil; if NFSe.Servico.Valores.tribMun.nBM <> '' then begin Result := CreateElement('BM'); // Result.AppendChild(AddNode(tcStr, '#1', 'tpBM', 1, 1, 1, // tpBMToStr(NFSe.Servico.Valores.tribMun.tpBM), '')); Result.AppendChild(AddNode(tcStr, '#1', 'nBM', 14, 14, 1, NFSe.Servico.Valores.tribMun.nBM, '')); if NFSe.Servico.Valores.tribMun.vRedBCBM > 0 then Result.AppendChild(AddNode(tcDe2, '#1', 'vRedBCBM', 1, 15, 1, NFSe.Servico.Valores.tribMun.vRedBCBM, '')) else if NFSe.Servico.Valores.tribMun.pRedBCBM > 0 then Result.AppendChild(AddNode(tcDe2, '#1', 'pRedBCBM', 1, 5, 1, NFSe.Servico.Valores.tribMun.pRedBCBM, '')); end; end; PadraoNacional.GravarXml.pas
