Главная Случайная страница Контакты | Мы поможем в написании вашей работы! | ||
|
Құжаттың экрандық формасы келесідегідей болады:
Сурет 63 –«Продление книги» құжатының кестелік формасы
Форманың модулін «Мини-библиотека» конфигурациясынан қараңыз.
Өткізу модулі:
Процедура ОбработкаПроведения()
СпрКниги = создатьОбъект("Справочник.Книги");
ВыбратьСтроки();
Пока ПолучитьСтроку()=1 Цикл
Если Число(НовыйСрокВозврата)<>0 Тогда
СпрКниги.НайтиЭлемент(Книга);
СпрКниги.СрокВозврата = НовыйСрокВозврата;
СпрКниги.Записать();
КонецЕсли;
КонецЦикла;
КонецПроцедуры
Дата публикования: 2014-10-20; Прочитано: 339 | Нарушение авторского права страницы | Мы поможем в написании вашей работы!