=DSum("[pg_valorapagar]","[QryResumoPagamento]","[pg_datapagamento] is null" and pg_pedido= me!pedido)