Can someone tell me what wrong with my dsem as the cbmonth is not working

=DSum("[AmountActual]","Sales Analysis","[Posting Date Period] = '" &
[cbmonth] & "'" And "Revenue stream divsion = 'Production'" And "Type =
'Actual'")