Форум программистов, компьютерный форум, киберфорум
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск  
Мои разработки и доработки 1С
Старый
Запись в регистр сведений независимо от заполненности табличной части
Запись от Maks размещена 25.08.2026 в 12:38
Показов 929 Комментарии 0

Реализация из решения ниже выполнена на нетиповом документе с несколькими табличными частями, разработанного в КА2.

Задача:
Обеспечить запись документа в регистр сведений независимо от заполненности табличной части.

Решение:
Выполнено изменение движений записей в регистр.
1C
1
2
    // Очистка движений перед записью новых данных
    Движения.НазначениеСотрудниковТС.Очистить();
...
Аватар для Maks
Супер-модератор
Старый
Перемещение строк из ТЧ в другой документ с учетом текущего пробега
Запись от Maks размещена 17.08.2026 в 08:12. Обновил(-а) Maks 17.08.2026 в 08:33
Показов 1462 Комментарии 0

Реализация из решения ниже выполнена на примере нетипового документа "Автозапчасти", с ТЧ "Шины".
За основу взят алгоритм отсюда: https://www.cyberforum.ru/blogs/359708/10838.html

Задача:
Реализовать перемещение позиций с учетом текущего пробега и записью истории.

Решение:
Создан дополнительные реквизиты История (строка, 500) и Пробег (число, 15) для ТЧ.
В регистр...
Аватар для Maks
Супер-модератор
Старый
Кредитный калькулятор
Запись от Maks размещена 05.08.2026 в 07:22. Обновил(-а) Maks 05.08.2026 в 15:49
Показов 2651 Комментарии 0

Решение задачи по прикладной информатике средствами 1С.

Задача:
Напишите приложение-калькулятор, которое помогает рассчитывать параметры кредита для аннуитетного и дифференцированного видов платежей: ежемесячный платёж, общую сумму выплат и переплату по процентам.

Решение:
Создано расширение конфигурации, в данном расширении создано перечисление "ВидыПлатежей" со...
Аватар для Maks
Супер-модератор
Старый
Создание формы заимствованного документа
Запись от Maks размещена 03.08.2026 в 13:24. Обновил(-а) Maks 03.08.2026 в 13:25
Показов 1584 Комментарии 0

Задача:
Необходимо создать собственную форму заимствованного документа. На форме должен быть реквизит "Покупатель", а также
табличная часть со следующими реквизитами:
- Расчетный счет покупателя
- Расчетный счет
- Валюта
- Сумма в валюте
- Сумма...
Аватар для Maks
Супер-модератор
Старый
Задача предоставления скидок покупателям
Запись от Maks размещена 03.08.2026 в 09:15
Показов 1777 Комментарии 0

Задача:
В документе "Продажи" необходимо реализовать функционал предоставления скидок покупателям. Скидка должна автоматически рассчитываться и подставляться в соответствующее поле при выборе покупателя. Скидка рассчитывается в зависимости от потраченной суммы покупателем...
Аватар для Maks
Супер-модератор
Старый
Очистка реквизитов и табличных частей документа при копировании (вариант 2)
Запись от Maks размещена 26.07.2026 в 21:10. Обновил(-а) Maks 27.07.2026 в 20:01
Показов 2021 Комментарии 0

Алгоритм из решения ниже разработан на примере нетипового документа "ЗаявкаНаРаботу", разработанного в КА2.
Задача: Заменить алгоритм запрета копирования документов для сотрудников с ролью "Стажер", на очистку документов при копировании, с сохранением значения реквизита "Организация".

Предыдущий код:
1C
1
2
Процедура ПриКопировании(ОбъектКопирования)
    Если РольДоступна("Стажер")
...
Аватар для Maks
Супер-модератор
Старый
Расчёт периметра прямоугольника по координатам вершин
Запись от Maks размещена 18.07.2026 в 10:14
Показов 696 Комментарии 0

Решение задачи по прикладной информатике средствами 1С.

Задача:
Вычислить периметр прямоугольника, заданного координатами своих вершин на плоскости.

Решение:
Создан документ со следующими реквизитами:
• АХ (синоним «Координата X вершины A», тип Число, длина 10, точность 2);
• АY (синоним «Координата Y вершины A», тип Число,...
Аватар для Maks
Супер-модератор
Старый
Подсчёт количества трёхбуквенных слов в тексте
Запись от Maks размещена 18.07.2026 в 10:07. Обновил(-а) Maks 19.07.2026 в 06:44
Показов 671 Комментарии 0

Решение задачи по прикладной информатике средствами 1С.

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

Решение:
Создан документ с единственным реквизитом Текст (тип Строка, длина 200).
В модуле формы документа создана команда формы «НайтиСлова» (синоним, «Найти трехбуквенные слова»), которой задан следующий алгоритм:
1C
1
2
&НаКлиенте
Процедура НайтиСлова(Команда)
...
Аватар для Maks
Супер-модератор
Старый
Сумма и количество положительных элементов в чётных строках массива
Запись от Maks размещена 18.07.2026 в 09:59
Показов 621 Комментарии 0

Решение задачи по прикладной информатике средствами 1С.

Задача:
Вычислить сумму и количество положительных элементов массива, расположенных в четных строках.

Решение:
Создан документ с реквизитами РезультатСуммы и РезультатКоличества (тип Число, Длина 10, точность 0), также создана табличная часть «Числа» с реквизитом Число...
Аватар для Maks
Супер-модератор
Старый
Поиск произведения положительных чётных чисел в последовательности
Запись от Maks размещена 18.07.2026 в 09:54. Обновил(-а) Maks 18.07.2026 в 19:49
Показов 616 Комментарии 0

Решение задачи по прикладной информатике средствами 1С.

Задача:
Дана произвольная последовательность целых чисел. Найти произведение положительных четных чисел данной последовательности.

Решение:
Создан документ с реквизитом: Результат (тип Число, Длина 10, точность 0) и табличной частью «Числа» с реквизитом Число (тип Число, Длина 10, точность...
Аватар для Maks
Супер-модератор
Старый
Обработка трёх чисел: утроение и возведение в степень
Запись от Maks размещена 18.07.2026 в 09:49
Показов 558 Комментарии 0

Решение задачи по прикладной информатике средствами 1С.

Задача:
Даны три действительных числа. Утроить те из них, значения которых неотрицательны, и возвести в четвертую степень отрицательные.

Решение:
Создан документ с реквизитами: Число1, Число2, Число3 (тип Число, Длина 10, точность 0) и РезультатЧисла1, РезультатЧисла2, РезультатЧисла3(тип Строка,...
Аватар для Maks
Супер-модератор
Старый
Расчёт стоимости яблок по весу
Запись от Maks размещена 18.07.2026 в 09:44. Обновил(-а) Maks 18.07.2026 в 18:00
Показов 856 Комментарии 0

Решение задачи по прикладной информатике средствами 1С.

Задача:
Написать программу вычисления стоимости некоторого количества (по весу) яблок.

Решение:
Создан документ, с табличной частью «Яблоки» со следующими реквизитами:
• Наименование (тип Строка, длина 25) – в реальных проектах используется тип СправочникСсылка.Номенклатура, но для учебного примера строки будет достаточно.
• Цена (тип Число, длина 10, точность...
Аватар для Maks
Супер-модератор
Старый
Запрет пометки на удаление и отмены проведения
Запись от Maks размещена 16.07.2026 в 08:55. Обновил(-а) Maks 20.07.2026 в 06:50
Показов 1088 Комментарии 0

Алгоритм из решения ниже реализован на нетиповом документе "ПутевойЛист" разработанного в КА2.
Задача: запретить помечать на удаление и отменять проведения путевого листа при условии, если он сдан (реквизит "Сдан" типа булево установлен в значение Истина).
1C
1
2
3
4
// Функция для определения значения реквизита
Функция ПутевойЛистСдан(ТекДок)
    Возврат ТекДок.Сдан;
КонецФункции
...
Аватар для Maks
Супер-модератор
Старый
Установка статуса документа по условию
Запись от Maks размещена 05.07.2026 в 08:59
Показов 1305 Комментарии 0

Алгоритм из решения ниже реализован на нетиповом документе "НарядПутевка" разработанного в КА2.
Задача: в табличной части "Материалы" документа при записи автоматически устанавливать статус "Возврат" при условии, если ранее выданный материал был полностью...
Аватар для Maks
Супер-модератор
Старый
Контроль уникальности строк в табличной части документа
Запись от Maks размещена 18.06.2026 в 20:44. Обновил(-а) Maks 18.06.2026 в 20:48
Показов 1456 Комментарии 1

Алгоритм из решения ниже разработан на примере нетипового документа "ПланированиеСпецтехники" с табличной частью "НаличиеОборудования", разработанного в КА2.
Задача: контроль уникальности строк в табличной части документа, чтобы нельзя было выбрать одно и то же оборудование дважды.
1C
1
2
3
    // Задаем переменную
    ТекущаяСтрока = Элементы.НаличиеОборудования.ТекущиеДанные;
    // Проверяем
...
Аватар для Maks
Супер-модератор
Старый
Контроль уникальности выбранного документа-основания при изменении реквизита
Запись от Maks размещена 28.04.2026 в 06:56
Показов 6174 Комментарии 2

Алгоритм из решения ниже разработан на примере нетипового документа "ЗаявкаНаРемонтСпецтехники", разработанного в КА2.
Задача: уведомлять пользователя, если указанная заявка (документ-основание) выбран в другом документе.
1C
1
2
3
4
5
6
&НаСервере
Процедура ЗаполнитьДокументПоЗаявке()
    Запрос = Новый Запрос;
    Запрос.Текст = 
        "ВЫБРАТЬ
        |   Расход.Регистратор.Ссылка
...
Аватар для Maks
Супер-модератор
Старый
Валидация и контроль данных табличной части документа перед записью
Запись от Maks размещена 22.04.2026 в 12:25
Показов 6957 Комментарии 0

Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в КА2.
Задача: контроль и валидация данных табличной части документа перед записью с учетом регламента компании Заказчика и прав доступа.

1C
1
2
3
4
5
// Установка глобальной переменной на клиенте
&НаКлиенте
перем мРассчитано
 
// Установка значения для глобальной переменной
...
Аватар для Maks
Супер-модератор
Старый
Отчёт о затраченных материалах за определенный период с макетом печатной формы
Запись от Maks размещена 21.04.2026 в 06:37. Обновил(-а) Maks 21.04.2026 в 16:23
Показов 6090 Комментарии 0

Отчёт из решения ниже размещён в конфигурации КА2.
Задача: разработка отчёта по затраченным материалам за определённый период, с возможностью вывода печатной формы отчёта с шапкой и подвалом.
В качестве источника данных выбран оборотный регистр сведений, куда пишутся данные из нетипового документа "НарядПутевка".
1C
1
2
3
ВЫБРАТЬ
    РасходВМПВА.Регистратор.Дата КАК рДата,
    РасходВМПВА.Регистратор.Номер
...
Аватар для Maks
Супер-модератор
Старый
Отчёт о спецтехнике находящейся в ремонте
Запись от Maks размещена 20.04.2026 в 06:55. Обновил(-а) Maks 21.04.2026 в 14:14
Показов 4639 Комментарии 0
Метки , ка2, отчет, скд

Отчёт из решения ниже размещен в конфигурации КА2.
Задача: отобразить спецтехнику, которая на данный момент находится в ремонте.
Есть нетиповой документ "Заявка на ремонт спецтехники" который пишется в регистр сведений.
Одним из ключевых реквизитов данного документа является "Статус"(Перечисление.СтатусРемонтаТ С).
Собственно, источником данных для запроса как раз и выбран указанный регистр.
1C
1
2
ВЫБРАТЬ
    СтатусыРемонтаСпецтехники.Локация
...
Аватар для Maks
Супер-модератор
Старый
Запрет удаления строк ТЧ документа при определённом условии
Запись от Maks размещена 19.04.2026 в 15:55. Обновил(-а) Maks 21.04.2026 в 06:39
Показов 3738 Комментарии 0

Алгоритм из решения ниже реализован на примере нетипового документа "Аккумуляторы", разработанного в конфигурации КА2. У данного документа есть ТЧ, в которой в зависимости от прав доступа пользователя доступна возможность правки определенных реквизитов. Данная возможность реализуется в процедуре "ПриОткрытииНаСервере"
1C
1
2
3
&НаСервере
Процедура ПриОткрытииНаСервере()
    Разрешено = РольДоступна("Бухгалтер")
...
Аватар для Maks
Супер-модератор
Старый
Рейтинг: 1.00. Голосов: 1.
Фиксация колонок в отчёте СКД
Запись от Maks размещена 14.04.2026 в 12:38. Обновил(-а) Maks 21.04.2026 в 06:40
Показов 3668 Комментарии 0

Фиксация колонок в СКД отчета типа Таблица.
Задача: зафиксировать три левых колонки в отчете.
1C
1
2
3
4
Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка)
    // Отключаем стандартную обработку и получаем настройки СКД
    СтандартнаяОбработка = Ложь;
    Настройки
...
Аватар для Maks
Супер-модератор
Старый
Оптимизация кода на разграничение прав доступа к элементам формы
Запись от Maks размещена 13.04.2026 в 09:33
Показов 2894 Комментарии 0

Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2.
Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива.

Было так:
1C
1
2
    Если РольДоступна("ГлавныйМеханик") И Не РольДоступна("НачальникТранспортногоУчастка") Тогда     
        Элементы.ВыполненныеРаботы.ТолькоПросмотр
...
Аватар для Maks
Супер-модератор
Старый
Контроль заполнения и очистка дат в зависимости от значения перечислений
Запись от Maks размещена 12.04.2026 в 07:06. Обновил(-а) Maks 19.04.2026 в 14:56
Показов 3432 Комментарии 0

Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2.
Задача: реализовать контроль корректности заполнения дат назначения сотрудников в зависимости от их статуса (Перечисления.СтатусСотрудника):...
Аватар для Maks
Супер-модератор
Старый
Подстановка значения реквизита справочника в табличную часть документа
Запись от Maks размещена 10.04.2026 в 22:27. Обновил(-а) Maks 16.04.2026 в 07:10
Показов 2811 Комментарии 0

Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2.
Задача №1: при указании работ (справочник РаботыПоРемонтуСпецтехники), подставлять значение в реквизит "НормаВремени" в ТЧ "ВыполненныеРаботы".
1C
1
2
3
// Норма времени для выбранного значения
&НаСервереБезКонтекста
Функция ПолучитьНормуВремени(Ссылка)
...
Аватар для Maks
Супер-модератор
Старый
Очистка реквизитов и табличных частей документа при копировании (вариант 1)
Запись от Maks размещена 09.04.2026 в 22:38. Обновил(-а) Maks 27.07.2026 в 20:02
Показов 3091 Комментарии 0

Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях.
Задача: при копировании документа очищать определенные реквизиты и табличную часть.

1C
1
2
3
4
Процедура ПриКопировании(ОбъектКопирования)
    // Очистка реквизита тип Дата
    ДатаДоставки = Дата(1,1,1); // ИЛИ '00010101'
    // Очистка реквизита типа Булево
...
Аватар для Maks
Супер-модератор
Старый
Блокировка документа от изменений, если он открыт у другого пользователя
Запись от Maks размещена 08.04.2026 в 22:02
Показов 3609 Комментарии 0

Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2.
Задача: запретить редактирование документа, если он открыт у другого пользователя.
1C
1
2
// Проверяем документ на предмет его использования в данный момент другим пользователем
// При необходимости, выводим соответствующее предупреждение, открыв документ
...
Аватар для Maks
Супер-модератор
Старый
Использование значений реквизитов справочника в документе, с определенными условиями и правами
Запись от Maks размещена 07.04.2026 в 22:05. Обновил(-а) Maks 12.04.2026 в 09:50
Показов 1833 Комментарии 0

1. Контроль срока действия договора

Алгоритм из решения ниже реализован на примере нетипового документа "ЗаявкаНаРаботу", разработанного в конфигурации КА2.
Задача: уведомлять пользователя, если в документе выбран договор с истекшим сроком действия (справочник Договоры).
При помощи функции с запросом получаем срок действия договора и возращаем результат:
1C
1
2
&НаСервереБезКонтекста
Функция ПроверкаДатыДоговора(Договор)
...
Аватар для Maks
Супер-модератор
Старый
Доступность команды формы по условию
Запись от Maks размещена 07.04.2026 в 06:29. Обновил(-а) Maks 08.04.2026 в 06:27
Показов 1881 Комментарии 0

Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2.
Задача: сделать доступной кнопку (команда формы "ЗавершитьСписание") при условии, если документ проведен.

Вариант 1: с выносом алгоритма доступности в отдельную процедуру:
1C
1
2
3
&НаКлиенте
Процедура УстановитьДоступность() 
    // Условия для отображения команды
...
Аватар для Maks
Супер-модератор
Старый
Уведомление о неверно выбранном значении справочника
Запись от Maks размещена 06.04.2026 в 06:40
Показов 1680 Комментарии 0

Алгоритм из решения ниже реализован на примере нетипового документа "НарядПутевка", разработанного в конфигурации КА2.
Задача: уведомлять пользователя, если в документе выбран неверный склад (справочник "Склады").
Реализован отбор складов по группе, ранее опубликованным методом.
Далее, программно установлен фильтр по маске наименования, не позволяющий записать документ с неверно выбранным складом:
1C
1
2
&НаСервере
Процедура ПередЗаписьюНаСервере(Отказ,
...
Аватар для Maks
Супер-модератор
Старый
Отображение реквизитов в документе по условию и контроль их заполнения
Запись от Maks размещена 04.04.2026 в 22:03. Обновил(-а) Maks 05.04.2026 в 06:37
Показов 2251 Комментарии 0

Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеСпецтехники", разработанного в конфигурации КА2.
Данный документ берёт данные из другого нетипового документа "ЗаявкаНаРаботу" в той же конфигурации.

Задача:
1. Добавить реквизиты "Сотрудник" (тип СправочникСсылка.Сотрудники) и "Спецтехника" (тип СправочникСсылка.Спецтехника),...
Аватар для Maks
Супер-модератор
Новые блоги и статьи
Hyper-V: Компьютер должен поддерживать доверенный платформенный модуль 2.0.
Maks 31.08.2026
При установке Windows 11 на виртуальную машину Hyper-V 2-го поколения вылезла такая ошибка: Решение: в параметрах виртуальной машины, в разделе "Безопасность" (Security) активировать флаг. . .
Архитектура биовида Стива в Майнкрафте: Зачем бонобо кубический каннибализм
anaschu 30.08.2026
Кубический Вагинокапитализм в Minecraft: Математический инвариант ОДУ и рок Стивов-бонобо Главная задача разработанной «Модели Всего» — наглядно продемонстрировать наличие системной «судьбы». . .
Оттачиваю умение писать js программы.
russiannick 30.08.2026
Проектом выходного дня стало написание Книги шифров Виженера. Итогом стала версия 200, синий туман. Синий туман назван так, потому что замораживает текст под собой. Нажатие синих кнопок управляют. . .
мат медиц модель 30. презентация проекта
anaschu 27.08.2026
хоп хоп хоп хидахоп, а я кладую))
Как у меня протекала болезнь
zorxor 27.08.2026
Здравствуйте, друзья! Эта запись блога предназначена именно для вас - для моих дорогих друзей, которые знали меня лично. Чтобы ответить на вопрос - а что же со мной произошло на самом деле? Я учился. . .
Нашел вот забавное видео о измерениях. Лучшее что я видел на эту тему
kumehtar 26.08.2026
ILETXiw9bMQ Основная суть и тезисы по измерениям: 0D (Нулевое измерение): точка, не имеющая длины, ширины, высоты или объема. Объект не может перемещаться в 0D. 1D (Первое измерение):. . .
[EasyBuilder Pro] Памятка по разработке для панелей Weintek
ФедосеевПавел 26.08.2026
Памятка по разработке для панелей Weintek ВВЕДЕНИЕ Ранее, при реализации проектов основное внимание уделял разработке управляющей программы для контроллера, а панели оператора доставалось время. . .
Модель по догадкам
anaschu 25.08.2026
Прошло две недели. Я уже рассказывал, как разговаривал с сотрудниками у сортировки и как понял, что главная ветка — не про приёмку, а про отбор. Но тогда я думал, что понял механику. На этой неделе я. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru