egerLESHIK
Advanced Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Доброго времени суток, уважаемые!
Все та же платформа 7.7 "Торговля и склад":
Имею в справочнике ГСМ (ДляВыбора) такие данные: Поля ввода "НаДату", "ВыбАвто" (вопрос по которому я сегодня задавал, спасибо vizlipuzli за подсказку над решением этого вопроса), и колонки в таблице этого справочника:
- Наименование;
- МаркаТоплива;
- Остаток.
В регистре УчетГСМ - уже имеются данные по остаткам ГСМ.
Стал вопрос такого плана, как эти остатки вытащить из регистра и чтобы они при открытии справочника автоматом проставились (Дата и Автомобиль - уже автоматитчески проставляются). Пробовал выводить данные в специально созданную таблицу значений - данные по автомобилю и ГСМ выводятся на Дату в неё, а вот как заставить чтобы они записались в колонку Остаток справочника, ума не приложу?
Подскажите, пожалуйста.
Спасибо.
P.S. Собственно часть кода, что выводит в таблицу значения такая:
Код: СписокЭлементов = СоздатьОбъект("СписокЗначений");
ВремРег = СоздатьОбъект("Регистры");
ОстГСМ = ВремРег.УчетГСМ;
Если фВнКонтекст = 1 Тогда
// на точку документа
Если ВнКонтекст.Выбран()>0 Тогда // документ не новый, а существующий
Если ВнКонтекст.ПолучитьПозицию()<ПолучитьПозициюТА() Тогда
ОстГСМ.ВременныйРасчет();
ВремРег.РассчитатьРегистрыНа(ВнКонтекст.ТекущийДокумент());
КонецЕсли;
Иначе // документ новый
// если документ новый, то итоги рассчитаем на конец дня документа
Если (ВнКонтекст.ДатаДок<ПолучитьДатуТА()) И (НаДату <> ПолучитьДатуТА()) Тогда
ОстГСМ.ВременныйРасчет();
ВремРег.РассчитатьРегистрыПо(НаДату);
КонецЕсли;
КонецЕсли;
Иначе
Если НаДату<ПолучитьДатуТА() Тогда
ОстГСМ.ВременныйРасчет();
ВремРег.РассчитатьРегистрыПо(НаДату);
КонецЕсли;
КонецЕсли;
СписокАвто = СоздатьОбъект("СписокЗначений");
СписокАвто.ДобавитьЗначение(ВыбАвто);
ОстГСМ.УстановитьЗначениеФильтра("Фирма", Фирма, 1);
ОстГСМ.УстановитьЗначениеФильтра("Автомобиль", СписокАвто, 2);
ОстГСМ.ВыгрузитьИтоги(тзОст, 1);
ТЗОст.Свернуть("ГСМ", "Кво");
Форма.Остаток.Видимость(1);
|
|
Программы » 
Варезник » 
