Пример. ПокаУсловиеЦикла Цикл//тело цикла КонсцЦикла;

 

Пример.

 

 

Процедура КнопкаВыполнитьНажатие(Кнопка) //пометить на удаление все поля помеченные на удаление

для Каждого стр из полесписка1 цикл // цикл приравневание строк перем

если стр.Пометка ТОГДА //если помеченная строка тогда

пер=стр.Значение.получитьобъект(); //пер равна наиденной строке ССЫЛКА

пер.пометкаудаления=истина; //пометить на удаление

пер.записать(); //записать в таблицу измененния

конецесли;

конеццикла;

КонецПроцедуры

 

Процедура ПриОткрытии() //вывести при загрузке контрагентов

мен=справочники.контрагенты; //

выб=мен.Выбрать(); //делаем выборку по строкам

пока выб.Следующий() цикл // делаем выборку по строкам

если выб.ЭтоГруппа=ложь тогда // проверка на папку

полесписка1.Добавить(выб.ссылка,выб.код); //работаем теперь с ССЫЛКА-наименование но отображается код

конецесли;

конеццикла;

 

 

КонецПроцедуры

 

Процедура кнопка1Нажатие(Элемент)

для Каждого стр из полесписка1 цикл // переход по строкам

стр.Пометка=Истина;

конеццикла;

// Вставить содержимое обработчика.

КонецПроцедуры

 

Процедура Кнопка2Нажатие(Элемент) //удалить пометки

для Каждого стр из полесписка1 цикл //

стр.Пометка=ложь;

конеццикла;

 

КонецПроцедуры

 

Процедура Кнопка3Нажатие(Элемент) //инверсии-если истина то ложь

для Каждого стр из полесписка1 цикл //

если стр.Пометка=Истина тогда

стр.Пометка=ложь;

иначе стр.Пометка=Истина;

конецесли;

конеццикла;

 

КонецПроцедуры

 

Процедура ПолеВвода1ПриИзменении(Элемент)//при выборе элемента из справочника вывести всю строку из справочника

//для Каждого стр из полеввода1 цикл

ТабличноеПоле1.Очистить();

выб=справочники.товары.выбрать(полеввода1);//находим ссылку в таблице товары которая соответствует выбранному продукту

пока выб.следующий() цикл

нов=ТабличноеПоле1.Добавить();

нов.код=выб.код;

нов.наим=выб.наименование;

нов.артик=выб.артикул;

конеццикла;

конецПроцедуры