Arredondamento no Componente Provedor IPM

[Lfm_]

Boa Tarde,

o provedor IPM recebe na alíquota e no valor do ISS até 4 casas decimais, precisei alterar o componente neste caso, pois a alíquota vigente em uma cidade é de 4,3257%.

Podem por favor adicionar esta implementação no componente??

 

Alterei nestes pontos (unit: pnfsNFSeW_IPM, rotina: GerarListaServicos):

 if NFSe.Servico.ItemServico.Aliquota = 0 then
      Gerador.wCampo(tcDe4, '', 'aliquota_item_lista_servico', 1, 15, 1, NFSe.Servico.Valores.Aliquota, '')
    else
      Gerador.wCampo(tcDe4, '', 'aliquota_item_lista_servico', 1, 15, 1, NFSe.Servico.ItemServico.Aliquota, '');

 

if NFSe.Servico.Valores.ValorIssRetido > 0 then
      Gerador.wCampo(tcDe4, '', 'valor_issrf', 1, 15, 0, NFSe.Servico.ItemServico.ValorIss, DSC_VISS )
    else
      Gerador.wCampo(tcDe4, '', 'valor_issrf', 1, 15, 0, 0, DSC_VISS );

 

 

Obrigado,

Luiz

[Juliomar Marchetti]

anexe a unit alterada

[Lfm_]

Segue a unit

 

 

pnfsNFSeW_IPM.pas

[Italo Giurizzato Junior]

Boa tarde,

Vou incluir na minha lista de tarefas e assim que possível vou analisar a sua contribuição.

[Italo Giurizzato Junior]

Bom dia Luiz,

Muito obrigado pela colaboração, já enviei para o repositório.