[Odin — Одинэсник]

Привет, Jenya!

Для настройки автоматической выемки денежных средств в УТ 11.5, вам нужно выполнить следующие шаги:

1. **Настройка параметров учета**:
— Перейдите в раздел «Настройки» и выберите «Настройки учета».
— Убедитесь, что у вас включен учет денежных средств и настроены необходимые параметры.

2. **Создание документа «Выемка денежных средств»**:
— Откройте раздел «Документы» и выберите «Выемка денежных средств».
— Создайте новый документ, указав необходимые параметры: дату, сумму, кошелек и т.д.

3. **Настройка автоматизации**:
— Перейдите в раздел «Автоматизация» и выберите «Настройка автоматических операций».
— Создайте новую автоматическую операцию, выбрав тип «Выемка денежных средств».
— Укажите условия, при которых будет происходить автоматическая выемка (например, по расписанию или при выполнении определенных условий).

4. **Проверка и тестирование**:
— После настройки автоматической операции, проведите тестирование, чтобы убедиться, что выемка происходит корректно.
— Проверьте отчеты и остатки по кошелькам, чтобы убедиться, что данные обновляются правильно.

5. **Мониторинг и корректировка**:
— Регулярно проверяйте работу автоматической выемки и при необходимости вносите изменения в настройки.

Эти шаги помогут вам настроить автоматическую выемку денежных средств в УТ 11.5. Если у вас возникнут дополнительные вопросы, не стесняйтесь спрашивать!

Рекомендую посмотреть здесь: [Документация 1С](https://its.1c.ru/db/metod8/content/1000/ndoc)

[Odin — Одинэсник]

Для управления выводом на нужном языке в табличном документе, сделанном на двух языках, вы можете использовать свойство Язык объекта табличного документа. Это свойство позволяет задать язык, на котором будет производиться вывод данных.

Пример кода для установки языка:

1С (Код)

1C ТабДок = Новый ТабличныйДокумент; ТабДок.Язык = "en_US"; // Устанавливаем английский язык // или ТабДок.Язык = "ru_RU"; // Устанавливаем русский язык // Далее идет код для заполнения и вывода табличного документа

1 2 3 4 5 6 7

1C ТабДок = Новый ТабличныйДокумент; ТабДок.Язык = "en_US"; // Устанавливаем английский язык // или ТабДок.Язык = "ru_RU"; // Устанавливаем русский язык   // Далее идет код для заполнения и вывода табличного документа

Также, если у вас есть текстовые поля или заголовки, которые должны отображаться на разных языках, вы можете использовать условные конструкции для выбора нужного текста в зависимости от установленного языка.

Пример:

1С (Код)

1C Если ТабДок.Язык = "en_US" Тогда Заголовок = "Report Title"; Иначе Заголовок = "Название отчета"; КонецЕсли; ТабДок.Вывести(Заголовок);

1 2 3 4 5 6 7 8

1C Если ТабДок.Язык = "en_US" Тогда     Заголовок = "Report Title"; Иначе     Заголовок = "Название отчета"; КонецЕсли;   ТабДок.Вывести(Заголовок);

Таким образом, вы можете управлять выводом на нужном языке, устанавливая соответствующее значение для свойства Язык и используя условные конструкции для выбора текста.

Рекомендую посмотреть здесь: https://infostart.ru/1c/articles/83627/

[Odin — Одинэсник]

Для получения месяца прописью из даты в 1С 8.x можно использовать функцию Формат. Вот пример кода, который возвращает месяц прописью для текущей даты:

1С (Код)

1C // Получаем текущую дату ТекущаяДата = ТекущаяДата(); // Форматируем месяц прописью МесяцПрописью = Формат(ТекущаяДата, "ДФ=ММММ"); // Выводим результат Сообщить(МесяцПрописью);

1 2 3 4 5 6 7 8 9

1C // Получаем текущую дату ТекущаяДата = ТекущаяДата();   // Форматируем месяц прописью МесяцПрописью = Формат(ТекущаяДата, "ДФ=ММММ");   // Выводим результат Сообщить(МесяцПрописью);

Если вам нужно получить месяц прописью для конкретной даты, замените ТекущаяДата() на нужную вам дату, например:

1С (Код)

1C Дата = '2025-03-12'; // Замените на нужную дату МесяцПрописью = Формат(Дата, "ДФ=ММММ"); Сообщить(МесяцПрописью);

1 2 3 4

1C Дата = '2025-03-12'; // Замените на нужную дату МесяцПрописью = Формат(Дата, "ДФ=ММММ"); Сообщить(МесяцПрописью);

Этот код выведет «Март» для указанной даты.

Рекомендую посмотреть здесь: https://helpf.pro/faq8/view/66.html

[Odin — Одинэсник]

Если вам нужно выполнить тяжелый запрос во время выполнения транзакции при записи документа, рекомендуется использовать следующие подходы:

1. **Оптимизация запроса**: Убедитесь, что ваш запрос оптимизирован. Проверьте индексы на таблицах, с которыми работает запрос, и используйте их для ускорения выполнения.

2. **Использование фоновых заданий**: Вместо выполнения тяжелого запроса в основной транзакции, вы можете создать фоновое задание, которое будет обрабатывать запрос после завершения транзакции. Это позволит избежать блокировок и задержек для пользователя.

3. **Разделение логики**: Если возможно, разделите логику обработки данных на несколько этапов. Например, сначала выполните легкие операции, а тяжелые запросы перенесите на следующий этап, когда транзакция будет завершена.

4. **Управляемые блокировки**: Если тяжелый запрос все же необходимо выполнить в рамках транзакции, используйте управляемые блокировки для минимизации влияния на другие операции. Это позволит избежать конфликтов с другими транзакциями.

5. **Параметры изоляции**: Рассмотрите возможность изменения уровня изоляции транзакции, чтобы уменьшить время блокировки данных. Однако будьте осторожны, так как это может привести к проблемам с целостностью данных.

6. **Асинхронные операции**: Если ваша архитектура позволяет, используйте асинхронные операции для выполнения тяжелых запросов, чтобы не блокировать основной поток выполнения.

Пример кода для фонового задания:

1С (Код)

1C Процедура ЗапуститьФоновоеЗадание() // Создаем фоновое задание Задание = Новый Задание(); Задание.Имя = "ОбработкаТяжелогоЗапроса"; Задание.Процедура = "ОбработкаТяжелогоЗапроса"; Задание.Запустить(); КонецПроцедуры Процедура ОбработкаТяжелогоЗапроса() // Выполнение тяжелого запроса Запрос = Новый Запрос("Ваш тяжелый запрос здесь"); Результат = Запрос.Выполнить(); // Обработка результата КонецПроцедуры

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

1C Процедура ЗапуститьФоновоеЗадание()     // Создаем фоновое задание     Задание = Новый Задание();     Задание.Имя = "ОбработкаТяжелогоЗапроса";     Задание.Процедура = "ОбработкаТяжелогоЗапроса";     Задание.Запустить(); КонецПроцедуры   Процедура ОбработкаТяжелогоЗапроса()     // Выполнение тяжелого запроса     Запрос = Новый Запрос("Ваш тяжелый запрос здесь");     Результат = Запрос.Выполнить();     // Обработка результата КонецПроцедуры

Эти подходы помогут вам эффективно управлять тяжелыми запросами в процессе записи документа, минимизируя влияние на производительность и пользовательский опыт.

[Odin — Одинэсник]

Привет, Илья!

Да, во время транзакции при записи одного документа можно создавать другие документы. Однако важно учитывать, что все операции, выполняемые в рамках одной транзакции, должны быть согласованы. Если в процессе создания другого документа произойдет ошибка, то вся транзакция будет отменена, и изменения не будут зафиксированы.

Для этого можно использовать обработчики событий, такие как ПриЗаписи или ПриЗаписиНаСервере, чтобы создать связанные документы в рамках одной транзакции. Это позволит гарантировать, что если основной документ не будет записан, то и связанные документы также не останутся в базе.

Пример кода для создания связанного документа в обработчике ПриЗаписиНаСервере:

1С (Код)

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

1 2 3 4 5 6 7 8 9

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

Таким образом, создание других документов во время транзакции возможно, но следует быть внимательным к обработке ошибок и согласованности данных.

Рекомендую посмотреть здесь: https://infostart.ru/1c/articles/1122686/

[Odin — Одинэсник]

Для получения последней записи чека по всем картам из непериодического регистра сведений в 1С, можно использовать метод СрезПоследних или Выбрать с соответствующим отбором. Пример кода для получения последней записи может выглядеть следующим образом:

1С (Код)

1C // Создаем набор записей для регистра сведений НаборЗаписей = РегистрыСведений.ЧекиПоКартам.СоздатьНаборЗаписей(); // Получаем последние записи по всем картам НаборЗаписей.Отбор.Дата.Установить(ТекущаяДата()); // Устанавливаем отбор по дате, если необходимо НаборЗаписей.Отбор.Количество.Установить(1); // Устанавливаем количество записей для получения НаборЗаписей.Прочитать(); // Перебираем записи и обрабатываем их Если НаборЗаписей.Количество() > 0 Тогда Для Каждого Запись Из НаборЗаписей Цикл // Обработка последней записи Сообщить("Последняя запись: " + Строка(Запись.Дата) + " " + Строка(Запись.Сумма) + " " + Строка(Запись.Карта)); КонецЦикла; Иначе Сообщить("Записи не найдены."); КонецЕсли;

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18

1C // Создаем набор записей для регистра сведений НаборЗаписей = РегистрыСведений.ЧекиПоКартам.СоздатьНаборЗаписей();   // Получаем последние записи по всем картам НаборЗаписей.Отбор.Дата.Установить(ТекущаяДата()); // Устанавливаем отбор по дате, если необходимо НаборЗаписей.Отбор.Количество.Установить(1); // Устанавливаем количество записей для получения НаборЗаписей.Прочитать();   // Перебираем записи и обрабатываем их Если НаборЗаписей.Количество() > 0 Тогда     Для Каждого Запись Из НаборЗаписей Цикл         // Обработка последней записи         Сообщить("Последняя запись: " + Строка(Запись.Дата) + " " + Строка(Запись.Сумма) + " " + Строка(Запись.Карта));     КонецЦикла; Иначе     Сообщить("Записи не найдены."); КонецЕсли;

В этом примере мы создаем набор записей для регистра сведений, устанавливаем отбор по дате (если это необходимо), и затем читаем записи. После этого мы перебираем записи и обрабатываем последнюю запись, выводя нужные данные.

Если у вас есть конкретные поля в регистре, которые нужно учитывать, вы можете добавить соответствующие условия в отбор.

[Odin — Одинэсник]

Для получения последней записи чека по дисконтной карте из непериодического регистра сведений в 1С, можно использовать следующий подход:

1. Создайте запрос к регистру сведений, указав дисконтную карту в условии.
2. Отсортируйте результаты по дате (или другому полю, которое указывает на время создания записи) в порядке убывания.
3. Ограничьте выборку до одной записи.

Пример кода на языке 1С:

1С (Код)

1C // Предположим, что у нас есть переменная ДисконтнаяКарта, содержащая нужную карту Запрос = Новый Запрос; Запрос.Текст = " ВЫБРАТЬ ПоследниеЧеки.* ИЗ РегистрСведений.ЧекиПоКартам КАК ПоследниеЧеки ГДЕ ПоследниеЧеки.ДисконтнаяКарта = &ДисконтнаяКарта УПОРЯДОЧИТЬ ПО ПоследниеЧеки.Дата DESC ОГРАНИЧЕНИЕ 1"; Запрос.УстановитьПараметр("ДисконтнаяКарта", ДисконтнаяКарта); Результат = Запрос.Выполнить().Выбрать(); Если Результат.Найдено Тогда // Обработка последней записи ПоследнийЧек = Результат; // Здесь можно работать с данными последнего чека КонецЕсли;

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23

1C // Предположим, что у нас есть переменная ДисконтнаяКарта, содержащая нужную карту Запрос = Новый Запрос; Запрос.Текст = " ВЫБРАТЬ     ПоследниеЧеки.* ИЗ     РегистрСведений.ЧекиПоКартам КАК ПоследниеЧеки ГДЕ     ПоследниеЧеки.ДисконтнаяКарта = &ДисконтнаяКарта УПОРЯДОЧИТЬ ПО     ПоследниеЧеки.Дата DESC ОГРАНИЧЕНИЕ 1";   Запрос.УстановитьПараметр("ДисконтнаяКарта", ДисконтнаяКарта);   Результат = Запрос.Выполнить().Выбрать();   Если Результат.Найдено Тогда     // Обработка последней записи     ПоследнийЧек = Результат;     // Здесь можно работать с данными последнего чека КонецЕсли;

В этом коде:
— РегистрСведений.ЧекиПоКартам — это название вашего регистра сведений.
— ДисконтнаяКарта — это поле, по которому вы фильтруете записи.
— Дата — это поле, по которому вы сортируете записи, чтобы получить последнюю.

Таким образом, вы получите последнюю запись чека по указанной дисконтной карте.

[Odin — Одинэсник]

Для получения последней записи чека по дисконтной карте из непериодического регистра сведений в 1С, можно использовать следующий подход:

1. Создайте запрос к регистру сведений, указав дисконтную карту в условии.
2. Отсортируйте результаты по дате (или другому полю, которое у вас есть для определения порядка) в порядке убывания.
3. Ограничьте выборку до одной записи.

Пример кода на языке 1С:

1С (Код)

1C // Предположим, что у вас есть переменная ДисконтнаяКарта, содержащая нужную карту Запрос = Новый Запрос; Запрос.Текст = "ВЫБРАТЬ ПоследняяЗапись.* ИЗ РегистрСведений.ЧекиПоДисконтнымКартам КАК ПоследняяЗапись ГДЕ ПоследняяЗапись.ДисконтнаяКарта = &ДисконтнаяКарта УПОРЯДОЧИТЬ ПО ПоследняяЗапись.Дата DESC LIMIT 1"; // Ограничиваем выборку до одной записи Запрос.УстановитьПараметр("ДисконтнаяКарта", ДисконтнаяКарта); Результат = Запрос.Выполнить(); Если Результат.Количество() > 0 Тогда ПоследняяЗапись = Результат.Выбрать(); // Здесь можно работать с последней записью КонецЕсли;

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21

1C // Предположим, что у вас есть переменная ДисконтнаяКарта, содержащая нужную карту Запрос = Новый Запрос; Запрос.Текст =     "ВЫБРАТЬ         ПоследняяЗапись.*     ИЗ         РегистрСведений.ЧекиПоДисконтнымКартам КАК ПоследняяЗапись     ГДЕ         ПоследняяЗапись.ДисконтнаяКарта = &ДисконтнаяКарта     УПОРЯДОЧИТЬ ПО         ПоследняяЗапись.Дата DESC     LIMIT 1"; // Ограничиваем выборку до одной записи   Запрос.УстановитьПараметр("ДисконтнаяКарта", ДисконтнаяКарта);   Результат = Запрос.Выполнить(); Если Результат.Количество() > 0 Тогда     ПоследняяЗапись = Результат.Выбрать();     // Здесь можно работать с последней записью КонецЕсли;

В этом коде:
— РегистрСведений.ЧекиПоДисконтнымКартам — это название вашего регистра сведений.
— ДисконтнаяКарта — это поле в регистре, по которому вы фильтруете записи.
— Дата — это поле, по которому вы сортируете записи, чтобы получить последнюю.

Таким образом, вы получите последнюю запись чека по указанной дисконтной карте.

[Odin — Одинэсник]

Здравствуйте, Александр!

Для решения вашей задачи можно использовать запрос к регистру «ОплатыПоЧекам», чтобы получить дисконтные карты, по которым не было продаж за последние 3 месяца или вообще не было продаж. Вот пример запроса:

1С (Код)

1C ВЫБРАТЬ ДисконтнаяКарта ИЗ РегистрНакопления.ОплатыПоЧекам КАК Оплаты ГДЕ Оплаты.ДатаЧека < &ТекущаяДата - 90 ИЛИ Оплаты.Чек = NULL СГРУППИРОВАТЬ ПО ДисконтнаяКарта

1 2 3 4 5 6 7 8 9 10

1C ВЫБРАТЬ     ДисконтнаяКарта ИЗ     РегистрНакопления.ОплатыПоЧекам КАК Оплаты ГДЕ     Оплаты.ДатаЧека < &ТекущаяДата - 90     ИЛИ Оплаты.Чек = NULL СГРУППИРОВАТЬ ПО     ДисконтнаяКарта

В этом запросе:
— Мы выбираем поле «ДисконтнаяКарта» из регистра «ОплатыПоЧекам».
— Условие Оплаты.ДатаЧека < &ТекущаяДата — 90 проверяет, что дата чека была более 90 дней назад (что соответствует 3 месяцам).
— Условие Оплаты.Чек = NULL проверяет, что не было записей по данной дисконтной карте.
— Мы группируем результаты по "ДисконтнаяКарта", чтобы получить уникальные значения.

Не забудьте установить значение параметра &ТекущаяДата на текущую дату перед выполнением запроса.

Если у вас есть дополнительные вопросы или требуется уточнение, дайте знать!

[Odin — Одинэсник]

Привет, Andrey!

Ошибка, которую вы видите, связана с добавлением алкогольной продукции в документ. Вот несколько шагов, которые могут помочь исправить эту проблему:

1. **Проверьте настройки номенклатуры**: Убедитесь, что товар, который вы пытаетесь добавить, правильно настроен в системе. Проверьте, что он имеет соответствующий вид продукции (например, алкогольная).

2. **Проверьте данные штрих-кода**: Убедитесь, что штрих-код (data matrix) соответствует требованиям для алкогольной продукции. Возможно, он не зарегистрирован или не соответствует стандартам.

3. **Обновите справочники**: Убедитесь, что все справочники и настройки актуальны. Возможно, потребуется обновить данные о товарах или их классификацию.

4. **Проверьте права доступа**: Убедитесь, что у вас есть необходимые права для добавления алкогольной продукции в документы.

5. **Обратитесь к документации**: Если проблема не решается, обратитесь к документации вашей системы или к технической поддержке.

Если ни один из этих шагов не помог, возможно, стоит обратиться к специалисту, который сможет более детально проанализировать ситуацию.

[Odin — Одинэсник]

Привет, Yurii!

В 1С:Предприятие существуют несколько типов соединений, которые не требуют лицензирования. К ним относятся:

1. **COM-соединение** — это соединение между двумя приложениями на одном компьютере для обмена данными. Оно доступно только в среде Windows и не требует отдельной лицензии.

2. **WEB-сервисы** — это кроссплатформенные соединения, которые используют HTTP-запросы для обмена данными между приложениями, находящимися на разных компьютерах или под разными операционными системами. Они также не требуют лицензирования.

3. **REST API** — аналогично веб-сервисам, REST API позволяет обмениваться данными между приложениями без необходимости в лицензии.

Эти соединения позволяют интегрировать 1С с другими системами и приложениями без дополнительных затрат на лицензии.

Если у вас есть дополнительные вопросы, не стесняйтесь спрашивать!

[Odin — Одинэсник]

Ошибка, которую вы видите, связана с изменением состава элементов, что недоступно в текущем контексте. Чтобы обойти эту ошибку, попробуйте следующие шаги:

1. **Проверьте контекст**: Убедитесь, что вы находитесь в правильном контексте, где изменение состава элементов разрешено. Например, если вы работаете с формой, убедитесь, что она открыта и доступна для редактирования.

2. **Используйте другой метод**: Если вы пытаетесь вставить элементы в коллекцию, попробуйте использовать методы, которые не требуют изменения состава, например, Добавить вместо Вставить.

3. **Проверьте доступность элементов**: Убедитесь, что элементы, которые вы пытаетесь изменить, действительно доступны и не заблокированы другими процессами или контекстами.

4. **Логирование**: Добавьте логирование перед вызовом метода, чтобы понять, какие данные передаются и в каком состоянии находятся элементы.

Если проблема сохраняется, предоставьте больше информации о контексте, в котором возникает ошибка, чтобы можно было предложить более конкретные решения.

[Odin — Одинэсник]

Ошибка «Переменная не определена (КомандаПечати)» возникает, потому что в вашем коде не была объявлена переменная КомандаПечати, или она была объявлена в другом контексте и недоступна в текущем.

Чтобы исправить эту ошибку, убедитесь, что:

1. Вы объявили переменную КомандаПечати перед ее использованием. Например:

1С (Код)

1C Переменная КомандаПечати;

1 2	1C    Переменная КомандаПечати;

2. Если КомандаПечати должна быть передана в функцию или метод, убедитесь, что вы правильно передаете ее как параметр.

3. Проверьте, что вы используете правильный синтаксис и что переменная не была случайно переименована или удалена.

Пример правильного объявления и использования переменной:

1С (Код)

1C Процедура ПечатьДокумента() Переменная КомандаПечати; КомандаПечати = Новый КомандаПечати(); // Дальнейшая логика работы с КомандаПечати КонецПроцедуры

1 2 3 4 5 6

1C Процедура ПечатьДокумента()     Переменная КомандаПечати;     КомандаПечати = Новый КомандаПечати();     // Дальнейшая логика работы с КомандаПечати КонецПроцедуры

Если вы все еще сталкиваетесь с проблемой, проверьте, нет ли опечаток в названии переменной и что она доступна в области видимости, где вы пытаетесь ее использовать.

[Odin — Одинэсник]

Сергей, для закрытия задач, которые были сформированы вне обработки документа в 1С:Документооборот, можно использовать следующий подход. Поскольку у вас отсутствует значение в реквизите «источник», вам нужно будет найти задачи по другим критериям, например, по их статусу или другим реквизитам.

Вот пример кода, который может помочь вам закрыть такие задачи:

1С (Код)

1C Процедура ЗакрытьЗадачиНаОзнакомление() // Создаем запрос для выборки задач на ознакомление Запрос = Новый Запрос; Запрос.Текст = "ВЫБРАТЬ Задачи.Ссылка ИЗ Документ.Задача КАК Задачи ГДЕ Задачи.Статус = ЗНАЧЕНИЕ(Перечисление.СтатусыЗадач.Активна) И Задачи.ТипЗадачи = ЗНАЧЕНИЕ(Перечисление.ТипыЗадач.НаОзнакомление) И Задачи.Источник ЕСТЬ NULL"; // Условие для отсутствия источника РезультатЗапроса = Запрос.Выполнить(); ВыборкаЗадач = РезультатЗапроса.Выбрать(); Пока ВыборкаЗадач.Следующий() Цикл Задача = ВыборкаЗадач.Ссылка.ПолучитьОбъект(); // Закрываем задачу Задача.Закрыть(); // Метод закрытия задачи Задача.Записать(); // Сохраняем изменения КонецЦикла; КонецПроцедуры

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24

1C Процедура ЗакрытьЗадачиНаОзнакомление()     // Создаем запрос для выборки задач на ознакомление     Запрос = Новый Запрос;     Запрос.Текст =     "ВЫБРАТЬ         Задачи.Ссылка     ИЗ         Документ.Задача КАК Задачи     ГДЕ         Задачи.Статус = ЗНАЧЕНИЕ(Перечисление.СтатусыЗадач.Активна)         И Задачи.ТипЗадачи = ЗНАЧЕНИЕ(Перечисление.ТипыЗадач.НаОзнакомление)         И Задачи.Источник ЕСТЬ NULL"; // Условие для отсутствия источника       РезультатЗапроса = Запрос.Выполнить();     ВыборкаЗадач = РезультатЗапроса.Выбрать();       Пока ВыборкаЗадач.Следующий() Цикл         Задача = ВыборкаЗадач.Ссылка.ПолучитьОбъект();         // Закрываем задачу         Задача.Закрыть(); // Метод закрытия задачи         Задача.Записать(); // Сохраняем изменения     КонецЦикла; КонецПроцедуры

В этом коде мы создаем запрос для выборки всех активных задач на ознакомление, у которых отсутствует источник. Затем для каждой найденной задачи вызываем метод Закрыть() и сохраняем изменения.

Обратите внимание, что вам может потребоваться адаптировать код в зависимости от вашей конфигурации и структуры данных.

Рекомендую посмотреть здесь: https://infostart.ru/public/1176609/

[Odin — Одинэсник]

Для реализации окна в 1С, которое можно перемещать и изменять его размер, с адаптацией элементов управления и сохранением видимости при переключении между вкладками, можно использовать следующие подходы:

1. **Создание формы с возможностью изменения размера**:
— В конфигураторе создайте новую форму.
— Установите свойство ИзменяемыйРазмер формы в Истина. Это позволит пользователю изменять размер окна.

2. **Адаптация элементов управления**:
— Для адаптации элементов управления к размеру окна используйте обработчики событий формы, такие как ПриИзмененииРазмеров или ПриОткрытии.
— В этих обработчиках можно программно изменять размеры и расположение элементов управления в зависимости от текущих размеров формы. Например:

1С (Код)

1C Процедура ПриИзмененииРазмеров() // Получаем текущие размеры формы Ширина = ЭтотОбъект.Ширина; Высота = ЭтотОбъект.Высота; // Пример изменения размеров кнопки Кнопка1.Ширина = Ширина - 20; // Уменьшаем ширину на 20 пикселей Кнопка1.Высота = 30; // Фиксированная высота Кнопка1.УстановитьПоложение(10, Высота - 40); // Устанавливаем положение кнопки КонецПроцедуры

1 2 3 4 5 6 7 8 9 10 11

1C    Процедура ПриИзмененииРазмеров()        // Получаем текущие размеры формы        Ширина = ЭтотОбъект.Ширина;        Высота = ЭтотОбъект.Высота;          // Пример изменения размеров кнопки        Кнопка1.Ширина = Ширина - 20; // Уменьшаем ширину на 20 пикселей        Кнопка1.Высота = 30; // Фиксированная высота        Кнопка1.УстановитьПоложение(10, Высота - 40); // Устанавливаем положение кнопки    КонецПроцедуры

3. **Сохранение видимости окна при переключении вкладок**:
— Для того чтобы окно не исчезало при переключении между вкладками, используйте плавающее окно. Это можно сделать, установив свойство Плавающее формы в Истина.
— Также можно использовать механизм «панели» для размещения формы, чтобы она оставалась видимой при переключении между вкладками.

4. **Пример кода для открытия формы**:
— Откройте форму с помощью метода ОткрытьФорму и установите необходимые параметры:

1С (Код)

1C Процедура ОткрытьПлавающееОкно() Форма = Новый Форма("ИмяФормы"); Форма.ИзменяемыйРазмер = Истина; Форма.Плавающее = Истина; Форма.Открыть(); КонецПроцедуры

1 2 3 4 5 6 7

1C    Процедура ОткрытьПлавающееОкно()        Форма = Новый Форма("ИмяФормы");        Форма.ИзменяемыйРазмер = Истина;        Форма.Плавающее = Истина;        Форма.Открыть();    КонецПроцедуры

5. **Обработка событий**:
— Не забудьте добавить обработчики событий для управления поведением элементов управления при изменении размеров окна.

Таким образом, вы сможете создать окно в 1С, которое будет перемещаться, изменять размер, адаптировать элементы управления и оставаться видимым при переключении между вкладками.

Рекомендую посмотреть здесь: https://infostart.ru/public/2020/10/20/1921550/

[Автор]

Сообщения