Форумы HiProg.com - MS ACCESS, VBA, VB

ник: Кукамака

SELECT DOK_Prihod_TBL.Код_Товара, DOK_Prihod_TBL.Наименование, Sum(DOK_Prihod_TBL.Количество) AS Sum_Количество, Sum(DOK_Prihod_TBL.Колич_Расхода) AS Sum_Колич_Расхода, [Sum_Количество]-[Sum_Колич_Расхода] AS Итого FROM DOK_Prihod_TBL GROUP BY DOK_Prihod_TBL.Код_Товара, DOK_Prihod_TBL.Наименование;

Только т.к. в т-це вместо 0 есть Null, то добавь проверки:

SELECT DOK_Prihod_TBL.Код_Товара, DOK_Prihod_TBL.Наименование, Sum(DOK_Prihod_TBL.Количество) AS Sum_Количество, Sum(DOK_Prihod_TBL.Колич_Расхода) AS Sum_Колич_Расхода, IIf(IsNull([Sum_Количество])=True,0,[Sum_Количество])-IIf(IsNull([Sum_Колич_Расхода])=True,0,[Sum_Колич_Расхода]) AS Итого FROM DOK_Prihod_TBL GROUP BY DOK_Prihod_TBL.Код_Товара, DOK_Prihod_TBL.Наименование;