Архив метки: Управляемые формы

1С 8.3 как отключить контроль заполнения цены в заказах клиентов в конфигурации управление торговлей 11.4 (УТ 11.4 или 11.3)

Чтобы отключить контроль заполнения цены в заказах клиентов в конфигурации управление торговлей 11.3 или 11.4 (разрешить продажу по нулевой цене) Включаем возможность изменения общего модуля “ПродажиСервер” В процедуре “ПроверитьКорректностьЗаполненияДокументаПродажи” в разделе “// ЗАКАЗ КЛИЕНТА” находим строку “МассивПроверок.Добавить(“КонтрольЗаполненияЦенСУчетомОтменнных”);” И комментируем ее Все…

1С 8.x : Открытие внешних ссылок на объекты 1С e1c в тонком клиенте

Для открытия внешних ссылок на объекты 1С e1c в тонком клиенте нужно в реестре прописать связь протокола “e1c” и стартера 1С. Пример для 32-битной системы с установкой 1С в стандартный каталог. Для 64-битной использовать путь “Program Files x86 ”

1С 8.3 : Отбор в динамическом списке одновременно по двум полям

ГруппаОтбор = Список.Отбор.Элементы.Добавить(Тип("ГруппаЭлементовОтбораКомпоновкиДанных"));
ГруппаОтбор.ТипГруппы = ТипГруппыЭлементовОтбораКомпоновкиДанных.ГруппаИЛИ;
Отбор = Список.Отбор.Элементы.Добавить(Тип("ЭлементОтбораКомпоновкиДанных"));
Отбор.Родитель = ГруппаОтбор;
Отбор.ЛевоеЗначение = Новый ПолеКомпоновкиДанных("Наименование");
Отбор.ВидСравнения = ВидСравненияКомпоновкиДанных.Равно;
Отбор.Использование = Истина;
Отбор.РежимОтображения = РежимОтображенияЭлементаНастройкиКомпоновкиДанных.Недоступный;
ЭлементОтбора.ПравоеЗначение = "000000001";
Отбор = Список.Отбор.Элементы.Добавить(Тип("ЭлементОтбораКомпоновкиДанных"));
Отбор.Родитель = ГруппаОтбор;
Отбор.ЛевоеЗначение = Новый ПолеКомпоновкиДанных("Наименование");
Отбор.ВидСравнения = ВидСравненияКомпоновкиДанных.Равно;
Отбор.Использование = Истина;
Отбор.РежимОтображения = РежимОтображенияЭлементаНастройкиКомпоновкиДанных.Недоступный;
ЭлементОтбора.ПравоеЗначение = "000000002";

ГруппаОтбор = Список.Отбор.Элементы.Добавить(Тип("ГруппаЭлементовОтбораКомпоновкиДанных"));

ГруппаОтбор.ТипГруппы = ТипГруппыЭлементовОтбораКомпоновкиДанных.ГруппаИЛИ;

Отбор = Список.Отбор.Элементы.Добавить(Тип("ЭлементОтбораКомпоновкиДанных"));

Отбор.Родитель = ГруппаОтбор;

Отбор.ЛевоеЗначение = Новый ПолеКомпоновкиДанных("Наименование");

Отбор.ВидСравнения = ВидСравненияКомпоновкиДанных.Равно;

Отбор.Использование = Истина;

Отбор.РежимОтображения = РежимОтображенияЭлементаНастройкиКомпоновкиДанных.Недоступный;

ЭлементОтбора.ПравоеЗначение = "000000001";

Отбор = Список.Отбор.Элементы.Добавить(Тип("ЭлементОтбораКомпоновкиДанных"));

Отбор.Родитель = ГруппаОтбор;

Отбор.ЛевоеЗначение = Новый ПолеКомпоновкиДанных("Наименование");

Отбор.ВидСравнения = ВидСравненияКомпоновкиДанных.Равно;

Отбор.Использование = Истина;

Отбор.РежимОтображения = РежимОтображенияЭлементаНастройкиКомпоновкиДанных.Недоступный;

ЭлементОтбора.ПравоеЗначение = "000000002";

Как программно добавить реквизиты и прочее на управляемую форму

&НаСервере
Процедура ДобавитьНаСервере()
ДобавляемыеРеквизиты = Новый Массив;    
Реквизит1 = Новый РеквизитФормы("Таб", Новый ОписаниеТипов("ТаблицаЗначений"), , "Таблица", Истина);
ДобавляемыеРеквизиты.Добавить(Реквизит1); 
ИзменитьРеквизиты(ДобавляемыеРеквизиты);
ДобавляемыеРеквизиты = Новый Массив;    
Реквизит2 = Новый РеквизитФормы("Кол", Новый ОписаниеТипов("Строка"),"Таб" , "Колонка", Истина);
ДобавляемыеРеквизиты.Добавить(Реквизит2); 
ИзменитьРеквизиты(ДобавляемыеРеквизиты);
ТаблицаФормы = ЭтаФорма.Элементы.Добавить("Таблица", Тип("ТаблицаФормы"), ЭтаФорма);    
ТаблицаФормы.ПутьКДанным = "Таб";       
Колонка = ЭтаФорма.Элементы.Добавить("Колонка", Тип("ПолеФормы"), ТаблицаФормы);    
Колонка.ПутьКДанным = "Таб.Кол";       
КонецПроцедуры

&НаСервере

Процедура ДобавитьНаСервере()

ДобавляемыеРеквизиты = Новый Массив;

Реквизит1 = Новый РеквизитФормы("Таб", Новый ОписаниеТипов("ТаблицаЗначений"), , "Таблица", Истина);

ДобавляемыеРеквизиты.Добавить(Реквизит1);

ИзменитьРеквизиты(ДобавляемыеРеквизиты);

ДобавляемыеРеквизиты = Новый Массив;

Реквизит2 = Новый РеквизитФормы("Кол", Новый ОписаниеТипов("Строка"),"Таб" , "Колонка", Истина);

ДобавляемыеРеквизиты.Добавить(Реквизит2);

ИзменитьРеквизиты(ДобавляемыеРеквизиты);

ТаблицаФормы = ЭтаФорма.Элементы.Добавить("Таблица", Тип("ТаблицаФормы"), ЭтаФорма);

ТаблицаФормы.ПутьКДанным = "Таб";

Колонка = ЭтаФорма.Элементы.Добавить("Колонка", Тип("ПолеФормы"), ТаблицаФормы);

Колонка.ПутьКДанным = "Таб.Кол";

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

Получить форму существующего документа на клиенте (УФ)

ПолучитьФорму(“Документ.НазваниеДокумента.Форма.ФормаДокумента”, Новый Структура(“Ключ”, СсылкаНаДокумент));

1С 8.3 : Что нового в платформе 1С 8.3.10, изменения в интерфейсе “Такси”

В платформе 1С 8.3.10 добавили масштабируемые вкладки, перетягивание, соединение окон путем перетягивания вкладок, прокрутку, анимацию при закрытии, закрытие нескольких вкладок. Добавили вкладку с оповещениями (колокольчик). Левая панель теперь меняется в размере в зависимости от элементов расположенных в ней. Поменяли пиктограмки…

1С 8.3 : Что нового в платформе 1С 8.3.10

В платформе 1С 8.3.10 добавили динамическое масштабирование: Можно использовать как для каждого окна в отдельности, так и для всех форм программы. Работает только где разработчики конфигурации в свойствах формы задали масштаб “Авто”. (только для интерфейса “Такси”)

1С 8.3.9 : Расширения конфигурации – способы расширения

Исполнение до расширяемого метода (аннотация Перед) Если метод аннотирован таким образом, это означает, что вначале будет выполнен метод расширения, а затем – расширяемый метод. Исполнение после расширяемого метода (аннотация После) Если метод аннотирован таким образом, это означает, что вначале будет выполнен расширяемый метод, а затем – метод расширения. Обрамление расширяемого метода (аннотации Перед и После)

1С 8.3 : Как провести документ из управляемой формы проводимого документа

На всякий, заметка: проведение документа из управляемой формы проводимого документа

Записать(Новый Структура("РежимЗаписи", РежимЗаписиДокумента.Проведение));

1	Записать(Новый Структура("РежимЗаписи", РежимЗаписиДокумента.Проведение));

1С 8.3 : Возврат итога по колонке динамического списка

Если необходимо получить итог по колонке динамического списка (с учетом отборов), можно воспользоваться следующим “костылем” 🙂 Если кто знает альтернативный вариант, сообщите в комментариях…

СхемаКомпоновкиДанных = Элементы.Список.ПолучитьИсполняемуюСхемуКомпоновкиДанных();
НастройкиКомпоновкиДанных = Элементы.Список.ПолучитьИсполняемыеНастройкиКомпоновкиДанных();
КомпоновщикМакета = Новый КомпоновщикМакетаКомпоновкиДанных;
МакетКомпоновки = КомпоновщикМакета.Выполнить(СхемаКомпоновкиДанных, НастройкиКомпоновкиДанных
,,,Тип("ГенераторМакетаКомпоновкиДанныхДляКоллекцииЗначений"));
ПроцессорКомпоновки = Новый ПроцессорКомпоновкиДанных;
ПроцессорКомпоновки.Инициализировать(МакетКомпоновки);
ТаблицаЗначений = Новый ТаблицаЗначений;
ПроцессорВывода = Новый ПроцессорВыводаРезультатаКомпоновкиДанныхВКоллекциюЗначений;
ПроцессорВывода.УстановитьОбъект(ТаблицаЗначений);
ПроцессорВывода.Вывести(ПроцессорКомпоновки);
Возврат ТаблицаЗначений.Итог("ОсталосьВыплатить");

СхемаКомпоновкиДанных = Элементы.Список.ПолучитьИсполняемуюСхемуКомпоновкиДанных();

НастройкиКомпоновкиДанных = Элементы.Список.ПолучитьИсполняемыеНастройкиКомпоновкиДанных();

КомпоновщикМакета = Новый КомпоновщикМакетаКомпоновкиДанных;

МакетКомпоновки = КомпоновщикМакета.Выполнить(СхемаКомпоновкиДанных, НастройкиКомпоновкиДанных

,,,Тип("ГенераторМакетаКомпоновкиДанныхДляКоллекцииЗначений"));

ПроцессорКомпоновки = Новый ПроцессорКомпоновкиДанных;

ПроцессорКомпоновки.Инициализировать(МакетКомпоновки);

ТаблицаЗначений = Новый ТаблицаЗначений;

ПроцессорВывода = Новый ПроцессорВыводаРезультатаКомпоновкиДанныхВКоллекциюЗначений;

ПроцессорВывода.УстановитьОбъект(ТаблицаЗначений);

ПроцессорВывода.Вывести(ПроцессорКомпоновки);

Возврат ТаблицаЗначений.Итог("ОсталосьВыплатить");