Проект

Общее

Профиль

Управляемые формы 1С » История » Версия 38

Всеволод Дорофеев, 01.06.2023 11:39

1 1 Всеволод Дорофеев
h1. Управляемые формы 1С
2 1 Всеволод Дорофеев
3 22 Всеволод Дорофеев
{{TOC}}
4 22 Всеволод Дорофеев
5 6 Всеволод Дорофеев
h3. 1. Как программно удалить текущую строку из табличной части документа?
6 3 Всеволод Дорофеев
7 1 Всеволод Дорофеев
Для этого следует воспользоваться методом Удалить() того объекта, который является источником данных для табличной части документа. Например, для документа "ПриходнаяНакладная" с табличной частью "Товары" это будет объект ДокументТабличнаяЧасть.ПриходнаяНакладная.Товары. В модуле формы этого документа удаление текущей строки табличной части будет выглядеть следующим образом:
8 1 Всеволод Дорофеев
9 7 Всеволод Дорофеев
<pre>
10 1 Всеволод Дорофеев
ДокументОбъект.Товары.Удалить(ЭлементыФормы.Товары.ТекущаяСтрока);
11 7 Всеволод Дорофеев
</pre>
12 1 Всеволод Дорофеев
13 1 Всеволод Дорофеев
В качестве параметра метода Удалить() передается текущая строка табличной части.
14 1 Всеволод Дорофеев
15 1 Всеволод Дорофеев
Обратите внимание, что для удаления (как и для добавления) строк табличной части документа следует использовать методы табличной части (ДокументОбъект.Товары), а не методы табличного поля, отображающего эту табличную часть (ЭлементыФормы.Товары).
16 1 Всеволод Дорофеев
http://its.1c.ru/db/metod8dev/content/2481/hdoc
17 4 Всеволод Дорофеев
18 6 Всеволод Дорофеев
h3. 2. Замена "Сообщить()"
19 5 Всеволод Дорофеев
20 2 Всеволод Дорофеев
Вариант 1.
21 2 Всеволод Дорофеев
<pre>
22 2 Всеволод Дорофеев
ПоказатьОповещениеПользователя(
23 2 Всеволод Дорофеев
	НСтр("ru = 'Изменения не зарегистрированы.'")
24 2 Всеволод Дорофеев
	,,,
25 2 Всеволод Дорофеев
	БиблиотекаКартинок.Информация32);
26 2 Всеволод Дорофеев
</pre>
27 2 Всеволод Дорофеев
28 2 Всеволод Дорофеев
Вариант 2.
29 37 Всеволод Дорофеев
30 37 Всеволод Дорофеев
31 2 Всеволод Дорофеев
<pre>
32 37 Всеволод Дорофеев
		ОбщегоНазначенияКлиентСервер.СообщитьПользователю(
33 37 Всеволод Дорофеев
			"Ошибка получения курса",
34 37 Всеволод Дорофеев
			Объект.Ссылка,
35 37 Всеволод Дорофеев
			"СТП_КурсВалютыЗаказа", // Поле
36 37 Всеволод Дорофеев
			"Объект",
37 37 Всеволод Дорофеев
			);
38 37 Всеволод Дорофеев
</pre>
39 37 Всеволод Дорофеев
40 37 Всеволод Дорофеев
41 37 Всеволод Дорофеев
<pre>
42 2 Всеволод Дорофеев
    Сообщение = Новый СообщениеПользователю();
43 2 Всеволод Дорофеев
    Сообщение.Текст = "В строке 11 табличной части ""Номенклатура"" не хватает ";
44 2 Всеволод Дорофеев
    Сообщение.Поле = "Номенклатура";
45 2 Всеволод Дорофеев
46 2 Всеволод Дорофеев
    // Привязка объекта к реквизиту формы произойдет за счет
47 2 Всеволод Дорофеев
    // установленного выше по стеку соответствия методом
48 2 Всеволод Дорофеев
    // УстановитьСоответствиеОбъектаИРеквизитаФормы
49 2 Всеволод Дорофеев
    Сообщение.УстановитьДанные(ОбъектДанных);
50 2 Всеволод Дорофеев
    // Теперь у сообщения заполнено поле ПутьКДанным (установлено имя реквизита формы, до этого была пустая строка),
51 2 Всеволод Дорофеев
    // и свойство КлючДанных (установлена ссылка на документ, до этого было Неопределено)
52 2 Всеволод Дорофеев
53 2 Всеволод Дорофеев
    // Сообщение выводится пользователю
54 2 Всеволод Дорофеев
    Сообщение.Сообщить();	
55 5 Всеволод Дорофеев
</pre>
56 37 Всеволод Дорофеев
57 37 Всеволод Дорофеев
58 8 Всеволод Дорофеев
59 9 Всеволод Дорофеев
h3. 3. Открытие управляемой формы не записанного документа в 1С 8.2/8.3
60 8 Всеволод Дорофеев
61 8 Всеволод Дорофеев
<pre>
62 8 Всеволод Дорофеев
&НаКлиенте
63 8 Всеволод Дорофеев
Процедура КомандаОткрытьФорму(Команда)
64 8 Всеволод Дорофеев
	Форма = ПолучитьФорму("Справочник.Пользователи.ФормаОбъекта");
65 8 Всеволод Дорофеев
	ДанныеФормы = Форма.Объект;
66 8 Всеволод Дорофеев
	ЗаполнитьНаСервере(ДанныеФормы);
67 8 Всеволод Дорофеев
	КопироватьДанныеФормы(ДанныеФормы, Форма.Объект);
68 8 Всеволод Дорофеев
	Форма.Открыть();
69 8 Всеволод Дорофеев
КонецПроцедуры
70 8 Всеволод Дорофеев
71 8 Всеволод Дорофеев
&НаСервереБезКонтекста
72 8 Всеволод Дорофеев
Процедура ЗаполнитьНаСервере(НовыйОбъект);
73 8 Всеволод Дорофеев
        НовыйОбъект.Наименование = "Новый элемент";
74 8 Всеволод Дорофеев
	Для К=1 По 100 Цикл
75 8 Всеволод Дорофеев
	 	НоваяСтрока = НовыйОбъект.ТЧ.Добавить();
76 8 Всеволод Дорофеев
		НоваяСтрока.РеквизитТЧ = К;
77 8 Всеволод Дорофеев
	КонецЦикла; 
78 8 Всеволод Дорофеев
КонецПроцедуры
79 8 Всеволод Дорофеев
</pre>
80 10 Всеволод Дорофеев
81 35 Всеволод Дорофеев
82 35 Всеволод Дорофеев
h3. 5. Открытие управляемой формы объекта в 1С 8.2/8.3
83 35 Всеволод Дорофеев
84 36 Всеволод Дорофеев
#ОткрытьФорму, #ПолучитьФорму
85 36 Всеволод Дорофеев
86 35 Всеволод Дорофеев
<pre>
87 35 Всеволод Дорофеев
СсылкаНаЭлементСправочника = Элементы.Список.ТекущаяСтрока;
88 1 Всеволод Дорофеев
ПараметрыФормы = Новый Структура("Ключ", СсылкаНаЭлементСправочника);
89 36 Всеволод Дорофеев
ОткрытьФорму("Справочник.Организации.Форма.УниверсальнаяФормаОбъекта", ПараметрыФормы);
90 35 Всеволод Дорофеев
</pre>
91 35 Всеволод Дорофеев
92 35 Всеволод Дорофеев
h3.  5. Передача параметров в управляемых формах
93 10 Всеволод Дорофеев
94 10 Всеволод Дорофеев
Параметры передаются в виде структуры:
95 10 Всеволод Дорофеев
96 10 Всеволод Дорофеев
<pre>
97 10 Всеволод Дорофеев
Параметры = Новый Структура("ТекущееЗначение",ПоследнийЭлемент);
98 10 Всеволод Дорофеев
ФормаВыбора = ПолучитьФорму("Справочник.Номенклатура.ФормаВыбора",Параметры);
99 10 Всеволод Дорофеев
НайденыйЭлемент = ФормаВыбора.ОткрытьМодально();
100 10 Всеволод Дорофеев
</pre>
101 10 Всеволод Дорофеев
102 10 Всеволод Дорофеев
Также у управляемой формы появились «расширения формы» (объект, справочник, документ, отчет). В зависимости от типа объекта определяется состав доступных параметров.  Например, если в форме выбора справочника нужно позиционироваться на определенном элементе, то используется параметр «ТекущееЗначение». Большим плюсом является, что в самой форме не требуется писать обработчиков для предопределенных параметров, сокращает количество кода.
103 10 Всеволод Дорофеев
104 10 Всеволод Дорофеев
Также у разработчика появилась возможность определять свои параметры (в конструкторе управляемой формы вкладка «Параметры»). Время жизни параметров ограничено обработчиком ПриСозданииНаСервере, что логично т.к. параметры требуются только при создании формы, но если данный параметр определяет уникальность формы (установлен флаг «ключевой параметр» в свойствах параметра) он будет доступен и в других обработчиках.
105 10 Всеволод Дорофеев
106 10 Всеволод Дорофеев
Для передачи специфического параметра манипуляций требуется сделать немного больше:
107 10 Всеволод Дорофеев
108 10 Всеволод Дорофеев
1. Определить в управляемой форме параметр.
109 10 Всеволод Дорофеев
110 10 Всеволод Дорофеев
В обработчике ПриСозданииНаСервере определить обработку данного параметра (обращение к переданным параметрам через свойство «Параметры», имеющее тип ДанныеФормыСтруктура)
111 10 Всеволод Дорофеев
112 10 Всеволод Дорофеев
1. Описать получение формы и передать значение нового параметра в параметрах функции ПолучитьФорму.
113 10 Всеволод Дорофеев
114 10 Всеволод Дорофеев
Таким образом код будет иметь вид:
115 10 Всеволод Дорофеев
116 10 Всеволод Дорофеев
В месте получения формы 
117 10 Всеволод Дорофеев
<pre>
118 10 Всеволод Дорофеев
Параметры = Новый Структура("НовыйПараметр",ПоследнийЭлемент);
119 10 Всеволод Дорофеев
ФормаВыбора = ПолучитьФорму("Справочник.Номенклатура.ФормаВыбора",Параметры);
120 10 Всеволод Дорофеев
</pre>
121 10 Всеволод Дорофеев
122 10 Всеволод Дорофеев
В модуле управляемой формы  
123 10 Всеволод Дорофеев
<pre>
124 10 Всеволод Дорофеев
&НаСервере
125 10 Всеволод Дорофеев
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
126 10 Всеволод Дорофеев
    Если Параметры.Свойство("НовыйПараметр") Тогда
127 10 Всеволод Дорофеев
        // здесь код обработки параметра
128 10 Всеволод Дорофеев
    КонецЕсли;
129 10 Всеволод Дорофеев
КонецПроцедуры
130 10 Всеволод Дорофеев
</pre>
131 11 Всеволод Дорофеев
132 12 Всеволод Дорофеев
h3. 4. Отбор в таблице значений, расположенной на форме 
133 11 Всеволод Дорофеев
134 11 Всеволод Дорофеев
Например, отбор строк в подчиненной таблице при смене "Владельца" в основной таблице
135 11 Всеволод Дорофеев
<pre>
136 11 Всеволод Дорофеев
&НаКлиенте
137 11 Всеволод Дорофеев
Процедура ИсходнаяНоменклатураПриАктивизацииСтроки(Элемент)
138 11 Всеволод Дорофеев
	
139 11 Всеволод Дорофеев
	Структура = Новый Структура("ИсходнаяНоменклатура", Элементы["ИсходнаяНоменклатура"].ТекущиеДанные.Номенклатура);
140 11 Всеволод Дорофеев
	НовыйОтбор = Новый ФиксированнаяСтруктура(Структура);
141 11 Всеволод Дорофеев
	Элементы["НоваяНоменклатура"].ОтборСтрок=НовыйОтбор;
142 11 Всеволод Дорофеев
143 11 Всеволод Дорофеев
КонецПроцедуры
144 11 Всеволод Дорофеев
145 11 Всеволод Дорофеев
</pre>
146 13 Всеволод Дорофеев
147 13 Всеволод Дорофеев
h3. Вопрос в управляемых формах
148 13 Всеволод Дорофеев
149 13 Всеволод Дорофеев
Замена функции "Вопрос(...)"
150 13 Всеволод Дорофеев
151 13 Всеволод Дорофеев
<pre>
152 13 Всеволод Дорофеев
&НаКлиенте
153 13 Всеволод Дорофеев
Процедура ЗадатьВопрос(Команда)
154 13 Всеволод Дорофеев
	
155 13 Всеволод Дорофеев
	ПоказатьВопрос(Новый ОписаниеОповещения("ОбработкаОтветаЗавершение", ЭтотОбъект), "Табличная часть будет очищена. Продолжить?", РежимДиалогаВопрос.ДаНет);
156 13 Всеволод Дорофеев
157 13 Всеволод Дорофеев
КонецПроцедуры
158 13 Всеволод Дорофеев
159 13 Всеволод Дорофеев
&НаКлиенте
160 13 Всеволод Дорофеев
Процедура ОбработкаОтветаЗавершение(РезультатВопроса, ДополнительныеПараметры) Экспорт
161 13 Всеволод Дорофеев
	
162 13 Всеволод Дорофеев
	Ответ = РезультатВопроса;
163 13 Всеволод Дорофеев
	
164 13 Всеволод Дорофеев
	Если Ответ <> КодВозвратаДиалога.Да Тогда
165 13 Всеволод Дорофеев
		
166 13 Всеволод Дорофеев
		Возврат;
167 13 Всеволод Дорофеев
		
168 13 Всеволод Дорофеев
	КонецЕсли;
169 13 Всеволод Дорофеев
	
170 13 Всеволод Дорофеев
	//Выполнение действий на положительный ответ
171 13 Всеволод Дорофеев
	
172 13 Всеволод Дорофеев
КонецПроцедуры
173 13 Всеволод Дорофеев
174 13 Всеволод Дорофеев
</pre>
175 14 Всеволод Дорофеев
176 14 Всеволод Дорофеев
h3. Подключение внешней компоненты из макета внешней обработки
177 14 Всеволод Дорофеев
178 14 Всеволод Дорофеев
Стандартное подключение макета из встроенной обработки:
179 14 Всеволод Дорофеев
<pre>
180 14 Всеволод Дорофеев
ПодключениеВыполнено = ПодключитьВнешнююКомпоненту("Обработка.ВстроеннаяОбработка.Макет.КомпонентаПечатиШтрихкодовLinux64", "КартинкаШтрихкода", ТипВнешнейКомпоненты.Native);
181 14 Всеволод Дорофеев
</pre>
182 14 Всеволод Дорофеев
183 14 Всеволод Дорофеев
Подключение внешней компоненты из макета внешней обработки
184 14 Всеволод Дорофеев
<pre>
185 14 Всеволод Дорофеев
ПодключениеВыполнено = ПодключитьВнешнююКомпоненту(ПоместитьВоВременноеХранилище(ПолучитьМакет("КомпонентаПечатиШтрихкодовLinux64")), "КартинкаШтрихкода", ТипВнешнейКомпоненты.Native);
186 14 Всеволод Дорофеев
</pre>
187 15 Всеволод Дорофеев
188 15 Всеволод Дорофеев
h3. Методы ПоместитьВоВременноеХранилище и ПолучитьИзВременногоХранилища
189 15 Всеволод Дорофеев
190 15 Всеволод Дорофеев
источник http://catalog.mista.ru/public/198766/
191 15 Всеволод Дорофеев
192 15 Всеволод Дорофеев
Временное хранилище – секретное оружие
193 15 Всеволод Дорофеев
194 15 Всеволод Дорофеев
При работе с управляемыми формами быстро становится ясно, что ограничения клиент-серверного взаимодействия очень сильно сужают возможности разработчика. Поэтому, платформа 1С предоставляет хитрый секретный ход под названием «ВременноеХранилище». Эта сущность позволяет сохранить на сервере некоторое состояние между двумя серверными вызовами. Я слышу возгласы: «А кто сказал, что состояние нельзя хранить!» Справедливое замечание, состояние хранить все-таки можно, но недолго.
195 15 Всеволод Дорофеев
196 15 Всеволод Дорофеев
Временное хранилище позволяет оставить на сервере некоторые данные, а вместо них получить короткую строку – адрес временного хранилища. Этот адрес можно передать на клиента, там он будет спокойно лежать, а когда понадобятся данные из хранилища, то мы по этому адресу сможем их получить.
197 15 Всеволод Дорофеев
198 15 Всеволод Дорофеев
Для работы со временным хранилищем используются методы ПоместитьВоВременноеХранилище и ПолучитьИзВременногоХранилища.
199 15 Всеволод Дорофеев
200 15 Всеволод Дорофеев
С методом «Получить» все просто, он по заданному адресу возвращает значение, которое лежит в хранилище.
201 15 Всеволод Дорофеев
202 15 Всеволод Дорофеев
С методом «Поместить» несколько сложнее. Дело в том, что помещать можно в 2 разных хранилища – простое и хранилище формы. Хранилище формы живет на сервере столько, сколько живет сама форма. Простое хранилище живет ровно 2 серверных вызова. В синтакс-помощнике об этом написано целых несколько умных строк. Я никогда не понимал, что они означают. Опытным путем было установлено, что срок жизни – 2 серверных вызова.
203 15 Всеволод Дорофеев
204 15 Всеволод Дорофеев
    Первый – мы помещаем что-то в хранилище и возвращаем адрес на клиента.
205 15 Всеволод Дорофеев
    Клиент делает второй вызов и по этому адресу может получить данные.
206 15 Всеволод Дорофеев
    В третьем вызове по этому адресу уже ничего не будет. Платформа очистит хранилище
207 15 Всеволод Дорофеев
208 15 Всеволод Дорофеев
С хранилищем формы ситуация более интересная. Если вторым параметром метода «ПоместитьВоВременноеХранилище» передать идентификатор формы (ЭтаФорма.УникальныйИдентификатор), то данные в хранилище будут привязаны к сроку жизни формы и не будут удалятся ни в первых, ни во вторых, ни во всех прочих вызовах сервера.
209 15 Всеволод Дорофеев
210 15 Всеволод Дорофеев
Таким образом, временное хранилище, это еще одно место, в котором (помимо реквизитов формы) можно сохранять состояние на сервере. Причем, в хранилище можно хранить даже данные, которые на клиенте недоступны, а стало быть, в реквизитах формы их разместить нельзя.
211 16 Всеволод Дорофеев
212 27 Всеволод Дорофеев
h3. Динамический список. Обработка выделенных строк
213 16 Всеволод Дорофеев
214 16 Всеволод Дорофеев
<pre>
215 16 Всеволод Дорофеев
   Для каждого Эл из Элементы.СписокСпецификаций.ВыделенныеСтроки Цикл
216 16 Всеволод Дорофеев
        Сообщить(Элементы.СписокСпецификаций.ДанныеСтроки(Эл).СпецификацияСсылка);
217 1 Всеволод Дорофеев
    КонецЦикла; 	
218 20 Всеволод Дорофеев
</pre>
219 20 Всеволод Дорофеев
220 20 Всеволод Дорофеев
<pre>
221 20 Всеволод Дорофеев
	МассивСтрок = Новый Массив;
222 20 Всеволод Дорофеев
	Для Каждого Строка Из Элементы.Товары.ВыделенныеСтроки Цикл
223 20 Всеволод Дорофеев
		МассивСтрок.Добавить(Объект.Товары.НайтиПоИдентификатору(Строка));
224 1 Всеволод Дорофеев
	КонецЦикла;
225 27 Всеволод Дорофеев
226 27 Всеволод Дорофеев
</pre>
227 27 Всеволод Дорофеев
228 27 Всеволод Дорофеев
h3. Динамический список. Отбор в динамическом списке при открытии.
229 27 Всеволод Дорофеев
230 27 Всеволод Дорофеев
https://its.1c.ru/db/metod8dev/content/3557/hdoc
231 27 Всеволод Дорофеев
232 27 Всеволод Дорофеев
<pre>
233 27 Всеволод Дорофеев
234 27 Всеволод Дорофеев
&НаКлиенте
235 27 Всеволод Дорофеев
Процедура ОбработкаКоманды(ПараметрКоманды, ПараметрыВыполненияКоманды)
236 27 Всеволод Дорофеев
237 27 Всеволод Дорофеев
	ЗначениеОтбора = Новый Структура("СерияНоменклатуры", ПараметрКоманды);
238 27 Всеволод Дорофеев
	ПараметрыФормы = Новый Структура("Отбор", ЗначениеОтбора);
239 27 Всеволод Дорофеев
	
240 27 Всеволод Дорофеев
	ОткрытьФорму("РегистрСведений.ксРезультатыПроверкиКачестваСерийНоменклатуры.Форма.ФормаРезультатыПроверкиКачестваСерииНоменклатуры", ПараметрыФормы, ПараметрыВыполненияКоманды.Источник, ПараметрыВыполненияКоманды.Уникальность, ПараметрыВыполненияКоманды.Окно, ПараметрыВыполненияКоманды.НавигационнаяСсылка);
241 27 Всеволод Дорофеев
	
242 27 Всеволод Дорофеев
КонецПроцедуры
243 20 Всеволод Дорофеев
244 16 Всеволод Дорофеев
</pre>
245 17 Всеволод Дорофеев
246 17 Всеволод Дорофеев
h3. Выделение строк в таблице на форме
247 17 Всеволод Дорофеев
248 17 Всеволод Дорофеев
<pre>
249 17 Всеволод Дорофеев
	Для каждого стр из ФормаДокумента.Объект.ОбеспечениеМатериаламиИРаботами Цикл
250 17 Всеволод Дорофеев
		ФормаДокумента.Элементы.ОбеспечениеМатериаламиИРаботами.ВыделенныеСтроки.Добавить(стр.Получитьидентификатор());                
251 17 Всеволод Дорофеев
	КонецЦикла;
252 17 Всеволод Дорофеев
</pre>
253 18 Всеволод Дорофеев
254 18 Всеволод Дорофеев
h3. Как при открытии формы определить, что создается новый элемент?
255 18 Всеволод Дорофеев
256 18 Всеволод Дорофеев
Проверять можно в обработчике события *ОбработкаЗаполнения*. Это событие возникает только при создании новых объектов.
257 18 Всеволод Дорофеев
258 18 Всеволод Дорофеев
Или в *ПриСозданииНаСервере*
259 18 Всеволод Дорофеев
260 18 Всеволод Дорофеев
https://its.1c.ru/db/metod8dev/content/3545/hdoc
261 18 Всеволод Дорофеев
<pre>
262 18 Всеволод Дорофеев
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
263 18 Всеволод Дорофеев
264 18 Всеволод Дорофеев
    Если Параметры.Ключ.Пустая() Тогда
265 18 Всеволод Дорофеев
266 18 Всеволод Дорофеев
      Сообщить("Создается новый объект");
267 18 Всеволод Дорофеев
268 18 Всеволод Дорофеев
    КонецЕсли;
269 18 Всеволод Дорофеев
270 18 Всеволод Дорофеев
КонецПроцедуры 
271 18 Всеволод Дорофеев
</pre>
272 19 Всеволод Дорофеев
273 19 Всеволод Дорофеев
274 19 Всеволод Дорофеев
h3. Как выполнить экспортируемую процедуру объекта, находясь в его форме
275 19 Всеволод Дорофеев
276 19 Всеволод Дорофеев
{{collapse(Код...)
277 19 Всеволод Дорофеев
https://its.1c.ru/db/metod8dev#content:4146:hdoc
278 19 Всеволод Дорофеев
<pre>
279 19 Всеволод Дорофеев
&НаКлиенте
280 19 Всеволод Дорофеев
Процедура ПересчитатьЦеныДокумента(Команда)
281 19 Всеволод Дорофеев
                
282 19 Всеволод Дорофеев
     ПересчитатьЦеныНаСервере();
283 19 Всеволод Дорофеев
                
284 19 Всеволод Дорофеев
КонецПроцедуры
285 19 Всеволод Дорофеев
286 19 Всеволод Дорофеев
&НаСервере
287 19 Всеволод Дорофеев
Процедура ПересчитатьЦеныНаСервере()
288 19 Всеволод Дорофеев
                
289 19 Всеволод Дорофеев
     ОбъектДокумента = РеквизитФормыВЗначение("Объект", Тип("ДокументОбъект.Накладная"));
290 19 Всеволод Дорофеев
     ОбъектДокумента.НачислитьСкидку(10);
291 19 Всеволод Дорофеев
     ЗначениеВРеквизитФормы(ОбъектДокумента, "Объект");
292 19 Всеволод Дорофеев
                
293 19 Всеволод Дорофеев
КонецПроцедуры
294 19 Всеволод Дорофеев
295 19 Всеволод Дорофеев
</pre>
296 19 Всеволод Дорофеев
297 19 Всеволод Дорофеев
}}
298 21 Всеволод Дорофеев
299 21 Всеволод Дорофеев
300 21 Всеволод Дорофеев
h3. Переход на следующую строку в той же колонке при нажатии Enter
301 21 Всеволод Дорофеев
302 21 Всеволод Дорофеев
<pre>
303 21 Всеволод Дорофеев
&НаКлиенте
304 21 Всеволод Дорофеев
Процедура ОсновныеЯчейкиЯчейкаПриИзменении(Элемент)
305 21 Всеволод Дорофеев
	ТекущиеДанные = Элементы.ОсновныеЯчейки.ТекущиеДанные;
306 21 Всеволод Дорофеев
	ОбработатьНазначениеОсновнойЯчейки(ТекущиеДанные.Номенклатура, ТекущиеДанные.Склад, ТекущиеДанные.Ячейка, Ложь);
307 21 Всеволод Дорофеев
	
308 21 Всеволод Дорофеев
 	Стр=Элементы.ОсновныеЯчейки.ТекущиеДанные;
309 21 Всеволод Дорофеев
    Если Стр<>Неопределено Тогда
310 21 Всеволод Дорофеев
        Если Элементы.ОсновныеЯчейки.ТекущийЭлемент.Имя="ОсновныеЯчейкиЯчейка" Тогда
311 21 Всеволод Дорофеев
            НС=Объект.ОсновныеЯчейки.НайтиСтроки(Новый Структура("НомерСтроки",Стр.НомерСтроки+1));
312 21 Всеволод Дорофеев
			Если НС.Количество()>0 Тогда
313 21 Всеволод Дорофеев
	            Элементы.ОсновныеЯчейки.ТекущаяСтрока=НС[0].ПолучитьИдентификатор();
314 21 Всеволод Дорофеев
	            Элементы.ОсновныеЯчейки.ТекущийЭлемент =Элементы.ОсновныеЯчейки.ПодчиненныеЭлементы.ОсновныеЯчейкиЯчейка;
315 21 Всеволод Дорофеев
  				ПодключитьОбработчикОжидания("ИзменитьСтрокуОжидание", 0.1, Истина);
316 21 Всеволод Дорофеев
			КонецЕсли;
317 21 Всеволод Дорофеев
        КонецЕсли;  
318 21 Всеволод Дорофеев
    КонецЕсли; 	
319 21 Всеволод Дорофеев
	
320 21 Всеволод Дорофеев
КонецПроцедуры
321 21 Всеволод Дорофеев
322 21 Всеволод Дорофеев
&НаКлиенте
323 21 Всеволод Дорофеев
Процедура ИзменитьСтрокуОжидание() Экспорт
324 21 Всеволод Дорофеев
    Элементы.ОсновныеЯчейки.ИзменитьСтроку();
325 21 Всеволод Дорофеев
КонецПроцедуры
326 21 Всеволод Дорофеев
327 21 Всеволод Дорофеев
</pre>
328 23 Всеволод Дорофеев
329 23 Всеволод Дорофеев
h3. Проблема обновления реквизитов документа в другой сессии (кэш 1С)
330 23 Всеволод Дорофеев
331 23 Всеволод Дорофеев
В динамическом списке изменения отображаются при обновлении формы. В ТЧ документа - нет.
332 23 Всеволод Дорофеев
Требуется принудительно обновлять на клиенте. Например:
333 23 Всеволод Дорофеев
334 23 Всеволод Дорофеев
<pre>
335 23 Всеволод Дорофеев
	ОповеститьОбИзменении(Тип("СправочникСсылка.СерииНоменклатуры"));
336 23 Всеволод Дорофеев
        Элементы.СПисок.Обновить();
337 23 Всеволод Дорофеев
</pre>
338 24 Всеволод Дорофеев
339 33 Всеволод Дорофеев
h3. Программное создание реквизитов (флаг) формы и расположение на форме
340 24 Всеволод Дорофеев
341 24 Всеволод Дорофеев
Флажок
342 26 Всеволод Дорофеев
https://gee12.space/komanda-flag-na-forme-1s/
343 24 Всеволод Дорофеев
<pre>
344 24 Всеволод Дорофеев
&НаСервере
345 24 Всеволод Дорофеев
Процедура ДобавитьФлажокНаСервере()
346 24 Всеволод Дорофеев
	
347 24 Всеволод Дорофеев
	//Создание реквизита
348 24 Всеволод Дорофеев
	МассивТиповБулево = Новый Массив;
349 24 Всеволод Дорофеев
    МассивТиповБулево.Добавить(Тип("Булево"));
350 24 Всеволод Дорофеев
351 24 Всеволод Дорофеев
    РеквизитФлаг = Новый РеквизитФормы("ФлагФормы",Новый ОписаниеТипов(МассивТиповБулево),,"Флаг");
352 25 Всеволод Дорофеев
    РеквизитФлаг.СохраняемыеДанные = Истина;
353 24 Всеволод Дорофеев
    НовыеРеквизиты = Новый Массив;
354 24 Всеволод Дорофеев
    НовыеРеквизиты.Добавить(РеквизитФлаг);
355 24 Всеволод Дорофеев
356 24 Всеволод Дорофеев
    ИзменитьРеквизиты(НовыеРеквизиты);
357 24 Всеволод Дорофеев
	
358 1 Всеволод Дорофеев
	//Располагаем на форме
359 25 Всеволод Дорофеев
360 25 Всеволод Дорофеев
	НоваяКоманда = Команды.Добавить("ПредварительныйПросмотр");
361 25 Всеволод Дорофеев
	НоваяКоманда.Действие = "УстановитьПредварительныйПросмотр";
362 25 Всеволод Дорофеев
	НоваяКоманда.Заголовок = "Предварительный просмотр";
363 1 Всеволод Дорофеев
	
364 25 Всеволод Дорофеев
	НовыйЭлемент = Элементы.Добавить("ФлагФормы",Тип("КнопкаФормы"), Элементы.ФормаКоманднаяПанель);
365 25 Всеволод Дорофеев
	НовыйЭлемент.ПоложениеВКоманднойПанели = ПоложениеКнопкиВКоманднойПанели.ВДополнительномПодменю;
366 25 Всеволод Дорофеев
	НовыйЭлемент.ИмяКоманды = НоваяКоманда.Имя;
367 25 Всеволод Дорофеев
	НовыйЭлемент.Вид = ВидКнопкиФормы.КнопкаКоманднойПанели;
368 25 Всеволод Дорофеев
	НовыйЭлемент.ТолькоВоВсехДействиях = Истина;
369 25 Всеволод Дорофеев
	НовыйЭлемент.Пометка = ЭтаФорма["ФлагФормы"];
370 25 Всеволод Дорофеев
	
371 1 Всеволод Дорофеев
КонецПроцедуры
372 25 Всеволод Дорофеев
373 25 Всеволод Дорофеев
&НаКлиенте
374 25 Всеволод Дорофеев
Процедура ДобавитьФлажок(Команда)
375 25 Всеволод Дорофеев
	ДобавитьФлажокНаСервере();
376 25 Всеволод Дорофеев
КонецПроцедуры
377 25 Всеволод Дорофеев
378 25 Всеволод Дорофеев
&НаКлиенте
379 25 Всеволод Дорофеев
Процедура УстановитьПредварительныйПросмотр(Команда)
380 25 Всеволод Дорофеев
381 25 Всеволод Дорофеев
	ЭтаФорма["ФлагФормы"] = не ЭтаФорма["ФлагФормы"];
382 25 Всеволод Дорофеев
	Элементы.ФлагФормы.Пометка = ЭтаФорма["ФлагФормы"];
383 25 Всеволод Дорофеев
384 25 Всеволод Дорофеев
КонецПроцедуры
385 25 Всеволод Дорофеев
386 1 Всеволод Дорофеев
</pre>
387 33 Всеволод Дорофеев
388 33 Всеволод Дорофеев
h3. Программное создание кнопки на форме
389 33 Всеволод Дорофеев
390 33 Всеволод Дорофеев
<pre>
391 33 Всеволод Дорофеев
&НаСервере
392 33 Всеволод Дорофеев
Процедура КСФормы_ксУведомитьОКОПоступленииПослеНаСервере()
393 33 Всеволод Дорофеев
	// Вставить содержимое обработчика.
394 33 Всеволод Дорофеев
КонецПроцедуры
395 33 Всеволод Дорофеев
396 33 Всеволод Дорофеев
&НаКлиенте
397 33 Всеволод Дорофеев
Процедура КСФормы_ксУведомитьОКОПоступленииПосле(Команда)
398 33 Всеволод Дорофеев
399 33 Всеволод Дорофеев
	КСФормы_ксУведомитьОКОПоступленииПослеНаСервере();
400 33 Всеволод Дорофеев
401 33 Всеволод Дорофеев
КонецПроцедуры
402 33 Всеволод Дорофеев
403 33 Всеволод Дорофеев
&НаСервере
404 33 Всеволод Дорофеев
Процедура КСФормы_ПриСозданииНаСервереПосле(Отказ, СтандартнаяОбработка)
405 33 Всеволод Дорофеев
	
406 33 Всеволод Дорофеев
	// Новая команда
407 33 Всеволод Дорофеев
	ИмяКоманды = "ксУведомитьОКОПоступленииПосле";
408 33 Всеволод Дорофеев
    Команда		= ЭтотОбъект.Команды.Добавить(ИмяКоманды);
409 33 Всеволод Дорофеев
    Команда.Действие	= "КСФормы_ксУведомитьОКОПоступленииПосле";
410 33 Всеволод Дорофеев
	Команда.Заголовок = "Уведомить ОК о поступлении";
411 33 Всеволод Дорофеев
	Команда.Подсказка = "Уведомить Отдел Качества о поступлении";
412 33 Всеволод Дорофеев
	Команда.Картинка = БиблиотекаКартинок.ОтправитьСообщение;
413 33 Всеволод Дорофеев
    Команда.Отображение = ОтображениеКнопки.КартинкаИТекст;
414 33 Всеволод Дорофеев
	
415 33 Всеволод Дорофеев
    // Кнопка с привязкой команды
416 33 Всеволод Дорофеев
    Кнопка		= ЭтотОбъект.Элементы.Добавить("ксСписокУведомитьОКОПоступленииПосле", Тип("КнопкаФормы"), ЭтотОбъект.Элементы.СписокКоманднаяПанель);
417 33 Всеволод Дорофеев
    Кнопка.ИмяКоманды	= ИмяКоманды;
418 33 Всеволод Дорофеев
419 33 Всеволод Дорофеев
КонецПроцедуры
420 33 Всеволод Дорофеев
421 33 Всеволод Дорофеев
</pre>
422 33 Всеволод Дорофеев
423 34 Всеволод Дорофеев
Передвинуть элемент
424 34 Всеволод Дорофеев
<pre>
425 34 Всеволод Дорофеев
Элементы.Переместить(Элт,Элементы.ГруппаШапка,Элементы.ГруппаВидаОплаты);
426 34 Всеволод Дорофеев
427 34 Всеволод Дорофеев
//Элт - вновь созданный элемент,
428 34 Всеволод Дорофеев
// переместили в ГруппуШапка, перед Группой Вида оплаты 
429 34 Всеволод Дорофеев
</pre>
430 28 Всеволод Дорофеев
431 28 Всеволод Дорофеев
h3. Программный ввод на основании
432 28 Всеволод Дорофеев
433 38 Всеволод Дорофеев
#ВводНаОсновании
434 38 Всеволод Дорофеев
435 28 Всеволод Дорофеев
https://its.1c.ru/db/content/metod8dev/src/developers/platform/qanda/form/applied/i8103562.htm
436 28 Всеволод Дорофеев
437 28 Всеволод Дорофеев
<pre>
438 28 Всеволод Дорофеев
	ПараметрыФормы = Новый Структура("Основание", Объект.Ссылка);
439 28 Всеволод Дорофеев
	ОткрытьФорму("Документ.РеализацияТоваровУслуг.ФормаОбъекта", ПараметрыФормы);
440 31 Всеволод Дорофеев
</pre>
441 31 Всеволод Дорофеев
442 32 Всеволод Дорофеев
h3. Реализация ввода на основании в расширении
443 32 Всеволод Дорофеев
444 38 Всеволод Дорофеев
#ВводНаОсновании
445 38 Всеволод Дорофеев
446 32 Всеволод Дорофеев
1. Создать общую команду, например:
447 32 Всеволод Дорофеев
"СоздатьПеремещениеСырьяНаОснованииСборкиТоваров"
448 32 Всеволод Дорофеев
Группа = Командная панель формы.Создать на основании
449 32 Всеволод Дорофеев
ТипПараметраКоманды = ДокументСсылка.СборкаТоваров
450 32 Всеволод Дорофеев
451 32 Всеволод Дорофеев
Модуль команды:
452 32 Всеволод Дорофеев
<pre>
453 32 Всеволод Дорофеев
&НаКлиенте
454 32 Всеволод Дорофеев
Процедура ОбработкаКоманды(ПараметрКоманды, ПараметрыВыполненияКоманды)
455 32 Всеволод Дорофеев
	
456 32 Всеволод Дорофеев
    СтруктураДанных	= Новый Структура("ОснованиеСборка", ПараметрКоманды);
457 32 Всеволод Дорофеев
    ПараметрыФормы 	= Новый Структура("ЗначенияЗаполнения", СтруктураДанных);
458 32 Всеволод Дорофеев
    
459 32 Всеволод Дорофеев
    ОткрытьФорму("Документ.ПеремещениеТоваров.ФормаОбъекта", ПараметрыФормы, ПараметрыВыполненияКоманды.Источник,
460 32 Всеволод Дорофеев
		ПараметрыВыполненияКоманды.Уникальность, ПараметрыВыполненияКоманды.Окно, ПараметрыВыполненияКоманды.НавигационнаяСсылка);
461 32 Всеволод Дорофеев
	
462 1 Всеволод Дорофеев
КонецПроцедуры
463 1 Всеволод Дорофеев
</pre>
464 1 Всеволод Дорофеев
465 1 Всеволод Дорофеев
Из модуля документа Перемещение добавляем в расширение процедуру
466 1 Всеволод Дорофеев
467 1 Всеволод Дорофеев
<pre>
468 1 Всеволод Дорофеев
469 1 Всеволод Дорофеев
&После("ОбработкаЗаполнения")
470 1 Всеволод Дорофеев
Процедура Расш_ОбработкаЗаполнения(ДанныеЗаполнения, СтандартнаяОбработка)
471 1 Всеволод Дорофеев
472 1 Всеволод Дорофеев
	Перем ОснованиеСборка;
473 1 Всеволод Дорофеев
	
474 1 Всеволод Дорофеев
	Если ТипЗнч(ДанныеЗаполнения) = Тип("Структура") Тогда
475 1 Всеволод Дорофеев
 
476 1 Всеволод Дорофеев
		Если ДанныеЗаполнения.Свойство("ОснованиеСборка", ОснованиеСборка) Тогда
477 1 Всеволод Дорофеев
 
478 1 Всеволод Дорофеев
			Если ТипЗнч(ОснованиеСборка) = Тип("ДокументСсылка.СборкаТоваров") Тогда
479 1 Всеволод Дорофеев
480 1 Всеволод Дорофеев
				ЗаполнитьЗначенияСвойств(ЭтотОбъект, ОснованиеСборка);
481 1 Всеволод Дорофеев
482 1 Всеволод Дорофеев
				Для Каждого СтрокаОснование Из ОснованиеСборка.Товары Цикл 
483 1 Всеволод Дорофеев
484 1 Всеволод Дорофеев
					НовСтр = Товары.Добавить();
485 1 Всеволод Дорофеев
					ЗаполнитьЗначенияСвойств(НовСтр, СтрокаОснование);
486 1 Всеволод Дорофеев
487 1 Всеволод Дорофеев
				КонецЦикла;
488 1 Всеволод Дорофеев
489 1 Всеволод Дорофеев
			КонецЕсли;
490 1 Всеволод Дорофеев
	
491 1 Всеволод Дорофеев
		КонецЕсли;
492 1 Всеволод Дорофеев
	КонецЕсли;
493 1 Всеволод Дорофеев
494 1 Всеволод Дорофеев
КонецПроцедуры
495 1 Всеволод Дорофеев
496 1 Всеволод Дорофеев
</pre>
497 1 Всеволод Дорофеев
498 1 Всеволод Дорофеев
https://wiki.programstore.ru/realizaciya-vvoda-na-osnovanii-pri-pomoshhi-rasshireniya-konfiguracii/
499 38 Всеволод Дорофеев
500 38 Всеволод Дорофеев
501 38 Всеволод Дорофеев
h3. Обработка проверки заполнения
502 38 Всеволод Дорофеев
503 38 Всеволод Дорофеев
https://its.1c.ru/db/metod8dev/content/3578/hdoc
504 38 Всеволод Дорофеев
Есть два события
505 38 Всеволод Дорофеев
* Обработка проверки заполнения на сервере (ОбработкаПроверкиЗаполненияНаСервере) – можно обработать в модуле формы. Предназначено *для проверки заполнения реквизитов формы*, не объекта. Для документов вызов зависит от того, установлено ли у формы документа проведение при записи. Если установлено, то вызов  при проведении, иначе при записи
506 38 Всеволод Дорофеев
* Обработка проверки заполнения (ОбработкаПроверкиЗаполнения) – можно обработать в модуле прикладного объекта.
507 38 Всеволод Дорофеев
508 38 Всеволод Дорофеев
509 38 Всеволод Дорофеев
h3. Форма выбора. Как из формы списка сделать форму выбора?
510 38 Всеволод Дорофеев
511 38 Всеволод Дорофеев
Варианты:
512 38 Всеволод Дорофеев
1.  Использовать сгенерированную платформой форму и не указывать в реквизите форму для выбора.
513 38 Всеволод Дорофеев
2. В форме списка списку назначаем РежимВыбора, на событие вешаем оповещение о выборе...
514 38 Всеволод Дорофеев
515 38 Всеволод Дорофеев
<pre>
516 38 Всеволод Дорофеев
Процедура ФормаСпискаВыбораПриСозданииНаСервере(Знач Список, Знач ЭлементФормыСписок, Знач Параметры, Знач АвтоматическоеСохранениеПользовательскихНастроек = Ложь) Экспорт
517 38 Всеволод Дорофеев
    
518 38 Всеволод Дорофеев
    // Элементы.Список - основной реквизит с динамическим списком
519 38 Всеволод Дорофеев
    ЭлементФормыСписок.РежимВыбора = Параметры.РежимВыбора;
520 38 Всеволод Дорофеев
    Если Параметры.МножественныйВыбор <> Неопределено Тогда
521 38 Всеволод Дорофеев
        ЭлементФормыСписок.МножественныйВыбор = Параметры.МножественныйВыбор;
522 38 Всеволод Дорофеев
    КонецЕсли;
523 38 Всеволод Дорофеев
    // обход автоматического сохранения пользовательских настроек для разных режимов
524 38 Всеволод Дорофеев
    Если Параметры.РежимВыбора И Не ЗначениеЗаполнено(Параметры.КлючПользовательскихНастроек) Тогда
525 38 Всеволод Дорофеев
        Параметры.КлючПользовательскихНастроек = "РежимВыбора";
526 38 Всеволод Дорофеев
        Список.АвтоматическоеСохранениеПользовательскихНастроек = АвтоматическоеСохранениеПользовательскихНастроек;
527 38 Всеволод Дорофеев
    КонецЕсли;
528 38 Всеволод Дорофеев
529 38 Всеволод Дорофеев
КонецПроцедуры
530 38 Всеволод Дорофеев
</pre>
531 38 Всеволод Дорофеев
532 38 Всеволод Дорофеев
533 38 Всеволод Дорофеев
534 38 Всеволод Дорофеев
https://infostart.ru/1c/articles/549160/
535 38 Всеволод Дорофеев
https://its.1c.ru/db/metod8dev/content/2222/hdoc@208c875c