Oi pessoal, pra resolver o meu problema mudei a unit ACBrECFDaruma na função:
function TACBrECFDaruma.GetTotalSubstituicaoTributariaISSQN: Double;
begin
Result := 0;
if fpMFD then
Result := StrToFloatDef(Copy(RetornaInfoECF('003'), 286, 13),0)/100;
Result := RoundTo( Result, -2);
end;
Para:
function TACBrECFDaruma.GetTotalSubstituicaoTributariaISSQN: Double;
begin
Result := 0;
if fpMFD then
Result := StrToFloatDef(Copy(RetornaInfoECF('003'), 286, 13),0)/10;
Result := RoundTo( Result, -2);
end;
Se alguém puder validar e atualizar o fonte se a alteração for correta, agradeço !
William