¿Como evitar error con Dsuma?

Saludos
Tengo una consulta en la cual quiero obtener el inventario diario, para esto estoy utilizando la función Dsuma, hace todo bien pero me acumula en todos los registros el mismo inventario, por ejemplo:
Id       IDH       IR
1        20        60
2        20        60
3        20        60
Yo quiero que me lo muestre de la siguente manera:
Id       IDH       IR
1        20        20
2        20        40
3        20        60
La función es la siguiente:
DSuma("[IDH]","Reporte Diario",[Id]<=[Id])