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

Димон, привет!

В Альфа-Авто (как и в большинстве типовых конфигураций 1С на базе УТ/КА) основная единица измерения номенклатуры хранится в реквизите справочника «Номенклатура» — обычно это реквизит «ЕдиницаИзмерения» (или аналогичный, зависит от конфигурации).

Если у тебя есть объект номенклатуры, полученный через ПолучитьОбъект(), и у тебя уже есть базовая единица измерения (справочник «ЕдиницыИзмерения»), и ты хочешь программно установить основную единицу по наименованию, то алгоритм такой:

1. Найти объект справочника «ЕдиницыИзмерения» по наименованию, которое совпадает с наименованием основной единицы.

2. Присвоить найденный объект в реквизит «ЕдиницаИзмерения» объекта номенклатуры.

3. Записать объект номенклатуры.

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

1С (Код)

// Получаем объект номенклатуры НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру); // Наименование основной единицы, которую нужно установить ИмяЕдиницы = "шт"; // например, "шт" // Ищем единицу измерения по наименованию Единица = Справочники.ЕдиницыИзмерения.НайтиПоНаименованию(ИмяЕдиницы); Если Единица = Неопределено Тогда // Если не нашли, можно создать новую единицу или обработать ошибку Сообщить("Единица измерения с наименованием '" + ИмяЕдиницы + "' не найдена."); Иначе // Устанавливаем основную единицу измерения НоменклатураОбъект.ЕдиницаИзмерения = Единица; // Записываем изменения НоменклатураОбъект.Записать(); КонецЕсли;

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

// Получаем объект номенклатуры НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру);   // Наименование основной единицы, которую нужно установить ИмяЕдиницы = "шт"; // например, "шт"   // Ищем единицу измерения по наименованию Единица = Справочники.ЕдиницыИзмерения.НайтиПоНаименованию(ИмяЕдиницы);   Если Единица = Неопределено Тогда     // Если не нашли, можно создать новую единицу или обработать ошибку     Сообщить("Единица измерения с наименованием '" + ИмяЕдиницы + "' не найдена."); Иначе     // Устанавливаем основную единицу измерения     НоменклатураОбъект.ЕдиницаИзмерения = Единица;     // Записываем изменения     НоменклатураОбъект.Записать(); КонецЕсли;

Если в конфигурации Альфа-Авто используется другой реквизит или структура, то нужно уточнить точное имя реквизита, но обычно это «ЕдиницаИзмерения».

Если же у тебя есть несколько единиц измерения и нужно именно «Основная» (например, в табличной части «ЕдиницыИзмеренияНоменклатуры»), то тогда нужно:

— Найти нужную строку в табличной части по наименованию единицы.

— Установить флаг «Основная» (если есть такой реквизит) или переместить эту единицу в основную.

Пример для табличной части:

1С (Код)

НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру); ИмяЕдиницы = "шт"; ОсновнаяУстановлена = Ложь; Для Каждого Строка Из НоменклатураОбъект.ЕдиницыИзмерения Цикл Если Строка.ЕдиницаИзмерения.Наименование = ИмяЕдиницы Тогда Строка.Основная = Истина; // если есть такой реквизит ОсновнаяУстановлена = Истина; Иначе Строка.Основная = Ложь; КонецЕсли; КонецЦикла; Если ОсновнаяУстановлена Тогда НоменклатураОбъект.Записать(); Иначе Сообщить("Единица измерения '" + ИмяЕдиницы + "' не найдена в списке единиц номенклатуры."); КонецЕсли;

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

НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру);   ИмяЕдиницы = "шт";   ОсновнаяУстановлена = Ложь;   Для Каждого Строка Из НоменклатураОбъект.ЕдиницыИзмерения Цикл     Если Строка.ЕдиницаИзмерения.Наименование = ИмяЕдиницы Тогда         Строка.Основная = Истина; // если есть такой реквизит         ОсновнаяУстановлена = Истина;     Иначе         Строка.Основная = Ложь;     КонецЕсли; КонецЦикла;   Если ОсновнаяУстановлена Тогда     НоменклатураОбъект.Записать(); Иначе     Сообщить("Единица измерения '" + ИмяЕдиницы + "' не найдена в списке единиц номенклатуры."); КонецЕсли;

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

Если не знаешь точное имя реквизита, можно посмотреть через Конфигуратор или через отладчик.

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

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

Димон, привет!

В Альфа-Авто (как и в большинстве типовых конфигураций 1С на базе УТ/КА) основная единица измерения номенклатуры хранится в реквизите справочника «Номенклатура» — обычно это реквизит «ЕдиницаИзмерения» (или аналогичный, зависит от конфигурации).

Если у тебя есть объект номенклатуры, полученный через ПолучитьОбъект(), и у тебя уже есть базовая единица измерения (справочник «ЕдиницыИзмерения»), и ты хочешь программно установить основную единицу по наименованию, то алгоритм такой:

1. Найти объект справочника «ЕдиницыИзмерения» по наименованию, которое совпадает с наименованием основной единицы.

2. Присвоить найденный объект в реквизит «ЕдиницаИзмерения» объекта номенклатуры.

3. Записать объект номенклатуры.

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

1С (Код)

// Получаем объект номенклатуры НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру); // Наименование основной единицы, которую нужно установить ИмяЕдиницы = "шт"; // например, "шт" // Ищем единицу измерения по наименованию Единица = Справочники.ЕдиницыИзмерения.НайтиПоНаименованию(ИмяЕдиницы); Если Единица = Неопределено Тогда // Если не нашли, можно создать новую единицу или обработать ошибку Сообщить("Единица измерения с наименованием '" + ИмяЕдиницы + "' не найдена."); Иначе // Устанавливаем основную единицу измерения НоменклатураОбъект.ЕдиницаИзмерения = Единица; // Записываем изменения НоменклатураОбъект.Записать(); КонецЕсли;

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

// Получаем объект номенклатуры НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру);   // Наименование основной единицы, которую нужно установить ИмяЕдиницы = "шт"; // например, "шт"   // Ищем единицу измерения по наименованию Единица = Справочники.ЕдиницыИзмерения.НайтиПоНаименованию(ИмяЕдиницы);   Если Единица = Неопределено Тогда     // Если не нашли, можно создать новую единицу или обработать ошибку     Сообщить("Единица измерения с наименованием '" + ИмяЕдиницы + "' не найдена."); Иначе     // Устанавливаем основную единицу измерения     НоменклатураОбъект.ЕдиницаИзмерения = Единица;     // Записываем изменения     НоменклатураОбъект.Записать(); КонецЕсли;

Если в конфигурации Альфа-Авто используется другой реквизит или структура, то нужно уточнить точное имя реквизита, но обычно это «ЕдиницаИзмерения».

Если же у тебя есть несколько единиц измерения и нужно именно «Основная» (например, в табличной части «ЕдиницыИзмеренияНоменклатуры»), то тогда нужно:

— Найти нужную строку в табличной части по наименованию единицы.

— Установить флаг «Основная» (если есть такой реквизит) или переместить эту единицу в основную.

Пример для табличной части:

1С (Код)

НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру); ИмяЕдиницы = "шт"; ОсновнаяУстановлена = Ложь; Для Каждого Строка Из НоменклатураОбъект.ЕдиницыИзмерения Цикл Если Строка.ЕдиницаИзмерения.Наименование = ИмяЕдиницы Тогда Строка.Основная = Истина; // если есть такой реквизит ОсновнаяУстановлена = Истина; Иначе Строка.Основная = Ложь; КонецЕсли; КонецЦикла; Если ОсновнаяУстановлена Тогда НоменклатураОбъект.Записать(); Иначе Сообщить("Единица измерения '" + ИмяЕдиницы + "' не найдена в списке единиц номенклатуры."); КонецЕсли;

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

НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру);   ИмяЕдиницы = "шт";   ОсновнаяУстановлена = Ложь;   Для Каждого Строка Из НоменклатураОбъект.ЕдиницыИзмерения Цикл     Если Строка.ЕдиницаИзмерения.Наименование = ИмяЕдиницы Тогда         Строка.Основная = Истина; // если есть такой реквизит         ОсновнаяУстановлена = Истина;     Иначе         Строка.Основная = Ложь;     КонецЕсли; КонецЦикла;   Если ОсновнаяУстановлена Тогда     НоменклатураОбъект.Записать(); Иначе     Сообщить("Единица измерения '" + ИмяЕдиницы + "' не найдена в списке единиц номенклатуры."); КонецЕсли;

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

Если не знаешь точное имя реквизита, можно посмотреть через Конфигуратор или через отладчик.

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

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

Димон, привет!

В Альфа-Авто (как и в большинстве типовых конфигураций 1С на базе УТ/КА) основная единица измерения номенклатуры хранится в реквизите справочника «Номенклатура» — обычно это реквизит «ЕдиницаИзмерения» (или аналогичный, зависит от конфигурации).

Если у тебя есть объект номенклатуры, полученный через ПолучитьОбъект(), и у тебя уже есть базовая единица измерения (справочник «ЕдиницыИзмерения»), и ты хочешь программно установить основную единицу по наименованию, то алгоритм такой:

1. Найти объект справочника «ЕдиницыИзмерения» по наименованию, которое совпадает с наименованием основной единицы.

2. Присвоить найденный объект в реквизит «ЕдиницаИзмерения» объекта номенклатуры.

3. Записать объект номенклатуры.

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

1С (Код)

// Получаем объект номенклатуры НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру); // Наименование основной единицы, которую нужно установить ИмяЕдиницы = "шт"; // например, "шт" // Ищем единицу измерения по наименованию Единица = Справочники.ЕдиницыИзмерения.НайтиПоНаименованию(ИмяЕдиницы); Если Единица = Неопределено Тогда // Если не нашли, можно создать новую единицу или обработать ошибку Сообщить("Единица измерения с наименованием '" + ИмяЕдиницы + "' не найдена."); Иначе // Устанавливаем основную единицу измерения НоменклатураОбъект.ЕдиницаИзмерения = Единица; // Записываем изменения НоменклатураОбъект.Записать(); КонецЕсли;

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

// Получаем объект номенклатуры НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру);   // Наименование основной единицы, которую нужно установить ИмяЕдиницы = "шт"; // например, "шт"   // Ищем единицу измерения по наименованию Единица = Справочники.ЕдиницыИзмерения.НайтиПоНаименованию(ИмяЕдиницы);   Если Единица = Неопределено Тогда     // Если не нашли, можно создать новую единицу или обработать ошибку     Сообщить("Единица измерения с наименованием '" + ИмяЕдиницы + "' не найдена."); Иначе     // Устанавливаем основную единицу измерения     НоменклатураОбъект.ЕдиницаИзмерения = Единица;     // Записываем изменения     НоменклатураОбъект.Записать(); КонецЕсли;

Если в конфигурации Альфа-Авто используется другой реквизит или структура, то нужно уточнить точное имя реквизита, но обычно это «ЕдиницаИзмерения».

Если же у тебя есть несколько единиц измерения и нужно именно «Основная» (например, в табличной части «ЕдиницыИзмеренияНоменклатуры»), то тогда нужно:

— Найти нужную строку в табличной части по наименованию единицы.

— Установить флаг «Основная» (если есть такой реквизит) или переместить эту единицу в основную.

Пример для табличной части:

1С (Код)

НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру); ИмяЕдиницы = "шт"; ОсновнаяУстановлена = Ложь; Для Каждого Строка Из НоменклатураОбъект.ЕдиницыИзмерения Цикл Если Строка.ЕдиницаИзмерения.Наименование = ИмяЕдиницы Тогда Строка.Основная = Истина; // если есть такой реквизит ОсновнаяУстановлена = Истина; Иначе Строка.Основная = Ложь; КонецЕсли; КонецЦикла; Если ОсновнаяУстановлена Тогда НоменклатураОбъект.Записать(); Иначе Сообщить("Единица измерения '" + ИмяЕдиницы + "' не найдена в списке единиц номенклатуры."); КонецЕсли;

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

НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру);   ИмяЕдиницы = "шт";   ОсновнаяУстановлена = Ложь;   Для Каждого Строка Из НоменклатураОбъект.ЕдиницыИзмерения Цикл     Если Строка.ЕдиницаИзмерения.Наименование = ИмяЕдиницы Тогда         Строка.Основная = Истина; // если есть такой реквизит         ОсновнаяУстановлена = Истина;     Иначе         Строка.Основная = Ложь;     КонецЕсли; КонецЦикла;   Если ОсновнаяУстановлена Тогда     НоменклатураОбъект.Записать(); Иначе     Сообщить("Единица измерения '" + ИмяЕдиницы + "' не найдена в списке единиц номенклатуры."); КонецЕсли;

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

Если не знаешь точное имя реквизита, можно посмотреть через Конфигуратор или через отладчик.

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

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

Димон, привет!

В Альфа-Авто (как и в большинстве типовых конфигураций 1С на базе УТ/КА) основная единица измерения номенклатуры хранится в реквизите справочника «Номенклатура» — обычно это реквизит «ЕдиницаИзмерения» (или аналогичный, зависит от конфигурации).

Если у тебя есть объект номенклатуры, полученный через ПолучитьОбъект(), и у тебя уже есть базовая единица измерения (справочник «ЕдиницыИзмерения»), и ты хочешь программно установить основную единицу по наименованию, то алгоритм такой:

1. Найти объект справочника «ЕдиницыИзмерения» по наименованию, которое совпадает с наименованием основной единицы.

2. Присвоить найденный объект в реквизит «ЕдиницаИзмерения» объекта номенклатуры.

3. Записать объект номенклатуры.

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

1С (Код)

// Получаем объект номенклатуры НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру); // Наименование основной единицы, которую нужно установить ИмяЕдиницы = "шт"; // например, "шт" // Ищем единицу измерения по наименованию Единица = Справочники.ЕдиницыИзмерения.НайтиПоНаименованию(ИмяЕдиницы); Если Единица = Неопределено Тогда // Если не нашли, можно создать новую единицу или обработать ошибку Сообщить("Единица измерения с наименованием '" + ИмяЕдиницы + "' не найдена."); Иначе // Устанавливаем основную единицу измерения НоменклатураОбъект.ЕдиницаИзмерения = Единица; // Записываем изменения НоменклатураОбъект.Записать(); КонецЕсли;

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

// Получаем объект номенклатуры НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру);   // Наименование основной единицы, которую нужно установить ИмяЕдиницы = "шт"; // например, "шт"   // Ищем единицу измерения по наименованию Единица = Справочники.ЕдиницыИзмерения.НайтиПоНаименованию(ИмяЕдиницы);   Если Единица = Неопределено Тогда     // Если не нашли, можно создать новую единицу или обработать ошибку     Сообщить("Единица измерения с наименованием '" + ИмяЕдиницы + "' не найдена."); Иначе     // Устанавливаем основную единицу измерения     НоменклатураОбъект.ЕдиницаИзмерения = Единица;     // Записываем изменения     НоменклатураОбъект.Записать(); КонецЕсли;

Если в конфигурации Альфа-Авто используется другой реквизит или структура, то нужно уточнить точное имя реквизита, но обычно это «ЕдиницаИзмерения».

Если же у тебя есть несколько единиц измерения и нужно именно «Основная» (например, в табличной части «ЕдиницыИзмеренияНоменклатуры»), то тогда нужно:

— Найти нужную строку в табличной части по наименованию единицы.

— Установить флаг «Основная» (если есть такой реквизит) или переместить эту единицу в основную.

Пример для табличной части:

1С (Код)

НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру); ИмяЕдиницы = "шт"; ОсновнаяУстановлена = Ложь; Для Каждого Строка Из НоменклатураОбъект.ЕдиницыИзмерения Цикл Если Строка.ЕдиницаИзмерения.Наименование = ИмяЕдиницы Тогда Строка.Основная = Истина; // если есть такой реквизит ОсновнаяУстановлена = Истина; Иначе Строка.Основная = Ложь; КонецЕсли; КонецЦикла; Если ОсновнаяУстановлена Тогда НоменклатураОбъект.Записать(); Иначе Сообщить("Единица измерения '" + ИмяЕдиницы + "' не найдена в списке единиц номенклатуры."); КонецЕсли;

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

НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру);   ИмяЕдиницы = "шт";   ОсновнаяУстановлена = Ложь;   Для Каждого Строка Из НоменклатураОбъект.ЕдиницыИзмерения Цикл     Если Строка.ЕдиницаИзмерения.Наименование = ИмяЕдиницы Тогда         Строка.Основная = Истина; // если есть такой реквизит         ОсновнаяУстановлена = Истина;     Иначе         Строка.Основная = Ложь;     КонецЕсли; КонецЦикла;   Если ОсновнаяУстановлена Тогда     НоменклатураОбъект.Записать(); Иначе     Сообщить("Единица измерения '" + ИмяЕдиницы + "' не найдена в списке единиц номенклатуры."); КонецЕсли;

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

Если не знаешь точное имя реквизита, можно посмотреть через Конфигуратор или через отладчик.

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

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

Димон, привет!

В Альфа-Авто (как и в большинстве типовых конфигураций 1С на базе УТ/КА) основная единица измерения номенклатуры хранится в реквизите справочника «Номенклатура» — обычно это реквизит «ЕдиницаИзмерения» (или аналогичный, зависит от конфигурации).

Если у тебя есть объект номенклатуры, полученный через ПолучитьОбъект(), и у тебя уже есть базовая единица измерения (справочник «ЕдиницыИзмерения»), и ты хочешь программно установить основную единицу по наименованию, то алгоритм такой:

1. Найти объект справочника «ЕдиницыИзмерения» по наименованию, которое совпадает с наименованием основной единицы.

2. Присвоить найденный объект в реквизит «ЕдиницаИзмерения» объекта номенклатуры.

3. Записать объект номенклатуры.

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

1С (Код)

// Получаем объект номенклатуры НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру); // Наименование основной единицы, которую нужно установить ИмяЕдиницы = "шт"; // например, "шт" // Ищем единицу измерения по наименованию Единица = Справочники.ЕдиницыИзмерения.НайтиПоНаименованию(ИмяЕдиницы); Если Единица = Неопределено Тогда // Если не нашли, можно создать новую единицу или обработать ошибку Сообщить("Единица измерения с наименованием '" + ИмяЕдиницы + "' не найдена."); Иначе // Устанавливаем основную единицу измерения НоменклатураОбъект.ЕдиницаИзмерения = Единица; // Записываем изменения НоменклатураОбъект.Записать(); КонецЕсли;

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

// Получаем объект номенклатуры НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру);   // Наименование основной единицы, которую нужно установить ИмяЕдиницы = "шт"; // например, "шт"   // Ищем единицу измерения по наименованию Единица = Справочники.ЕдиницыИзмерения.НайтиПоНаименованию(ИмяЕдиницы);   Если Единица = Неопределено Тогда     // Если не нашли, можно создать новую единицу или обработать ошибку     Сообщить("Единица измерения с наименованием '" + ИмяЕдиницы + "' не найдена."); Иначе     // Устанавливаем основную единицу измерения     НоменклатураОбъект.ЕдиницаИзмерения = Единица;     // Записываем изменения     НоменклатураОбъект.Записать(); КонецЕсли;

Если в конфигурации Альфа-Авто используется другой реквизит или структура, то нужно уточнить точное имя реквизита, но обычно это «ЕдиницаИзмерения».

Если же у тебя есть несколько единиц измерения и нужно именно «Основная» (например, в табличной части «ЕдиницыИзмеренияНоменклатуры»), то тогда нужно:

— Найти нужную строку в табличной части по наименованию единицы.

— Установить флаг «Основная» (если есть такой реквизит) или переместить эту единицу в основную.

Пример для табличной части:

1С (Код)

НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру); ИмяЕдиницы = "шт"; ОсновнаяУстановлена = Ложь; Для Каждого Строка Из НоменклатураОбъект.ЕдиницыИзмерения Цикл Если Строка.ЕдиницаИзмерения.Наименование = ИмяЕдиницы Тогда Строка.Основная = Истина; // если есть такой реквизит ОсновнаяУстановлена = Истина; Иначе Строка.Основная = Ложь; КонецЕсли; КонецЦикла; Если ОсновнаяУстановлена Тогда НоменклатураОбъект.Записать(); Иначе Сообщить("Единица измерения '" + ИмяЕдиницы + "' не найдена в списке единиц номенклатуры."); КонецЕсли;

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

НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру);   ИмяЕдиницы = "шт";   ОсновнаяУстановлена = Ложь;   Для Каждого Строка Из НоменклатураОбъект.ЕдиницыИзмерения Цикл     Если Строка.ЕдиницаИзмерения.Наименование = ИмяЕдиницы Тогда         Строка.Основная = Истина; // если есть такой реквизит         ОсновнаяУстановлена = Истина;     Иначе         Строка.Основная = Ложь;     КонецЕсли; КонецЦикла;   Если ОсновнаяУстановлена Тогда     НоменклатураОбъект.Записать(); Иначе     Сообщить("Единица измерения '" + ИмяЕдиницы + "' не найдена в списке единиц номенклатуры."); КонецЕсли;

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

Если не знаешь точное имя реквизита, можно посмотреть через Конфигуратор или через отладчик.

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

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

Димон, привет!

В Альфа-Авто (как и в большинстве типовых конфигураций 1С на базе УТ/КА) основная единица измерения номенклатуры хранится в реквизите справочника «Номенклатура» — обычно это реквизит «ЕдиницаИзмерения» (или аналогичный, зависит от конфигурации).

Если у тебя есть объект номенклатуры, полученный через ПолучитьОбъект(), и у тебя уже есть базовая единица измерения (справочник «ЕдиницыИзмерения»), и ты хочешь программно установить основную единицу по наименованию, то алгоритм такой:

1. Найти объект справочника «ЕдиницыИзмерения» по наименованию, которое совпадает с наименованием основной единицы.

2. Присвоить найденный объект в реквизит «ЕдиницаИзмерения» объекта номенклатуры.

3. Записать объект номенклатуры.

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

1С (Код)

// Получаем объект номенклатуры НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру); // Наименование основной единицы, которую нужно установить ИмяЕдиницы = "шт"; // например, "шт" // Ищем единицу измерения по наименованию Единица = Справочники.ЕдиницыИзмерения.НайтиПоНаименованию(ИмяЕдиницы); Если Единица = Неопределено Тогда // Если не нашли, можно создать новую единицу или обработать ошибку Сообщить("Единица измерения с наименованием '" + ИмяЕдиницы + "' не найдена."); Иначе // Устанавливаем основную единицу измерения НоменклатураОбъект.ЕдиницаИзмерения = Единица; // Записываем изменения НоменклатураОбъект.Записать(); КонецЕсли;

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

// Получаем объект номенклатуры НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру);   // Наименование основной единицы, которую нужно установить ИмяЕдиницы = "шт"; // например, "шт"   // Ищем единицу измерения по наименованию Единица = Справочники.ЕдиницыИзмерения.НайтиПоНаименованию(ИмяЕдиницы);   Если Единица = Неопределено Тогда     // Если не нашли, можно создать новую единицу или обработать ошибку     Сообщить("Единица измерения с наименованием '" + ИмяЕдиницы + "' не найдена."); Иначе     // Устанавливаем основную единицу измерения     НоменклатураОбъект.ЕдиницаИзмерения = Единица;     // Записываем изменения     НоменклатураОбъект.Записать(); КонецЕсли;

Если в конфигурации Альфа-Авто используется другой реквизит или структура, то нужно уточнить точное имя реквизита, но обычно это «ЕдиницаИзмерения».

Если же у тебя есть несколько единиц измерения и нужно именно «Основная» (например, в табличной части «ЕдиницыИзмеренияНоменклатуры»), то тогда нужно:

— Найти нужную строку в табличной части по наименованию единицы.

— Установить флаг «Основная» (если есть такой реквизит) или переместить эту единицу в основную.

Пример для табличной части:

1С (Код)

НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру); ИмяЕдиницы = "шт"; ОсновнаяУстановлена = Ложь; Для Каждого Строка Из НоменклатураОбъект.ЕдиницыИзмерения Цикл Если Строка.ЕдиницаИзмерения.Наименование = ИмяЕдиницы Тогда Строка.Основная = Истина; // если есть такой реквизит ОсновнаяУстановлена = Истина; Иначе Строка.Основная = Ложь; КонецЕсли; КонецЦикла; Если ОсновнаяУстановлена Тогда НоменклатураОбъект.Записать(); Иначе Сообщить("Единица измерения '" + ИмяЕдиницы + "' не найдена в списке единиц номенклатуры."); КонецЕсли;

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

НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру);   ИмяЕдиницы = "шт";   ОсновнаяУстановлена = Ложь;   Для Каждого Строка Из НоменклатураОбъект.ЕдиницыИзмерения Цикл     Если Строка.ЕдиницаИзмерения.Наименование = ИмяЕдиницы Тогда         Строка.Основная = Истина; // если есть такой реквизит         ОсновнаяУстановлена = Истина;     Иначе         Строка.Основная = Ложь;     КонецЕсли; КонецЦикла;   Если ОсновнаяУстановлена Тогда     НоменклатураОбъект.Записать(); Иначе     Сообщить("Единица измерения '" + ИмяЕдиницы + "' не найдена в списке единиц номенклатуры."); КонецЕсли;

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

Если не знаешь точное имя реквизита, можно посмотреть через Конфигуратор или через отладчик.

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

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

Димон, привет!

В Альфа-Авто (как и в большинстве типовых конфигураций 1С на базе УТ/КА) основная единица измерения номенклатуры хранится в реквизите справочника «Номенклатура» — обычно это реквизит «ЕдиницаИзмерения» (или аналогичный, зависит от конфигурации).

Если у тебя есть объект номенклатуры, полученный через ПолучитьОбъект(), и у тебя уже есть базовая единица измерения (справочник «ЕдиницыИзмерения»), и ты хочешь программно установить основную единицу по наименованию, то алгоритм такой:

1. Найти объект справочника «ЕдиницыИзмерения» по наименованию, которое совпадает с наименованием основной единицы.

2. Присвоить найденный объект в реквизит «ЕдиницаИзмерения» объекта номенклатуры.

3. Записать объект номенклатуры.

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

1С (Код)

// Получаем объект номенклатуры НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру); // Наименование основной единицы, которую нужно установить ИмяЕдиницы = "шт"; // например, "шт" // Ищем единицу измерения по наименованию Единица = Справочники.ЕдиницыИзмерения.НайтиПоНаименованию(ИмяЕдиницы); Если Единица = Неопределено Тогда // Если не нашли, можно создать новую единицу или обработать ошибку Сообщить("Единица измерения с наименованием '" + ИмяЕдиницы + "' не найдена."); Иначе // Устанавливаем основную единицу измерения НоменклатураОбъект.ЕдиницаИзмерения = Единица; // Записываем изменения НоменклатураОбъект.Записать(); КонецЕсли;

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

// Получаем объект номенклатуры НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру);   // Наименование основной единицы, которую нужно установить ИмяЕдиницы = "шт"; // например, "шт"   // Ищем единицу измерения по наименованию Единица = Справочники.ЕдиницыИзмерения.НайтиПоНаименованию(ИмяЕдиницы);   Если Единица = Неопределено Тогда     // Если не нашли, можно создать новую единицу или обработать ошибку     Сообщить("Единица измерения с наименованием '" + ИмяЕдиницы + "' не найдена."); Иначе     // Устанавливаем основную единицу измерения     НоменклатураОбъект.ЕдиницаИзмерения = Единица;     // Записываем изменения     НоменклатураОбъект.Записать(); КонецЕсли;

Если в конфигурации Альфа-Авто используется другой реквизит или структура, то нужно уточнить точное имя реквизита, но обычно это «ЕдиницаИзмерения».

Если же у тебя есть несколько единиц измерения и нужно именно «Основная» (например, в табличной части «ЕдиницыИзмеренияНоменклатуры»), то тогда нужно:

— Найти нужную строку в табличной части по наименованию единицы.

— Установить флаг «Основная» (если есть такой реквизит) или переместить эту единицу в основную.

Пример для табличной части:

1С (Код)

НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру); ИмяЕдиницы = "шт"; ОсновнаяУстановлена = Ложь; Для Каждого Строка Из НоменклатураОбъект.ЕдиницыИзмерения Цикл Если Строка.ЕдиницаИзмерения.Наименование = ИмяЕдиницы Тогда Строка.Основная = Истина; // если есть такой реквизит ОсновнаяУстановлена = Истина; Иначе Строка.Основная = Ложь; КонецЕсли; КонецЦикла; Если ОсновнаяУстановлена Тогда НоменклатураОбъект.Записать(); Иначе Сообщить("Единица измерения '" + ИмяЕдиницы + "' не найдена в списке единиц номенклатуры."); КонецЕсли;

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

НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру);   ИмяЕдиницы = "шт";   ОсновнаяУстановлена = Ложь;   Для Каждого Строка Из НоменклатураОбъект.ЕдиницыИзмерения Цикл     Если Строка.ЕдиницаИзмерения.Наименование = ИмяЕдиницы Тогда         Строка.Основная = Истина; // если есть такой реквизит         ОсновнаяУстановлена = Истина;     Иначе         Строка.Основная = Ложь;     КонецЕсли; КонецЦикла;   Если ОсновнаяУстановлена Тогда     НоменклатураОбъект.Записать(); Иначе     Сообщить("Единица измерения '" + ИмяЕдиницы + "' не найдена в списке единиц номенклатуры."); КонецЕсли;

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

Если не знаешь точное имя реквизита, можно посмотреть через Конфигуратор или через отладчик.

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

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

Димон, привет!

В Альфа-Авто (как и в большинстве типовых конфигураций 1С на базе УТ/КА) основная единица измерения номенклатуры хранится в реквизите справочника «Номенклатура» — обычно это реквизит «ЕдиницаИзмерения» (или аналогичный, зависит от конфигурации).

Если у тебя есть объект номенклатуры, полученный через ПолучитьОбъект(), и у тебя уже есть базовая единица измерения (справочник «ЕдиницыИзмерения»), и ты хочешь программно установить основную единицу по наименованию, то алгоритм такой:

1. Найти объект справочника «ЕдиницыИзмерения» по наименованию, которое совпадает с наименованием основной единицы.

2. Присвоить найденный объект в реквизит «ЕдиницаИзмерения» объекта номенклатуры.

3. Записать объект номенклатуры.

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

1С (Код)

// Получаем объект номенклатуры НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру); // Наименование основной единицы, которую нужно установить ИмяЕдиницы = "шт"; // например, "шт" // Ищем единицу измерения по наименованию Единица = Справочники.ЕдиницыИзмерения.НайтиПоНаименованию(ИмяЕдиницы); Если Единица = Неопределено Тогда // Если не нашли, можно создать новую единицу или обработать ошибку Сообщить("Единица измерения с наименованием '" + ИмяЕдиницы + "' не найдена."); Иначе // Устанавливаем основную единицу измерения НоменклатураОбъект.ЕдиницаИзмерения = Единица; // Записываем изменения НоменклатураОбъект.Записать(); КонецЕсли;

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

// Получаем объект номенклатуры НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру);   // Наименование основной единицы, которую нужно установить ИмяЕдиницы = "шт"; // например, "шт"   // Ищем единицу измерения по наименованию Единица = Справочники.ЕдиницыИзмерения.НайтиПоНаименованию(ИмяЕдиницы);   Если Единица = Неопределено Тогда     // Если не нашли, можно создать новую единицу или обработать ошибку     Сообщить("Единица измерения с наименованием '" + ИмяЕдиницы + "' не найдена."); Иначе     // Устанавливаем основную единицу измерения     НоменклатураОбъект.ЕдиницаИзмерения = Единица;     // Записываем изменения     НоменклатураОбъект.Записать(); КонецЕсли;

Если в конфигурации Альфа-Авто используется другой реквизит или структура, то нужно уточнить точное имя реквизита, но обычно это «ЕдиницаИзмерения».

Если же у тебя есть несколько единиц измерения и нужно именно «Основная» (например, в табличной части «ЕдиницыИзмеренияНоменклатуры»), то тогда нужно:

— Найти нужную строку в табличной части по наименованию единицы.

— Установить флаг «Основная» (если есть такой реквизит) или переместить эту единицу в основную.

Пример для табличной части:

1С (Код)

НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру); ИмяЕдиницы = "шт"; ОсновнаяУстановлена = Ложь; Для Каждого Строка Из НоменклатураОбъект.ЕдиницыИзмерения Цикл Если Строка.ЕдиницаИзмерения.Наименование = ИмяЕдиницы Тогда Строка.Основная = Истина; // если есть такой реквизит ОсновнаяУстановлена = Истина; Иначе Строка.Основная = Ложь; КонецЕсли; КонецЦикла; Если ОсновнаяУстановлена Тогда НоменклатураОбъект.Записать(); Иначе Сообщить("Единица измерения '" + ИмяЕдиницы + "' не найдена в списке единиц номенклатуры."); КонецЕсли;

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

НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру);   ИмяЕдиницы = "шт";   ОсновнаяУстановлена = Ложь;   Для Каждого Строка Из НоменклатураОбъект.ЕдиницыИзмерения Цикл     Если Строка.ЕдиницаИзмерения.Наименование = ИмяЕдиницы Тогда         Строка.Основная = Истина; // если есть такой реквизит         ОсновнаяУстановлена = Истина;     Иначе         Строка.Основная = Ложь;     КонецЕсли; КонецЦикла;   Если ОсновнаяУстановлена Тогда     НоменклатураОбъект.Записать(); Иначе     Сообщить("Единица измерения '" + ИмяЕдиницы + "' не найдена в списке единиц номенклатуры."); КонецЕсли;

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

Если не знаешь точное имя реквизита, можно посмотреть через Конфигуратор или через отладчик.

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

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

Димон, привет!

В Альфа-Авто (как и в большинстве типовых конфигураций 1С на базе УТ/КА) основная единица измерения номенклатуры хранится в реквизите справочника «Номенклатура» — обычно это реквизит «ЕдиницаИзмерения» (или аналогичный, зависит от конфигурации).

Если у тебя есть объект номенклатуры, полученный через ПолучитьОбъект(), и у тебя уже есть базовая единица измерения (справочник «ЕдиницыИзмерения»), и ты хочешь программно установить основную единицу по наименованию, то алгоритм такой:

1. Найти объект справочника «ЕдиницыИзмерения» по наименованию, которое совпадает с наименованием основной единицы.

2. Присвоить найденный объект в реквизит «ЕдиницаИзмерения» объекта номенклатуры.

3. Записать объект номенклатуры.

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

1С (Код)

// Получаем объект номенклатуры НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру); // Наименование основной единицы, которую нужно установить ИмяЕдиницы = "шт"; // например, "шт" // Ищем единицу измерения по наименованию Единица = Справочники.ЕдиницыИзмерения.НайтиПоНаименованию(ИмяЕдиницы); Если Единица = Неопределено Тогда // Если не нашли, можно создать новую единицу или обработать ошибку Сообщить("Единица измерения с наименованием '" + ИмяЕдиницы + "' не найдена."); Иначе // Устанавливаем основную единицу измерения НоменклатураОбъект.ЕдиницаИзмерения = Единица; // Записываем изменения НоменклатураОбъект.Записать(); КонецЕсли;

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

// Получаем объект номенклатуры НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру);   // Наименование основной единицы, которую нужно установить ИмяЕдиницы = "шт"; // например, "шт"   // Ищем единицу измерения по наименованию Единица = Справочники.ЕдиницыИзмерения.НайтиПоНаименованию(ИмяЕдиницы);   Если Единица = Неопределено Тогда     // Если не нашли, можно создать новую единицу или обработать ошибку     Сообщить("Единица измерения с наименованием '" + ИмяЕдиницы + "' не найдена."); Иначе     // Устанавливаем основную единицу измерения     НоменклатураОбъект.ЕдиницаИзмерения = Единица;     // Записываем изменения     НоменклатураОбъект.Записать(); КонецЕсли;

Если в конфигурации Альфа-Авто используется другой реквизит или структура, то нужно уточнить точное имя реквизита, но обычно это «ЕдиницаИзмерения».

Если же у тебя есть несколько единиц измерения и нужно именно «Основная» (например, в табличной части «ЕдиницыИзмеренияНоменклатуры»), то тогда нужно:

— Найти нужную строку в табличной части по наименованию единицы.

— Установить флаг «Основная» (если есть такой реквизит) или переместить эту единицу в основную.

Пример для табличной части:

1С (Код)

НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру); ИмяЕдиницы = "шт"; ОсновнаяУстановлена = Ложь; Для Каждого Строка Из НоменклатураОбъект.ЕдиницыИзмерения Цикл Если Строка.ЕдиницаИзмерения.Наименование = ИмяЕдиницы Тогда Строка.Основная = Истина; // если есть такой реквизит ОсновнаяУстановлена = Истина; Иначе Строка.Основная = Ложь; КонецЕсли; КонецЦикла; Если ОсновнаяУстановлена Тогда НоменклатураОбъект.Записать(); Иначе Сообщить("Единица измерения '" + ИмяЕдиницы + "' не найдена в списке единиц номенклатуры."); КонецЕсли;

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

НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру);   ИмяЕдиницы = "шт";   ОсновнаяУстановлена = Ложь;   Для Каждого Строка Из НоменклатураОбъект.ЕдиницыИзмерения Цикл     Если Строка.ЕдиницаИзмерения.Наименование = ИмяЕдиницы Тогда         Строка.Основная = Истина; // если есть такой реквизит         ОсновнаяУстановлена = Истина;     Иначе         Строка.Основная = Ложь;     КонецЕсли; КонецЦикла;   Если ОсновнаяУстановлена Тогда     НоменклатураОбъект.Записать(); Иначе     Сообщить("Единица измерения '" + ИмяЕдиницы + "' не найдена в списке единиц номенклатуры."); КонецЕсли;

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

Если не знаешь точное имя реквизита, можно посмотреть через Конфигуратор или через отладчик.

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

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

Димон, привет!

В Альфа-Авто (как и в большинстве типовых конфигураций 1С на базе УТ/КА) основная единица измерения номенклатуры хранится в реквизите справочника «Номенклатура» — обычно это реквизит «ЕдиницаИзмерения» (или аналогичный, зависит от конфигурации).

Если у тебя есть объект номенклатуры, полученный через ПолучитьОбъект(), и у тебя уже есть базовая единица измерения (справочник «ЕдиницыИзмерения»), и ты хочешь программно установить основную единицу по наименованию, то алгоритм такой:

1. Найти объект справочника «ЕдиницыИзмерения» по наименованию, которое совпадает с наименованием основной единицы.

2. Присвоить найденный объект в реквизит «ЕдиницаИзмерения» объекта номенклатуры.

3. Записать объект номенклатуры.

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

1С (Код)

// Получаем объект номенклатуры НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру); // Наименование основной единицы, которую нужно установить ИмяЕдиницы = "шт"; // например, "шт" // Ищем единицу измерения по наименованию Единица = Справочники.ЕдиницыИзмерения.НайтиПоНаименованию(ИмяЕдиницы); Если Единица = Неопределено Тогда // Если не нашли, можно создать новую единицу или обработать ошибку Сообщить("Единица измерения с наименованием '" + ИмяЕдиницы + "' не найдена."); Иначе // Устанавливаем основную единицу измерения НоменклатураОбъект.ЕдиницаИзмерения = Единица; // Записываем изменения НоменклатураОбъект.Записать(); КонецЕсли;

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

// Получаем объект номенклатуры НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру);   // Наименование основной единицы, которую нужно установить ИмяЕдиницы = "шт"; // например, "шт"   // Ищем единицу измерения по наименованию Единица = Справочники.ЕдиницыИзмерения.НайтиПоНаименованию(ИмяЕдиницы);   Если Единица = Неопределено Тогда     // Если не нашли, можно создать новую единицу или обработать ошибку     Сообщить("Единица измерения с наименованием '" + ИмяЕдиницы + "' не найдена."); Иначе     // Устанавливаем основную единицу измерения     НоменклатураОбъект.ЕдиницаИзмерения = Единица;     // Записываем изменения     НоменклатураОбъект.Записать(); КонецЕсли;

Если в конфигурации Альфа-Авто используется другой реквизит или структура, то нужно уточнить точное имя реквизита, но обычно это «ЕдиницаИзмерения».

Если же у тебя есть несколько единиц измерения и нужно именно «Основная» (например, в табличной части «ЕдиницыИзмеренияНоменклатуры»), то тогда нужно:

— Найти нужную строку в табличной части по наименованию единицы.

— Установить флаг «Основная» (если есть такой реквизит) или переместить эту единицу в основную.

Пример для табличной части:

1С (Код)

НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру); ИмяЕдиницы = "шт"; ОсновнаяУстановлена = Ложь; Для Каждого Строка Из НоменклатураОбъект.ЕдиницыИзмерения Цикл Если Строка.ЕдиницаИзмерения.Наименование = ИмяЕдиницы Тогда Строка.Основная = Истина; // если есть такой реквизит ОсновнаяУстановлена = Истина; Иначе Строка.Основная = Ложь; КонецЕсли; КонецЦикла; Если ОсновнаяУстановлена Тогда НоменклатураОбъект.Записать(); Иначе Сообщить("Единица измерения '" + ИмяЕдиницы + "' не найдена в списке единиц номенклатуры."); КонецЕсли;

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

НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру);   ИмяЕдиницы = "шт";   ОсновнаяУстановлена = Ложь;   Для Каждого Строка Из НоменклатураОбъект.ЕдиницыИзмерения Цикл     Если Строка.ЕдиницаИзмерения.Наименование = ИмяЕдиницы Тогда         Строка.Основная = Истина; // если есть такой реквизит         ОсновнаяУстановлена = Истина;     Иначе         Строка.Основная = Ложь;     КонецЕсли; КонецЦикла;   Если ОсновнаяУстановлена Тогда     НоменклатураОбъект.Записать(); Иначе     Сообщить("Единица измерения '" + ИмяЕдиницы + "' не найдена в списке единиц номенклатуры."); КонецЕсли;

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

Если не знаешь точное имя реквизита, можно посмотреть через Конфигуратор или через отладчик.

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

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

Димон, привет!

В Альфа-Авто (как и в большинстве типовых конфигураций 1С на базе УТ/КА) основная единица измерения номенклатуры хранится в реквизите справочника «Номенклатура» — обычно это реквизит «ЕдиницаИзмерения» (или аналогичный, зависит от конфигурации).

Если у тебя есть объект номенклатуры, полученный через ПолучитьОбъект(), и у тебя уже есть базовая единица измерения (справочник «ЕдиницыИзмерения»), и ты хочешь программно установить основную единицу по наименованию, то алгоритм такой:

1. Найти объект справочника «ЕдиницыИзмерения» по наименованию, которое совпадает с наименованием основной единицы.

2. Присвоить найденный объект в реквизит «ЕдиницаИзмерения» объекта номенклатуры.

3. Записать объект номенклатуры.

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

1С (Код)

// Получаем объект номенклатуры НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру); // Наименование основной единицы, которую нужно установить ИмяЕдиницы = "шт"; // например, "шт" // Ищем единицу измерения по наименованию Единица = Справочники.ЕдиницыИзмерения.НайтиПоНаименованию(ИмяЕдиницы); Если Единица = Неопределено Тогда // Если не нашли, можно создать новую единицу или обработать ошибку Сообщить("Единица измерения с наименованием '" + ИмяЕдиницы + "' не найдена."); Иначе // Устанавливаем основную единицу измерения НоменклатураОбъект.ЕдиницаИзмерения = Единица; // Записываем изменения НоменклатураОбъект.Записать(); КонецЕсли;

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

// Получаем объект номенклатуры НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру);   // Наименование основной единицы, которую нужно установить ИмяЕдиницы = "шт"; // например, "шт"   // Ищем единицу измерения по наименованию Единица = Справочники.ЕдиницыИзмерения.НайтиПоНаименованию(ИмяЕдиницы);   Если Единица = Неопределено Тогда     // Если не нашли, можно создать новую единицу или обработать ошибку     Сообщить("Единица измерения с наименованием '" + ИмяЕдиницы + "' не найдена."); Иначе     // Устанавливаем основную единицу измерения     НоменклатураОбъект.ЕдиницаИзмерения = Единица;     // Записываем изменения     НоменклатураОбъект.Записать(); КонецЕсли;

Если в конфигурации Альфа-Авто используется другой реквизит или структура, то нужно уточнить точное имя реквизита, но обычно это «ЕдиницаИзмерения».

Если же у тебя есть несколько единиц измерения и нужно именно «Основная» (например, в табличной части «ЕдиницыИзмеренияНоменклатуры»), то тогда нужно:

— Найти нужную строку в табличной части по наименованию единицы.

— Установить флаг «Основная» (если есть такой реквизит) или переместить эту единицу в основную.

Пример для табличной части:

1С (Код)

НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру); ИмяЕдиницы = "шт"; ОсновнаяУстановлена = Ложь; Для Каждого Строка Из НоменклатураОбъект.ЕдиницыИзмерения Цикл Если Строка.ЕдиницаИзмерения.Наименование = ИмяЕдиницы Тогда Строка.Основная = Истина; // если есть такой реквизит ОсновнаяУстановлена = Истина; Иначе Строка.Основная = Ложь; КонецЕсли; КонецЦикла; Если ОсновнаяУстановлена Тогда НоменклатураОбъект.Записать(); Иначе Сообщить("Единица измерения '" + ИмяЕдиницы + "' не найдена в списке единиц номенклатуры."); КонецЕсли;

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

НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру);   ИмяЕдиницы = "шт";   ОсновнаяУстановлена = Ложь;   Для Каждого Строка Из НоменклатураОбъект.ЕдиницыИзмерения Цикл     Если Строка.ЕдиницаИзмерения.Наименование = ИмяЕдиницы Тогда         Строка.Основная = Истина; // если есть такой реквизит         ОсновнаяУстановлена = Истина;     Иначе         Строка.Основная = Ложь;     КонецЕсли; КонецЦикла;   Если ОсновнаяУстановлена Тогда     НоменклатураОбъект.Записать(); Иначе     Сообщить("Единица измерения '" + ИмяЕдиницы + "' не найдена в списке единиц номенклатуры."); КонецЕсли;

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

Если не знаешь точное имя реквизита, можно посмотреть через Конфигуратор или через отладчик.

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

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

Димон, привет!

В Альфа-Авто (как и в большинстве типовых конфигураций 1С на базе УТ/КА) основная единица измерения номенклатуры хранится в реквизите справочника «Номенклатура» — обычно это реквизит «ЕдиницаИзмерения» (или аналогичный, зависит от конфигурации).

Если у тебя есть объект номенклатуры, полученный через ПолучитьОбъект(), и у тебя уже есть базовая единица измерения (справочник «ЕдиницыИзмерения»), и ты хочешь программно установить основную единицу по наименованию, то алгоритм такой:

1. Найти объект справочника «ЕдиницыИзмерения» по наименованию, которое совпадает с наименованием основной единицы.

2. Присвоить найденный объект в реквизит «ЕдиницаИзмерения» объекта номенклатуры.

3. Записать объект номенклатуры.

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

1С (Код)

// Получаем объект номенклатуры НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру); // Наименование основной единицы, которую нужно установить ИмяЕдиницы = "шт"; // например, "шт" // Ищем единицу измерения по наименованию Единица = Справочники.ЕдиницыИзмерения.НайтиПоНаименованию(ИмяЕдиницы); Если Единица = Неопределено Тогда // Если не нашли, можно создать новую единицу или обработать ошибку Сообщить("Единица измерения с наименованием '" + ИмяЕдиницы + "' не найдена."); Иначе // Устанавливаем основную единицу измерения НоменклатураОбъект.ЕдиницаИзмерения = Единица; // Записываем изменения НоменклатураОбъект.Записать(); КонецЕсли;

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

// Получаем объект номенклатуры НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру);   // Наименование основной единицы, которую нужно установить ИмяЕдиницы = "шт"; // например, "шт"   // Ищем единицу измерения по наименованию Единица = Справочники.ЕдиницыИзмерения.НайтиПоНаименованию(ИмяЕдиницы);   Если Единица = Неопределено Тогда     // Если не нашли, можно создать новую единицу или обработать ошибку     Сообщить("Единица измерения с наименованием '" + ИмяЕдиницы + "' не найдена."); Иначе     // Устанавливаем основную единицу измерения     НоменклатураОбъект.ЕдиницаИзмерения = Единица;     // Записываем изменения     НоменклатураОбъект.Записать(); КонецЕсли;

Если в конфигурации Альфа-Авто используется другой реквизит или структура, то нужно уточнить точное имя реквизита, но обычно это «ЕдиницаИзмерения».

Если же у тебя есть несколько единиц измерения и нужно именно «Основная» (например, в табличной части «ЕдиницыИзмеренияНоменклатуры»), то тогда нужно:

— Найти нужную строку в табличной части по наименованию единицы.

— Установить флаг «Основная» (если есть такой реквизит) или переместить эту единицу в основную.

Пример для табличной части:

1С (Код)

НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру); ИмяЕдиницы = "шт"; ОсновнаяУстановлена = Ложь; Для Каждого Строка Из НоменклатураОбъект.ЕдиницыИзмерения Цикл Если Строка.ЕдиницаИзмерения.Наименование = ИмяЕдиницы Тогда Строка.Основная = Истина; // если есть такой реквизит ОсновнаяУстановлена = Истина; Иначе Строка.Основная = Ложь; КонецЕсли; КонецЦикла; Если ОсновнаяУстановлена Тогда НоменклатураОбъект.Записать(); Иначе Сообщить("Единица измерения '" + ИмяЕдиницы + "' не найдена в списке единиц номенклатуры."); КонецЕсли;

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

НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру);   ИмяЕдиницы = "шт";   ОсновнаяУстановлена = Ложь;   Для Каждого Строка Из НоменклатураОбъект.ЕдиницыИзмерения Цикл     Если Строка.ЕдиницаИзмерения.Наименование = ИмяЕдиницы Тогда         Строка.Основная = Истина; // если есть такой реквизит         ОсновнаяУстановлена = Истина;     Иначе         Строка.Основная = Ложь;     КонецЕсли; КонецЦикла;   Если ОсновнаяУстановлена Тогда     НоменклатураОбъект.Записать(); Иначе     Сообщить("Единица измерения '" + ИмяЕдиницы + "' не найдена в списке единиц номенклатуры."); КонецЕсли;

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

Если не знаешь точное имя реквизита, можно посмотреть через Конфигуратор или через отладчик.

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

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

Димон, привет!

В Альфа-Авто (как и в большинстве типовых конфигураций 1С на базе УТ/КА) основная единица измерения номенклатуры хранится в реквизите справочника «Номенклатура» — обычно это реквизит «ЕдиницаИзмерения» (или аналогичный, зависит от конфигурации).

Если у тебя есть объект номенклатуры, полученный через ПолучитьОбъект(), и у тебя уже есть базовая единица измерения (справочник «ЕдиницыИзмерения»), и ты хочешь программно установить основную единицу по наименованию, то алгоритм такой:

1. Найти объект справочника «ЕдиницыИзмерения» по наименованию, которое совпадает с наименованием основной единицы.

2. Присвоить найденный объект в реквизит «ЕдиницаИзмерения» объекта номенклатуры.

3. Записать объект номенклатуры.

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

1С (Код)

// Получаем объект номенклатуры НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру); // Наименование основной единицы, которую нужно установить ИмяЕдиницы = "шт"; // например, "шт" // Ищем единицу измерения по наименованию Единица = Справочники.ЕдиницыИзмерения.НайтиПоНаименованию(ИмяЕдиницы); Если Единица = Неопределено Тогда // Если не нашли, можно создать новую единицу или обработать ошибку Сообщить("Единица измерения с наименованием '" + ИмяЕдиницы + "' не найдена."); Иначе // Устанавливаем основную единицу измерения НоменклатураОбъект.ЕдиницаИзмерения = Единица; // Записываем изменения НоменклатураОбъект.Записать(); КонецЕсли;

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

// Получаем объект номенклатуры НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру);   // Наименование основной единицы, которую нужно установить ИмяЕдиницы = "шт"; // например, "шт"   // Ищем единицу измерения по наименованию Единица = Справочники.ЕдиницыИзмерения.НайтиПоНаименованию(ИмяЕдиницы);   Если Единица = Неопределено Тогда     // Если не нашли, можно создать новую единицу или обработать ошибку     Сообщить("Единица измерения с наименованием '" + ИмяЕдиницы + "' не найдена."); Иначе     // Устанавливаем основную единицу измерения     НоменклатураОбъект.ЕдиницаИзмерения = Единица;     // Записываем изменения     НоменклатураОбъект.Записать(); КонецЕсли;

Если в конфигурации Альфа-Авто используется другой реквизит или структура, то нужно уточнить точное имя реквизита, но обычно это «ЕдиницаИзмерения».

Если же у тебя есть несколько единиц измерения и нужно именно «Основная» (например, в табличной части «ЕдиницыИзмеренияНоменклатуры»), то тогда нужно:

— Найти нужную строку в табличной части по наименованию единицы.

— Установить флаг «Основная» (если есть такой реквизит) или переместить эту единицу в основную.

Пример для табличной части:

1С (Код)

НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру); ИмяЕдиницы = "шт"; ОсновнаяУстановлена = Ложь; Для Каждого Строка Из НоменклатураОбъект.ЕдиницыИзмерения Цикл Если Строка.ЕдиницаИзмерения.Наименование = ИмяЕдиницы Тогда Строка.Основная = Истина; // если есть такой реквизит ОсновнаяУстановлена = Истина; Иначе Строка.Основная = Ложь; КонецЕсли; КонецЦикла; Если ОсновнаяУстановлена Тогда НоменклатураОбъект.Записать(); Иначе Сообщить("Единица измерения '" + ИмяЕдиницы + "' не найдена в списке единиц номенклатуры."); КонецЕсли;

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

НоменклатураОбъект = Справочники.Номенклатура.ПолучитьОбъект(СсылкаНаНоменклатуру);   ИмяЕдиницы = "шт";   ОсновнаяУстановлена = Ложь;   Для Каждого Строка Из НоменклатураОбъект.ЕдиницыИзмерения Цикл     Если Строка.ЕдиницаИзмерения.Наименование = ИмяЕдиницы Тогда         Строка.Основная = Истина; // если есть такой реквизит         ОсновнаяУстановлена = Истина;     Иначе         Строка.Основная = Ложь;     КонецЕсли; КонецЦикла;   Если ОсновнаяУстановлена Тогда     НоменклатураОбъект.Записать(); Иначе     Сообщить("Единица измерения '" + ИмяЕдиницы + "' не найдена в списке единиц номенклатуры."); КонецЕсли;

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

Если не знаешь точное имя реквизита, можно посмотреть через Конфигуратор или через отладчик.

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

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

I

Для платформы 1С:Предприятие версии 8.2.19.130 предпочтительной версией Windows Server будет одна из поддерживаемых в официальных системных требованиях 1С для платформы 8.2. Обычно для 8.2 рекомендуются следующие версии Windows Server:

— Windows Server 2008 R2 (x64) с установленными всеми актуальными обновлениями;
— Windows Server 2012 (x64) с актуальными обновлениями;
— Windows Server 2012 R2 (x64);
— Windows Server 2016 (x64) — поддерживается, но с оговорками по совместимости, лучше проверить конкретные обновления платформы 1С 8.2.

Windows Server 2019 и 2022 официально не поддерживаются платформой 8.2, так как эта версия платформы устарела и не рассчитана на новейшие ОС.

Рекомендация: для стабильной работы 1С 8.2.19.130 лучше использовать Windows Server 2012 R2 или Windows Server 2008 R2, так как они официально поддерживаются и имеют проверенную совместимость.

Если есть возможность, лучше планировать переход на платформу 8.3, которая поддерживает более новые версии Windows Server (2016, 2019, 2022).

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

В 1С:Розница валюта документа продажи (чека) жёстко фиксируется при создании и изменить её в уже проведённом документе нельзя. Вот почему:

1. Валюта чека задаётся при открытии смены и формируется на основании настроек кассы и параметров пользователя. Она влияет на расчёты, курсы валют, цены и налоги.

2. После проведения документа в базе фиксируются суммы в валюте чека и в валюте учёта. Изменение валюты задним числом нарушит целостность данных и расчётов.

3. В типовой конфигурации 1С:Розница нет механизма для смены валюты в уже проведённом чеке, чтобы избежать ошибок в учёте и отчётности.

Если нужно работать с другой валютой, то:

— Создайте новый чек с нужной валютой (обычно это делается при открытии смены или настройке кассы).

— Если требуется изменить валюту в уже проведённом документе, то придётся его отменить (отменить проведение) и создать заново с правильной валютой.

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

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

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

Если нужна помощь с конкретной версией 1С:Розница или с доработкой — уточните, могу подсказать варианты.

Рекомендую посмотреть здесь:
https://infostart.ru/public/348852/ (про особенности работы с валютой в 1С)
https://helpf.pro/faq/view/354.html (работа с курсами валют)

[Автор]

Сообщения