Добрый день, я тут впервые, хотелось бы получить помощь...Я не знаком со структурой SQL запросов, но по работе столкнулся со следующей проблемой. Есть исходная функция, которая расчитывает количество комплектов. В ней я убираю один пунт БОНУС# и она перестает расчитывать количество комплектов...
Function Кол_комплектов(Месяц, Год) As Integer
' посчитать кол-во комплектов
Кол_комплектов = 0
For d = 1 To ID(0)
strSQL = " SELECT DISTINCTROW [Бонус #1 (за отчетный период)], " & _
" Год, " & _
" Месяц, " & _
" [Дилер ID], " & _
" Count(*) AS [кол_во] " & _
" FROM вознаграждение " & _
" GROUP BY [Бонус #1 (за отчетный период)], " & _
" Год, " & _
" Месяц, " & _
" [Дилер ID] " & _
" HAVING ((([Бонус #1 (за отчетный период)])>0) AND " & _
" ((Год)=" & Chr(34) & CStr(Год) & Chr(34) & ") AND " & _
" ((Месяц)=" & Chr(34) & CStr(Месяц) & Chr(34) & ") AND " & _
" (([Дилер ID])=" & Chr(34) & CStr(ID(d)) & Chr(34) & "))"
Set таблица_вознаграждения = CurrentDb.OpenRecordset(strSQL, dbOpenDynaset)

If таблица_вознаграждения.RecordCount() > 0 Then
таблица_вознаграждения.MoveFirst
While Not таблица_вознаграждения.EOF
Кол_комплектов = Кол_комплектов + таблица_вознаграждения.Fields(4)
таблица_вознаграждения.MoveNext
Wend
End If
Next d
End Function
Я понимаю так, что Fields(4) влияет на расчет...? как это связано с запросом? помогите пожалуйста начинающему....

Ну если честно, данная проблема возникла у меня при обновлении базы данных...поэтому я подумал, может, кто и заинтересуется...