СписокСчетовОстаткиПоСкладам = Новый СписокЗначений;
СписокСчетовОстаткиПоСкладам.Добавить(ПланыСчетов.Хозрасчетный.СырьеИМатериалы);
Запрос = Новый Запрос;
Запрос.Текст = "ВЫБРАТЬ
| ХозрасчетныйОстатки.Субконто1 КАК Номенклатура,
| ХозрасчетныйОстатки.Субконто2 КАК Склад,
| ХозрасчетныйОстатки.Счет,
| ХозрасчетныйОстатки.СуммаОстатокДт КАК Сумма,
| ХозрасчетныйОстатки.КоличествоОстатокДт КАК Количество
|ИЗ
| РегистрБухгалтерии.Хозрасчетный.Остатки(&ПарКонецПериода, Счет В (&ПарСписокСчетов), , ) КАК ХозрасчетныйОстатки
|ГДЕ
| ХозрасчетныйОстатки.СуммаОстатокДт > 0
| И ХозрасчетныйОстатки.КоличествоОстатокДт > 0";
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство. Фредерик Брукс-младший