іе.Владелец + ) raquo ;;
КонецЕсли;
КонецЕсли;
СписокЭлементовМФ.ДобавитьЗначение(Значение,Представление);
ТабліцаМФ.ФлВкл=2;
КонецЕсли;
КонецПроцедури//ОбработкаПодбора
ДатаКонца=ПолучітьДатуТА ();
//ініціалізація списків
//ініціалізація змінних множинного фільтра
ТіпМФ.УдалітьВсе ();
ТіпМФ.ДобавітьЗначеніе ( одне з );
ТіпМФ.ДобавітьЗначеніе ( все крім );
ТабліцаМФ.УдалітьСтрокі ();
Поки ТабліцаМФ.КолічествоКолонок () gt; 0 Цикл
ТабліцаМФ.УдалітьКолонку (1);
КонецЦікла;
ТабліцаМФ.НоваяКолонка ( Тип );
ТабліцаМФ.НоваяКолонка ( Вид );
ТаблицаМФ.НоваяКолонка(laquo;ИмяПеременнойraquo;);
ТаблицаМФ.НоваяКолонка(laquo;СписокЭлементовraquo;);// Список елементів,
за якими робимо фільтрацію
ТабліцаМФ.НоваяКолонка ( ТіпМФ );// Поточна рядок списку
ТіпМФ
ТаблицаМФ.НоваяКолонка(laquo;ФлВклraquo;,laquo;Числоraquo;,1,,laquo;Вклraquo;,5,,);// Фільтр
включений ( 1 або 0 )
ТаблицаМФ.НоваяКолонка(laquo;Представлениеraquo;,,,,laquo;Вид фільтра: );
ТаблицаМФ.ВыводитьПиктограммы(laquo;ФлВклraquo;);
//тип вид змінна назва
глДобавитьВТаблицуМФ(ТаблицаМФ,laquo;Справочникraquo;,laquo;Товарыraquo;,
Номенклатура raquo ;, За номенклатурою );
глДобавитьВТаблицуМФ(ТаблицаМФ,laquo;Справочникraquo;,laquo;Организацииraquo;,
Постачальник raquo ;, За постачальникам );
глДобавитьВТаблицуМФ(ТаблицаМФ,laquo;Справочникraquo;,"ЗначенияСвойст
в laquo ;, Номенклатура laquo ;, За властивостями номенклатури" );
ТекСтрокаВТабліце= raquo ;;
//ініціалізувавши закладки
Форма.ІспользоватьЗакладкі (1);
Форма.Закладки.ДобавитьЗначение(1,laquo;Основнаяraquo;);
Форма.Закладки.ДобавитьЗначение(2,laquo;Множественный фільтр );
Форма.Закладкі.ТекущаяСтрока (1);
Додаток Б
Лістинг програмної реалізації звіту «Нульова реалізація»
//**************************************** ***
//Процедура генерації запиту Залишилося.
Процедура Залишилося ()
Перем Запит, ТекстЗапроса, Таб;
Запит=СоздатьОб'ект ( Запит );
ТекстЗапроса="
Період з ВибДатаНач по ВибДатаКон;
Обробляти НеПомеченниеНаУдаленіе;
Підприємство=
Регистр.Остатки.Подразделение,Регистр.Продажи.Подразделение;
Товар=Регістр.Остаткі.Товар, Регістр.Продажі.Номенклатура;
Кількість=Регістр.Остаткі.Колічество;
КолічествоП=Регістр.Продажі.Колічество;
Постачальник=
Регистр.Остатки.ПрихДок.Агент,Регистр.Продажи.Поставщик;
СуммаРозн=Регістр.Остаткі.СуммаРозн;
Функція колостому=КонОст (Кількість);
Функція СуммаРознОст=КонОст (СуммаРозн);
Функція КолПріход=Прихід (Кількість);
Функція КолРасход=Витрата (Кількість);
Функція Продано=Сума (КолічествоП);
Угрупування Товар впорядкувати по колостому;
Умова (Підприємство в ВибПредпріятіе);
Умова (Товар в ВибТовар);
Умова (Постачальник в ВибПоставщік);
Умова (КолічествоП=0);
" //}} ЗАПИТ
;
//Якщо помилка в запиті, то вихід з процедури
Якщо Запрос.Виполніть (ТекстЗапроса)=0 Тоді
Повернення;
КонецЕсли;
//Підготовка до заповнення вихідних форм даними запиту
//Рег=СоздатьОбъект(laquo;Регистр.ОстаткиТоваровraquo;);
Таб=СоздатьОб'ект ( Таблиця );
