Que hacer para Sumas parciales?

Tengo formularios dos columnas que he estado sumando con: DSUM aqui les va lo que hago:

if a=1 then

DoCmd.RunCommand acCmdSaveRecord

Me.parent!total_esperado= dsum("ingreso_esperado", "Detalle Produccion", "id_produccion=" & me.id_produccion & " ")

else

DoCmd.RunCommand acCmdSaveRecord

Me.parent!total_pastas= dsum("ingreso_esperado", "Detalle Producción", "id_producción=" & me.id_produccion & " ")

Endif

Total_esperado me graba cuando es 1: y Total_pastas si es otro diferente a 1 entonces si meto un valor donde a es 1 y luego 2 a la tercera cuando cambia de nuevo a un valor 1 la sumatoria que me hace es del total de los 3 valores ingresados y yo necesito que los valores sean independientes?