' Запрос Поступило -> "SELECT ТаблицаПоступлений.Наименование, Sum(ТаблицаПоступлений.Количество) AS ИтогоПолучено FROM ТаблицаПоступлений GROUP BY ТаблицаПоступлений.Наименование"

' Запрос Продано -> "SELECT ТаблицаПродаж.Наименование, Sum(ТаблицаПродаж.Количество) AS ИтогоОтпущено FROM Продажи INNER JOIN ТаблицаПродаж ON Продажи.КодПродажи=ТаблицаПродаж.КодПродажи WHERE (((Продажи.СостояниеТовара)= '" & "2Резерв" & "')) OR (((Продажи.СостояниеТовара)=' " & "3Отгрузка" & "')) GROUP BY ТаблицаПродаж.Наименование"

' Запрос Остаток -> "SELECT Поступило.Наименование, [Поступило]![ИтогоПолучено]-[Продано]![ИтогоОтпущено] AS Остаток FROM Поступило INNER JOIN Продано ON Поступило.Наименование = Продано.Наименование"

Как в запрос "Остаток" закинуть два подчиненных запроса "Поступило" - "Продано"

Заранее благодарю ...

Было написано

Dim Поступило, Продано, Остаток, ОчисткаОстатка As String

Поступило = "SELECT ТаблицаПоступлений.Наименование, Sum(ТаблицаПоступлений.Количество) AS ИтогоПолучено FROM ТаблицаПоступлений GROUP BY ТаблицаПоступлений.Наименование"

Продано = "SELECT ТаблицаПродаж.Наименование, Sum(ТаблицаПродаж.Количество) AS ИтогоОтпущено FROM Продажи INNER JOIN ТаблицаПродаж ON Продажи.КодПродажи=ТаблицаПродаж.КодПродажи WHERE (((Продажи.СостояниеТовара)= '" & "2Резерв" & "')) OR (((Продажи.СостояниеТовара)=' " & "3Отгрузка" & "')) GROUP BY ТаблицаПродаж.Наименование"

ОчисткаОстатка = "DELETE ТОстаток.* FROM ТОстаток"
Остаток = "INSERT INTO ТОстаток ( Наименование, Остаток ) SELECT Поступило.Наименование, Поступило!ИтогоПолучено-Продано!ИтогоОтпущено AS Остаток FROM Поступило INNER JOIN Продано ON Поступило.Наименование = Продано.Наименование"

CurrentDb.Execute (ОчисткаОстатка)
CurrentDb.Execute (Остаток)


РЕЗУЛЬТАТА - ОШИБКА

"Ядро не может найти входную таблицу или запрос "Поступило" ...

Почему ?