игрузітьІтогі (ТаблОстатков, 1,1);
ТаблОстатков.ВыбратьСтроки ();
Поки ТаблОстатков.ПолучитьСтроку () = 1 Цикл
Якщо ТаблОстатков.Колічество <> 0 Тоді
В
ТабліцаФорми.НоваяСтрока ();
ТабліцаФорми.Магазін = ТаблОстатков.Магазін;
ТабліцаФорми.Остаток = ТаблОстатков.Колічество;
ТекСтрока = 0;
КонецЕсли;
КонецЦікла;
КонецПроцедури// ЗаполнітьПоСкладам ()
Процедура ЗаполнітьСтрокіТабліци ()
ТаблицаФормы.УдалитьСтроки ();
Якщо ПустоеЗначеніе (Об'ектАналіза) = 0 Тоді
СпособПоказа =
Якщо СпособПоказа = "магазинам" Тоді
ЗаполнітьПоМагазінам ();
КонецЕсли;
КонецЕсли;
КонецПроцедури// ЗаполнітьСтрокіТабліци ()
Функція СформироватьИнформационнуюСтроку ()
Мінл ІнфСтрока;
Якщо ТіпЗначенія (КонтСправочніка) = 100 Тоді
ТекЕлемент = КонтСправочника.ТекущийЭлемент ();
Якщо ТекЕлемент <> Об'ектАналіза Тоді
Об'ектАналіза = ТекЕлемент;
ЗаполнітьСтрокіТабліци ();
КонецЕсли;
Якщо ПустоеЗначеніе (Об'ектАналіза) = 1 Тоді
ІнфСтрока = "";
Інакше
Якщо Об'ектАналіза.ЕтоГруппа () = 0 Тоді
ІнфСтрока = СокрЛП (ОбъектАнализа.Наименование);
КонецЕсли;
КонецЕсли;
КонецЕсли;
Повернення ІнфСтрока;
КонецФункции// СформироватьИнформационнуюСтроку ()
Процедура ПріДвойномЩелчкеНаТабліце ()
Мінл Конт;
Позиція = ТаблицаФормы.ТекущаяСтрока ();
Якщо Позиція = 0 Тоді
Повернення
КонецЕсли;
В
Спроба
Конт = ТаблицаФормы.ПолучитьЗначение (Позиція, "Об'єкт");
Виняток КонецПопиткі;
ОткритьФормуМодально (Конт);
// Могли поміняти отображаемую інформацію
Об'ектАналіза = "";
СформироватьИнформационнуюСтроку ();
ТаблицаФормы.ТекущаяСтрока (Позиція);
КонецПроцедури// ПріДвойномЩелчкеНаТабліце ()
Процедура ПріІзмененііОстаткіПо ()
ЗаполнітьКолонкіТабліци ();...
