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

Привет, Domiurg!

Чтобы получить информацию о ссылке, которая отображается как “, вам нужно извлечь уникальный идентификатор из этой ссылки и использовать его для поиска соответствующего объекта в базе источника.

Вот шаги, которые вы можете предпринять:

1. **Извлечение уникального идентификатора**: Ваша ссылка имеет формат, где уникальный идентификатор представлен в виде строки. В вашем случае это 68:85750050569d83fc11ec3009f2bd6cbc. Вам нужно выделить этот идентификатор.

2. **Создание ссылки в базе источника**: Используя извлеченный идентификатор, вы можете создать ссылку на объект в базе источника. Например, если это ссылка на документ, то она будет выглядеть так:

1С (Код)

1C Ссылка = Документы.ИмяДокумента.СоздатьДокумент(); Ссылка.УникальныйИдентификатор = Новый УникальныйИдентификатор("85750050-569d-83fc-11ec-3009f2bd6cbc");

1 2 3

1C    Ссылка = Документы.ИмяДокумента.СоздатьДокумент();    Ссылка.УникальныйИдентификатор = Новый УникальныйИдентификатор("85750050-569d-83fc-11ec-3009f2bd6cbc");

3. **Поиск объекта**: После создания ссылки вы можете использовать метод ПолучитьОбъект() для получения объекта и его свойств:

1С (Код)

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

1 2 3 4 5 6 7

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

Таким образом, вы сможете понять, что за объект был потерян в процессе обмена.

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

Надеюсь, это поможет вам разобраться с вашей проблемой!

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

Чтобы отобразить элементы справочника в форме списка с пометками (чекбоксами), вам нужно выполнить следующие шаги:

1. **Создайте динамический список**: В форме, где вы хотите отобразить список, добавьте элемент типа “Динамический список”.

2. **Установите свойства динамического списка**:
– Убедитесь, что установлен флаг “Произвольный запрос”.
– Настройте запрос, который будет возвращать необходимые данные. Например:

1С (Код)

1C ВЫБРАТЬ Справочник.Номенклатура.Ссылка, Справочник.Номенклатура.Наименование, Справочник.Номенклатура.Ссылка В (&ВыбранныеЭлементы) КАК Пометка ИЗ Справочник.Номенклатура КАК Номенклатура

1 2 3 4 5 6 7

1C      ВЫБРАТЬ          Справочник.Номенклатура.Ссылка,          Справочник.Номенклатура.Наименование,          Справочник.Номенклатура.Ссылка В (&ВыбранныеЭлементы) КАК Пометка      ИЗ          Справочник.Номенклатура КАК Номенклатура

3. **Настройте отображение пометок**:
– В свойствах элемента формы динамического списка установите:
– **Вид**: Поле картинки
– **Картинка значений**: Укажите изображения для пометок (например, галочка и пустой чекбокс).
– **Гиперссылка ячейки**: Установите в значение “Да”.

4. **Добавьте обработчик события выбора**:
– Создайте обработчик события “Выбор” для динамического списка. В этом обработчике вы будете управлять добавлением и удалением элементов из массива выбранных элементов. Пример кода:

1С (Код)

1C &НаКлиенте Процедура СписокВыбор(Элемент, ВыбраннаяСтрока, Поле, СтандартнаяОбработка) Если Поле = Элементы.СписокПометка Тогда СтандартнаяОбработка = Ложь; ТекущиеДанные = Элемент.ТекущиеДанные; Если ТекущиеДанные Неопределено Тогда Если ТекущиеДанные.Пометка Тогда СнятьПометку(ТекущиеДанные.Ссылка); Иначе ПоставитьПометку(ТекущиеДанные.Ссылка); КонецЕсли; КонецЕсли; КонецЕсли; Список.Обновить(); КонецПроцедуры

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

1C      &НаКлиенте      Процедура СписокВыбор(Элемент, ВыбраннаяСтрока, Поле, СтандартнаяОбработка)          Если Поле = Элементы.СписокПометка Тогда              СтандартнаяОбработка = Ложь;              ТекущиеДанные = Элемент.ТекущиеДанные;              Если ТекущиеДанные  Неопределено Тогда                  Если ТекущиеДанные.Пометка Тогда                      СнятьПометку(ТекущиеДанные.Ссылка);                  Иначе                      ПоставитьПометку(ТекущиеДанные.Ссылка);                  КонецЕсли;              КонецЕсли;          КонецЕсли;          Список.Обновить();      КонецПроцедуры

5. **Создайте процедуры для управления пометками**:
– Добавьте процедуры для установки и снятия пометок:

1С (Код)

1C &НаКлиенте Процедура СнятьПометку(Номенклатура) Индекс = ВыбранныеЭлементы.Найти(Номенклатура); Если Индекс >= 0 Тогда ВыбранныеЭлементы.Удалить(Индекс); КонецЕсли; КонецПроцедуры &НаКлиенте Процедура ПоставитьПометку(Номенклатура) Индекс = ВыбранныеЭлементы.Найти(Номенклатура); Если Индекс = Неопределено Тогда ВыбранныеЭлементы.Добавить(Номенклатура); КонецЕсли; КонецПроцедуры

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

1C      &НаКлиенте      Процедура СнятьПометку(Номенклатура)          Индекс = ВыбранныеЭлементы.Найти(Номенклатура);          Если Индекс >= 0 Тогда              ВыбранныеЭлементы.Удалить(Индекс);          КонецЕсли;      КонецПроцедуры        &НаКлиенте      Процедура ПоставитьПометку(Номенклатура)          Индекс = ВыбранныеЭлементы.Найти(Номенклатура);          Если Индекс = Неопределено Тогда              ВыбранныеЭлементы.Добавить(Номенклатура);          КонецЕсли;      КонецПроцедуры

6. **Инициализация массива выбранных элементов**:
– В обработчике события “ПриОткрытии” формы инициализируйте массив для хранения выбранных элементов:

1С (Код)

1C &НаКлиенте Процедура ПриОткрытии(Отказ) ВыбранныеЭлементы = Новый Массив; Список.Параметры.УстановитьЗначениеПараметра("ВыбранныеЭлементы", ВыбранныеЭлементы); КонецПроцедуры

1 2 3 4 5 6

1C      &НаКлиенте      Процедура ПриОткрытии(Отказ)          ВыбранныеЭлементы = Новый Массив;          Список.Параметры.УстановитьЗначениеПараметра("ВыбранныеЭлементы", ВыбранныеЭлементы);      КонецПроцедуры

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

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

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

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

1. **Создайте новый реквизит для формы**:
– Откройте конфигуратор и выберите вашу управляемую форму.
– В разделе “Реквизиты” добавьте новый реквизит типа ДинамическийСписок, назовите его, например, СписокМенеджеров.

2. **Настройте основной реквизит**:
– Убедитесь, что основной реквизит формы (например, Список) настроен на использование справочника Сотрудники.

3. **Добавьте обработчик события открытия формы**:
– В модуле формы добавьте обработчик события ПриОткрытии. В этом обработчике вы будете заполнять список менеджеров.

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

1С (Код)

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

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 &НаКлиенте Процедура ПриОткрытии()     // Создаем запрос для получения сотрудников с пометкой "Менеджер"     Запрос = Новый Запрос;     Запрос.Текст = "         ВЫБРАТЬ             Сотрудники.Ссылка,             Сотрудники.Наименование         ИЗ             Справочник.Сотрудники КАК Сотрудники         ГДЕ             Сотрудники.Менеджер = ИСТИНА"; // Предполагается, что есть реквизит "Менеджер"       Результат = Запрос.Выполнить();          // Заполняем динамический список     СписокМенеджеров.Очистить();     Для Каждого Строка Из Результат.Выборка() Цикл         НоваяСтрока = СписокМенеджеров.Добавить();         НоваяСтрока.Менеджер = Строка.Ссылка; // Ссылка на сотрудника         НоваяСтрока.Наименование = Строка.Наименование; // Наименование сотрудника     КонецЦикла; КонецПроцедуры

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

6. **Проверка работы**:
– Сохраните изменения и запустите форму. При открытии формы должен заполняться список менеджеров из справочника сотрудников.

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

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

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

Для отправки документов JSON по HTTP в 1С:Предприятии можно использовать объект HTTPЗапрос. Вот пример кода, который демонстрирует, как это сделать:

1С (Код)

1C &НаСервереБезКонтекста Процедура ОтправитьJSONДокумент() // Создаем объект HTTPЗапрос Запрос = Новый HTTPЗапрос; // Указываем URL, на который будем отправлять запрос URL = "http://example.com/api/endpoint"; // Замените на ваш URL Запрос.УстановитьURL(URL); // Устанавливаем заголовки Запрос.ДобавитьЗаголовок("Content-Type", "application/json"); // Формируем JSON-документ JSONДанные = Новый Структура; JSONДанные.Вставить("Код", "000000017"); JSONДанные.Вставить("Наименование", "ОАО Топаз"); JSONДанные.Вставить("Телефоны", Новый Массив("8-999-777-55-33", "+71112223344")); JSONДанные.Вставить("ОбъемПродаж", 5000000); JSONДанные.Вставить("Поставщик?", Ложь); // Преобразуем структуру в JSON JSONСтрока = JSONЗапись(JSONДанные); // Устанавливаем тело запроса Запрос.УстановитьТело(JSONСтрока); // Отправляем запрос Ответ = HTTPСоединение.Отправить(Запрос); // Обрабатываем ответ Если Ответ.КодСостояния = 200 Тогда Сообщить("Документ успешно отправлен."); Иначе Сообщить("Ошибка отправки документа: " + Ответ.КодСостояния + " " + Ответ.ПолучитьТело()); КонецЕсли; КонецПроцедуры Функция JSONЗапись(Данные) // Создаем объект записи JSON Запись = Новый ЗаписьJSON; Запись.УстановитьСтроку(Новый Строка); // Записываем данные в JSON Запись.ЗаписатьНачалоОбъекта(); Для Каждого Параметр Из Данные Цикл Запись.ЗаписатьИмяСвойства(Параметр.Ключ); Запись.ЗаписатьЗначение(Параметр.Значение); КонецЦикла; Запись.ЗаписатьКонецОбъекта(); // Возвращаем JSON-строку Возврат Запись.ПолучитьСтроку(); КонецФункции

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54

1C &НаСервереБезКонтекста Процедура ОтправитьJSONДокумент()     // Создаем объект HTTPЗапрос     Запрос = Новый HTTPЗапрос;          // Указываем URL, на который будем отправлять запрос     URL = "http://example.com/api/endpoint"; // Замените на ваш URL     Запрос.УстановитьURL(URL);          // Устанавливаем заголовки     Запрос.ДобавитьЗаголовок("Content-Type", "application/json");          // Формируем JSON-документ     JSONДанные = Новый Структура;     JSONДанные.Вставить("Код", "000000017");     JSONДанные.Вставить("Наименование", "ОАО Топаз");     JSONДанные.Вставить("Телефоны", Новый Массив("8-999-777-55-33", "+71112223344"));     JSONДанные.Вставить("ОбъемПродаж", 5000000);     JSONДанные.Вставить("Поставщик?", Ложь);          // Преобразуем структуру в JSON     JSONСтрока = JSONЗапись(JSONДанные);          // Устанавливаем тело запроса     Запрос.УстановитьТело(JSONСтрока);          // Отправляем запрос     Ответ = HTTPСоединение.Отправить(Запрос);          // Обрабатываем ответ     Если Ответ.КодСостояния = 200 Тогда         Сообщить("Документ успешно отправлен.");     Иначе         Сообщить("Ошибка отправки документа: " + Ответ.КодСостояния + " " + Ответ.ПолучитьТело());     КонецЕсли; КонецПроцедуры   Функция JSONЗапись(Данные)     // Создаем объект записи JSON     Запись = Новый ЗаписьJSON;     Запись.УстановитьСтроку(Новый Строка);          // Записываем данные в JSON     Запись.ЗаписатьНачалоОбъекта();     Для Каждого Параметр Из Данные Цикл         Запись.ЗаписатьИмяСвойства(Параметр.Ключ);         Запись.ЗаписатьЗначение(Параметр.Значение);     КонецЦикла;     Запись.ЗаписатьКонецОбъекта();          // Возвращаем JSON-строку     Возврат Запись.ПолучитьСтроку(); КонецФункции

В этом примере:
– Мы создаем HTTP-запрос и устанавливаем URL.
– Устанавливаем заголовок Content-Type для указания, что отправляем данные в формате JSON.
– Формируем структуру данных, которую хотим отправить, и преобразуем ее в JSON-строку.
– Устанавливаем тело запроса и отправляем его.
– Обрабатываем ответ от сервера.

Не забудьте заменить http://example.com/api/endpoint на ваш фактический URL.

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

Привет, Александр!

Для подключения к MS SQL Server 2022 с использованием объекта ADODB.Connection в 1С, строка подключения может выглядеть следующим образом:

1С (Код)

1C строкаСоединения = "Provider=SQLOLEDB;Data Source=имя_сервера;Initial Catalog=имя_базы;User ID=имя_пользователя;Password=пароль;"; соединение = новый COMОбъект("ADODB.Connection"); соединение.Open(строкаСоединения);

1 2 3 4

1C строкаСоединения = "Provider=SQLOLEDB;Data Source=имя_сервера;Initial Catalog=имя_базы;User ID=имя_пользователя;Password=пароль;"; соединение = новый COMОбъект("ADODB.Connection"); соединение.Open(строкаСоединения);

Здесь:
– имя_сервера — это имя вашего SQL сервера или его IP-адрес.
– имя_базы — это имя базы данных, к которой вы хотите подключиться.
– имя_пользователя и пароль — это учетные данные для доступа к базе данных.

Если вы используете Windows аутентификацию, строка подключения будет выглядеть так:

1С (Код)

1C строкаСоединения = "Provider=SQLOLEDB;Data Source=имя_сервера;Initial Catalog=имя_базы;Integrated Security=SSPI;";

1 2	1C строкаСоединения = "Provider=SQLOLEDB;Data Source=имя_сервера;Initial Catalog=имя_базы;Integrated Security=SSPI;";

В этом случае Integrated Security=SSPI позволяет использовать текущие учетные данные Windows для подключения.

Рекомендую посмотреть здесь: [Документация по строкам подключения](https://docs.microsoft.com/en-us/sql/connect/ado/connection-strings?view=sql-server-ver15).

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

Привет, Александр!

Для отправки документов по HTTP в 1С:Предприятие можно использовать следующий пример кода. Этот код демонстрирует, как сформировать HTTP-запрос для отправки файла на сервер:

1С (Код)

1C &НаСервере Процедура ОтправитьДокументНаСервер(ПутьКФайлу, URL) // Создаем объект HTTP-запроса Запрос = Новый HTTPЗапрос(URL); // Устанавливаем заголовки, если необходимо Заголовки = Новый Соответствие; Заголовки.Вставить("Content-Type", "application/octet-stream"); Запрос.УстановитьЗаголовки(Заголовки); // Читаем файл Файл = Новый Файл(ПутьКФайлу); Если Файл.Существует() Тогда Данные = Новый ДвоичныеДанные(Файл.Прочитать()); Запрос.УстановитьТелоИзДвоичныхДанных(Данные); // Отправляем запрос Ответ = Новый HTTPСоединение(URL).ВызватьHTTPМетод("POST", Запрос); // Обработка ответа Если Ответ.КодСостояния = 200 Тогда Сообщить("Документ успешно отправлен."); Иначе Сообщить("Ошибка отправки документа: " + Ответ.КодСостояния + " " + Ответ.Текст); КонецЕсли; Иначе Сообщить("Файл не найден: " + ПутьКФайлу); КонецЕсли; КонецПроцедуры

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

1C &НаСервере Процедура ОтправитьДокументНаСервер(ПутьКФайлу, URL)     // Создаем объект HTTP-запроса     Запрос = Новый HTTPЗапрос(URL);          // Устанавливаем заголовки, если необходимо     Заголовки = Новый Соответствие;     Заголовки.Вставить("Content-Type", "application/octet-stream");     Запрос.УстановитьЗаголовки(Заголовки);          // Читаем файл     Файл = Новый Файл(ПутьКФайлу);     Если Файл.Существует() Тогда         Данные = Новый ДвоичныеДанные(Файл.Прочитать());         Запрос.УстановитьТелоИзДвоичныхДанных(Данные);                  // Отправляем запрос         Ответ = Новый HTTPСоединение(URL).ВызватьHTTPМетод("POST", Запрос);                  // Обработка ответа         Если Ответ.КодСостояния = 200 Тогда             Сообщить("Документ успешно отправлен.");         Иначе             Сообщить("Ошибка отправки документа: " + Ответ.КодСостояния + " " + Ответ.Текст);         КонецЕсли;     Иначе         Сообщить("Файл не найден: " + ПутьКФайлу);     КонецЕсли; КонецПроцедуры

### Объяснение кода:
1. **Создание HTTP-запроса**: Мы создаем объект HTTPЗапрос с указанным URL.
2. **Установка заголовков**: Устанавливаем заголовок Content-Type, чтобы указать тип передаваемых данных.
3. **Чтение файла**: Проверяем, существует ли файл, и читаем его содержимое в двоичные данные.
4. **Отправка запроса**: Используем метод ВызватьHTTPМетод для отправки данных на сервер с методом POST.
5. **Обработка ответа**: Проверяем код состояния ответа и выводим соответствующее сообщение.

Этот код можно адаптировать под ваши нужды, изменив URL и путь к файлу.

Если у вас есть дополнительные вопросы или нужна помощь с конкретными аспектами, дайте знать!

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

Привет, VLADIMIR!

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

1С (Код)

1C Процедура ПриОткрытии() Экспорт ЭлементыФормы.Номенклатура.Доступность = Не ЗначениеЗаполнено(ЭлементыФормы.Номенклатура.Значение); ЭлементыФормы.Процент.Доступность = Не ЗначениеЗаполнено(ЭлементыФормы.Процент.Значение); ЭлементыФормы.ДатаПо.Доступность = Не ЗначениеЗаполнено(ЭлементыФормы.ДатаПо.Значение); КонецПроцедуры

1 2 3 4 5 6

1C Процедура ПриОткрытии() Экспорт     ЭлементыФормы.Номенклатура.Доступность = Не ЗначениеЗаполнено(ЭлементыФормы.Номенклатура.Значение);     ЭлементыФормы.Процент.Доступность = Не ЗначениеЗаполнено(ЭлементыФормы.Процент.Значение);     ЭлементыФормы.ДатаПо.Доступность = Не ЗначениеЗаполнено(ЭлементыФормы.ДатаПо.Значение); КонецПроцедуры

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

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

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

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

Вот пример кода, который демонстрирует, как это сделать:

1С (Код)

1C &НаСервере Процедура МассивВТаблицуЗначений(Массив, ТаблицаЗначений, ИмяКолонки) // Проверяем, что массив не пустой Если Массив.Количество() = 0 Тогда Возврат; КонецЕсли; // Создаем колонки в таблице значений ТаблицаЗначений.Колонки.Добавить(ИмяКолонки); // Заполняем таблицу значениями из массива Для Каждого Элемент Из Массив Цикл НоваяСтрока = ТаблицаЗначений.Добавить(); НоваяСтрока[ИмяКолонки] = Элемент; КонецЦикла; КонецПроцедуры

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

1C &НаСервере Процедура МассивВТаблицуЗначений(Массив, ТаблицаЗначений, ИмяКолонки)     // Проверяем, что массив не пустой     Если Массив.Количество() = 0 Тогда         Возврат;     КонецЕсли;       // Создаем колонки в таблице значений     ТаблицаЗначений.Колонки.Добавить(ИмяКолонки);       // Заполняем таблицу значениями из массива     Для Каждого Элемент Из Массив Цикл         НоваяСтрока = ТаблицаЗначений.Добавить();         НоваяСтрока[ИмяКолонки] = Элемент;     КонецЦикла; КонецПроцедуры

### Пример использования:

1С (Код)

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

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

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

### Описание:
1. **Процедура МассивВТаблицуЗначений** принимает массив, таблицу значений и имя колонки, в которую будут записаны данные.
2. **Создание колонки**: В таблице значений создается колонка с указанным именем.
3. **Заполнение таблицы**: Для каждого элемента массива создается новая строка в таблице значений, и значение элемента массива записывается в соответствующую колонку.

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

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

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

Привет, Mikhail!

Использование обработки “Войсковая часть” в 1С БГУ может быть затруднительным, так как БГУ (Бухгалтерия государственного учреждения) имеет свои особенности и отличия от других конфигураций 1С.

1. **Совместимость**: Если обработка была разработана для другой конфигурации (например, для Бухгалтерии предприятия), то могут возникнуть проблемы с совместимостью. БГУ имеет специфические объекты и механизмы, которые могут не поддерживаться в обработке.

2. **Адаптация**: Если обработка использует стандартные объекты и методы, которые есть и в БГУ, то, возможно, потребуется лишь небольшая адаптация кода. Однако, если в обработке используются специфические для другой конфигурации функции, то потребуется более серьезная доработка.

3. **Тестирование**: Рекомендуется протестировать обработку в тестовой среде БГУ, чтобы выявить возможные ошибки и несоответствия.

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

В общем, использование обработки “Войсковая часть” в БГУ возможно, но может потребовать доработки и тестирования.

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

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

Привет, Данил!

Для настройки аутентификации операционной системы с клиентской машины на Linux, когда сервер 1С, Microsoft SQL Server и контроллер домена установлены на Windows Server 2008 R2, вам потребуется выполнить несколько шагов. Основной метод аутентификации в данном случае будет использовать Kerberos. Вот пошаговая инструкция:

### Шаг 1: Установка необходимых пакетов на Linux

Убедитесь, что на вашей клиентской машине под управлением Linux установлены необходимые пакеты для работы с Kerberos. Обычно это krb5-user, libkrb5-dev и другие зависимости. Установите их с помощью пакетного менеджера:

1С (Код)

bash sudo apt update sudo apt install krb5-user libkrb5-dev

1 2 3

bash sudo apt update sudo apt install krb5-user libkrb5-dev

### Шаг 2: Настройка конфигурации Kerberos

Отредактируйте файл конфигурации Kerberos /etc/krb5.conf, чтобы он соответствовал вашему домену. Пример конфигурации:

1С (Код)

ini [libdefaults] default_realm = DOMAIN.LOC dns_lookup_realm = false dns_lookup_kdc = true [realms] DOMAIN.LOC = { kdc = your.kdc.server admin_server = your.kdc.server } [domain_realm] .domain.loc = DOMAIN.LOC domain.loc = DOMAIN.LOC

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

ini [libdefaults]     default_realm = DOMAIN.LOC     dns_lookup_realm = false     dns_lookup_kdc = true   [realms]     DOMAIN.LOC = {         kdc = your.kdc.server         admin_server = your.kdc.server     }   [domain_realm]     .domain.loc = DOMAIN.LOC     domain.loc = DOMAIN.LOC

Замените your.kdc.server на имя вашего контроллера домена.

### Шаг 3: Создание ключевого табличного файла (keytab)

На контроллере домена создайте пользователя для 1С и сгенерируйте ключевой файл (keytab). Используйте утилиту ktpass:

1С (Код)

bash ktpass -princ usr1cv8/srv-1cserver.domain.ru@DOMAIN.LOC -mapuser usr1cv8 -pass YourPassword -out usr1cv8.keytab

1 2	bash ktpass -princ usr1cv8/srv-1cserver.domain.ru@DOMAIN.LOC -mapuser usr1cv8 -pass YourPassword -out usr1cv8.keytab

Скопируйте полученный файл usr1cv8.keytab на клиентскую машину в удобное место, например, /etc/krb5.keytab.

### Шаг 4: Проверка Kerberos

На клиентской машине выполните команду kinit, чтобы проверить, что аутентификация работает:

1С (Код)

bash kinit -k -t /etc/krb5.keytab usr1cv8/srv-1cserver.domain.ru@DOMAIN.LOC

1 2	bash kinit -k -t /etc/krb5.keytab usr1cv8/srv-1cserver.domain.ru@DOMAIN.LOC

Если все настроено правильно, команда не должна выдавать ошибок.

### Шаг 5: Настройка 1С

Теперь, когда аутентификация Kerberos настроена, вам нужно настроить 1С для использования аутентификации операционной системы. В конфигурации 1С укажите, что пользователи будут аутентифицироваться через Kerberos.

1. Откройте 1С и перейдите в раздел «Администрирование».
2. Выберите «Пользователи» и настройте аутентификацию для каждого пользователя, указав соответствующий домен и имя пользователя.

### Шаг 6: Тестирование

Попробуйте подключиться к серверу 1С с клиентской машины под управлением Linux. Убедитесь, что аутентификация проходит успешно.

### Заключение

Следуя этим шагам, вы сможете настроить аутентификацию операционной системы с клиентской машины на Linux для работы с сервером 1С, Microsoft SQL Server и контроллером домена на Windows Server 2008 R2.

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

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

Ошибка заключается в том, что вы пытаетесь получить значение атрибута “Vid” из элемента “Dokument”, но “Vid” не является атрибутом этого элемента, а является дочерним элементом. В вашем XML-фрагменте “Vid” находится внутри элемента “Dokument”, а не как его атрибут.

Чтобы исправить это, вам нужно сначала прочитать дочерние элементы внутри “Dokument”. Вот пример, как это можно сделать:

1С (Код)

1C ЧтениеXML = Новый ЧтениеXML; ЧтениеXML.ОткрытьФайл(ПутьКФайлу); Пока ЧтениеXML.Прочитать() Цикл Если ЧтениеXML.ТипУзла = ТипУзлаXML.НачалоЭлемента И ЧтениеXML.Имя = "Dokument" Тогда Пока ЧтениеXML.Прочитать() Цикл Если ЧтениеXML.ТипУзла = ТипУзлаXML.НачалоЭлемента И ЧтениеXML.Имя = "Vid" Тогда Вид = ЧтениеXML.Значение; // Получаем значение элемента Vid Сообщить("Вид: " + Вид); КонецЕсли; Если ЧтениеXML.ТипУзла = ТипУзлаXML.КонецЭлемента И ЧтениеXML.Имя = "Dokument" Тогда // Выходим из цикла, когда достигли конца элемента Dokument break; КонецЕсли; КонецЦикла; КонецЕсли; КонецЦикла; ЧтениеXML.Закрыть();

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

1C ЧтениеXML = Новый ЧтениеXML; ЧтениеXML.ОткрытьФайл(ПутьКФайлу);       Пока ЧтениеXML.Прочитать() Цикл     Если ЧтениеXML.ТипУзла = ТипУзлаXML.НачалоЭлемента И ЧтениеXML.Имя = "Dokument" Тогда         Пока ЧтениеXML.Прочитать() Цикл             Если ЧтениеXML.ТипУзла = ТипУзлаXML.НачалоЭлемента И ЧтениеXML.Имя = "Vid" Тогда                 Вид = ЧтениеXML.Значение; // Получаем значение элемента Vid                 Сообщить("Вид: " + Вид);             КонецЕсли;             Если ЧтениеXML.ТипУзла = ТипУзлаXML.КонецЭлемента И ЧтениеXML.Имя = "Dokument" Тогда                 // Выходим из цикла, когда достигли конца элемента Dokument                 break;             КонецЕсли;         КонецЦикла;     КонецЕсли; КонецЦикла;   ЧтениеXML.Закрыть();

В этом коде мы сначала проверяем, что мы находимся внутри элемента “Dokument”, а затем читаем его дочерние элементы, чтобы получить значение “Vid”.

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

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

Здравствуйте, Наталья!

Реквизит AfterIndexKey в справочнике “Диадок: юр/физлица” используется для хранения значения, которое указывает на ключ, который следует использовать после текущего индекса. Это может быть полезно для оптимизации работы с данными, особенно в контексте обработки и поиска информации в справочнике.

Основные функции этого реквизита могут включать:

1. **Оптимизация поиска**: Позволяет быстро находить записи, которые идут после определенного ключа, что может ускорить операции выборки данных.
2. **Упрощение навигации**: Помогает в реализации функционала, связанного с постраничным отображением данных или при работе с большими объемами информации.
3. **Поддержка уникальности**: Может использоваться для обеспечения уникальности записей в справочнике, особенно если записи могут добавляться или изменяться динамически.

Таким образом, AfterIndexKey является важным инструментом для повышения эффективности работы с данными в справочнике “Диадок: юр/физлица”.

Если у вас есть дополнительные вопросы или нужна помощь с кодом, дайте знать!

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

Сергей, вот пример кода для загрузки прихода из XML файла в 1С. Этот код считывает данные из предоставленного XML и создает документ “Поступление товаров” с соответствующими реквизитами и строками товаров.

1С (Код)

1C &НаСервереФункция ЗагрузитьПриходИзXML(ПутьКФайлу) // Создаем объект для чтения XML ЧтениеXML = Новый ЧтениеXML; ЧтениеXML.ОткрытьФайл(ПутьКФайлу); // Создаем новый документ "Поступление товаров" ДокументПрихода = Документы.ПоступлениеТоваров.СоздатьДокумент(); // Читаем корневой элемент ЧтениеXML.Прочитать(); Если ЧтениеXML.ТипУзла = ТипУзлаXML.НачалоЭлемента И ЧтениеXML.Имя = "issuance" Тогда // Читаем данные документа ЧтениеXML.Прочитать(); Если ЧтениеXML.ТипУзла = ТипУзлаXML.НачалоЭлемента И ЧтениеXML.Имя = "Dokument" Тогда // Читаем реквизиты документа Пока ЧтениеXML.Прочитать() Цикл Если ЧтениеXML.ТипУзла = ТипУзлаXML.НачалоЭлемента Тогда Если ЧтениеXML.Имя = "Vid" Тогда ДокументПрихода.Вид = ЧтениеXML.ЧитатьТекст(); КонецЕсли; Если ЧтениеXML.Имя = "DataDok" Тогда ДокументПрихода.Дата = ЧтениеXML.ЧитатьТекст(); КонецЕсли; Если ЧтениеXML.Имя = "NomerDok" Тогда ДокументПрихода.Номер = ЧтениеXML.ЧитатьТекст(); КонецЕсли; Если ЧтениеXML.Имя = "SkladOtpravitel" Тогда ДокументПрихода.СкладОтправитель = ЧтениеXML.ЧитатьТекст(); КонецЕсли; Если ЧтениеXML.Имя = "SkladPoluchatel" Тогда ДокументПрихода.СкладПолучатель = ЧтениеXML.ЧитатьТекст(); КонецЕсли; КонецЕсли; Если ЧтениеXML.ТипУзла = ТипУзлаXML.КонецЭлемента Тогда Если ЧтениеXML.Имя = "Dokument" Тогда // Переходим к чтению товаров Прервать; КонецЕсли; КонецЕсли; КонецЦикла; КонецЕсли; // Читаем товары Пока ЧтениеXML.Прочитать() Цикл Если ЧтениеXML.ТипУзла = ТипУзлаXML.НачалоЭлемента И ЧтениеXML.Имя = "Tovar" Тогда // Создаем строку товара СтрокаТовара = ДокументПрихода.Товары.Добавить(); Пока ЧтениеXML.Прочитать() Цикл Если ЧтениеXML.ТипУзла = ТипУзлаXML.НачалоЭлемента Тогда Если ЧтениеXML.Имя = "Tovar_Artikul" Тогда СтрокаТовара.Артикул = ЧтениеXML.ЧитатьТекст(); КонецЕсли; Если ЧтениеXML.Имя = "Tovar_Name" Тогда СтрокаТовара.Наименование = ЧтениеXML.ЧитатьТекст(); КонецЕсли; Если ЧтениеXML.Имя = "Tovar_Kol" Тогда СтрокаТовара.Количество = Число(ЧтениеXML.ЧитатьТекст()); КонецЕсли; Если ЧтениеXML.Имя = "Tovar_CenaRealizaciiUchetnaya" Тогда СтрокаТовара.Цена = Число(ЧтениеXML.ЧитатьТекст()); КонецЕсли; КонецЕсли; Если ЧтениеXML.ТипУзла = ТипУзлаXML.КонецЭлемента Тогда Если ЧтениеXML.Имя = "Tovar" Тогда Прервать; КонецЕсли; КонецЕсли; КонецЦикла; КонецЕсли; КонецЦикла; КонецЕсли; // Закрываем документ ДокументПрихода.Записать(); ЧтениеXML.Закрыть(); КонецФункции

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80

1C &НаСервереФункция ЗагрузитьПриходИзXML(ПутьКФайлу)     // Создаем объект для чтения XML     ЧтениеXML = Новый ЧтениеXML;     ЧтениеXML.ОткрытьФайл(ПутьКФайлу);          // Создаем новый документ "Поступление товаров"     ДокументПрихода = Документы.ПоступлениеТоваров.СоздатьДокумент();          // Читаем корневой элемент     ЧтениеXML.Прочитать();     Если ЧтениеXML.ТипУзла = ТипУзлаXML.НачалоЭлемента И ЧтениеXML.Имя = "issuance" Тогда         // Читаем данные документа         ЧтениеXML.Прочитать();         Если ЧтениеXML.ТипУзла = ТипУзлаXML.НачалоЭлемента И ЧтениеXML.Имя = "Dokument" Тогда             // Читаем реквизиты документа             Пока ЧтениеXML.Прочитать() Цикл                 Если ЧтениеXML.ТипУзла = ТипУзлаXML.НачалоЭлемента Тогда                     Если ЧтениеXML.Имя = "Vid" Тогда                         ДокументПрихода.Вид = ЧтениеXML.ЧитатьТекст();                     КонецЕсли;                     Если ЧтениеXML.Имя = "DataDok" Тогда                         ДокументПрихода.Дата = ЧтениеXML.ЧитатьТекст();                     КонецЕсли;                     Если ЧтениеXML.Имя = "NomerDok" Тогда                         ДокументПрихода.Номер = ЧтениеXML.ЧитатьТекст();                     КонецЕсли;                     Если ЧтениеXML.Имя = "SkladOtpravitel" Тогда                         ДокументПрихода.СкладОтправитель = ЧтениеXML.ЧитатьТекст();                     КонецЕсли;                     Если ЧтениеXML.Имя = "SkladPoluchatel" Тогда                         ДокументПрихода.СкладПолучатель = ЧтениеXML.ЧитатьТекст();                     КонецЕсли;                 КонецЕсли;                                  Если ЧтениеXML.ТипУзла = ТипУзлаXML.КонецЭлемента Тогда                     Если ЧтениеXML.Имя = "Dokument" Тогда                         // Переходим к чтению товаров                         Прервать;                     КонецЕсли;                 КонецЕсли;             КонецЦикла;         КонецЕсли;           // Читаем товары         Пока ЧтениеXML.Прочитать() Цикл             Если ЧтениеXML.ТипУзла = ТипУзлаXML.НачалоЭлемента И ЧтениеXML.Имя = "Tovar" Тогда                 // Создаем строку товара                 СтрокаТовара = ДокументПрихода.Товары.Добавить();                                  Пока ЧтениеXML.Прочитать() Цикл                     Если ЧтениеXML.ТипУзла = ТипУзлаXML.НачалоЭлемента Тогда                         Если ЧтениеXML.Имя = "Tovar_Artikul" Тогда                             СтрокаТовара.Артикул = ЧтениеXML.ЧитатьТекст();                         КонецЕсли;                         Если ЧтениеXML.Имя = "Tovar_Name" Тогда                             СтрокаТовара.Наименование = ЧтениеXML.ЧитатьТекст();                         КонецЕсли;                         Если ЧтениеXML.Имя = "Tovar_Kol" Тогда                             СтрокаТовара.Количество = Число(ЧтениеXML.ЧитатьТекст());                         КонецЕсли;                         Если ЧтениеXML.Имя = "Tovar_CenaRealizaciiUchetnaya" Тогда                             СтрокаТовара.Цена = Число(ЧтениеXML.ЧитатьТекст());                         КонецЕсли;                     КонецЕсли;                       Если ЧтениеXML.ТипУзла = ТипУзлаXML.КонецЭлемента Тогда                         Если ЧтениеXML.Имя = "Tovar" Тогда                             Прервать;                         КонецЕсли;                     КонецЕсли;                 КонецЦикла;             КонецЕсли;         КонецЦикла;     КонецЕсли;       // Закрываем документ     ДокументПрихода.Записать();     ЧтениеXML.Закрыть(); КонецФункции

### Описание кода:
1. **Чтение XML**: Используется объект ЧтениеXML для открытия и чтения данных из файла.
2. **Создание документа**: Создается новый документ “Поступление товаров”.
3. **Чтение реквизитов**: Извлекаются реквизиты документа из XML.
4. **Чтение товаров**: Для каждого товара создается строка в документе, где заполняются необходимые поля.
5. **Запись документа**: После заполнения всех данных документ записывается в базу.

Этот код можно вызывать, передавая путь к XML файлу, например:

1С (Код)

1C ЗагрузитьПриходИзXML("C:pathtoyourfile.xml");

1 2	1C ЗагрузитьПриходИзXML("C:pathtoyourfile.xml");

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

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

Привет, art!

Чтобы отбирать из регистра только те организации, у которых значение перечисления “ДляЮридическихЛиц”, вам нужно добавить условие в ваш запрос. Предположим, что новое измерение в регистре называется ВидОрганизации. Вам нужно будет добавить это условие в секцию ГДЕ вашего запроса.

Вот как это можно сделать:

1С (Код)

1C ВЫБРАТЬ РеализацияТоваровУслугТовары.Номенклатура КАК ТоварНаименование, РеализацияТоваровУслугТовары.Количество, РеализацияТоваровУслугТовары.Сумма КАК Сумма, РеализацияТоваровУслугТовары.СуммаНДС КАК СуммаНДС, РеализацияТоваровУслугТовары.Ссылка.Сделка, РеализацияТоваровУслугТовары.Ссылка.Сделка.Номер, РеализацияТоваровУслугТовары.Ссылка.Сделка.Дата, РеализацияТоваровУслугТовары.Цена КАК Цена, РеализацияТоваровУслугТовары.Цена * РеализацияТоваровУслугТовары.Количество КАК СуммаБезНДС, РеализацияТоваровУслугТовары.Сумма / РеализацияТоваровУслугТовары.Количество * РеализацияТоваровУслугТовары.Количество + РеализацияТоваровУслугТовары.СуммаНДС КАК СуммаСНДС, РеализацияТоваровУслугТовары.Номенклатура.Код КАК ТоварКод, РеализацияТоваровУслугТовары.Ссылка.Контрагент, РеализацияТоваровУслугТовары.Ссылка.Дата КАК ДатаДокументаРеал, РеализацияТоваровУслугТовары.Ссылка.Контрагент.ИНН КАК ИННПокупателя, РеализацияТоваровУслугТовары.Ссылка.Контрагент.НаименованиеПолное КАК ПредставлениеПлательщика, РеализацияТоваровУслугТовары.Ссылка.Сделка.Номер КАК Основание, РеализацияТоваровУслугТовары.Ссылка.Дата КАК ДатаДокумента, РеализацияТоваровУслугТовары.Ссылка.Номер КАК НомерДокумента, ПодразделенияОрганизацийСрезПоследних.Организация КАК ПредставлениеПоставщика, ПодразделенияОрганизацийСрезПоследних.Организация.ИНН КАК ИННОрганизации, ПодразделенияОрганизацийСрезПоследних.Подразделение.Адрес КАК АдресОрганизации, РеализацияТоваровУслугТовары.Ссылка.СуммаДокумента КАК ИтогСуммыСНДС ИЗ Документ.РеализацияТоваровУслуг.Товары КАК РеализацияТоваровУслугТовары ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.РегистрСведений.СрезПоследних(&ДатаДокумента, ) КАК ПодразделенияОрганизацийСрезПоследних ПО РеализацияТоваровУслугТовары.Склад.Подразделение = ПодразделенияОрганизацийСрезПоследних.Подразделение ГДЕ РеализацияТоваровУслугТовары.Ссылка = &Ссылка И РеализацияТоваровУслугТовары.Цена > 0 И РеализацияТоваровУслугТовары.Количество > 0 И ПодразделенияОрганизацийСрезПоследних.ВидОрганизации = Перечисления.ВидыОрганизацийПодразделений.ДляЮридическихЛиц

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33

1C ВЫБРАТЬ   РеализацияТоваровУслугТовары.Номенклатура КАК ТоварНаименование,   РеализацияТоваровУслугТовары.Количество,   РеализацияТоваровУслугТовары.Сумма КАК Сумма,   РеализацияТоваровУслугТовары.СуммаНДС КАК СуммаНДС,   РеализацияТоваровУслугТовары.Ссылка.Сделка,   РеализацияТоваровУслугТовары.Ссылка.Сделка.Номер,   РеализацияТоваровУслугТовары.Ссылка.Сделка.Дата,   РеализацияТоваровУслугТовары.Цена КАК Цена,   РеализацияТоваровУслугТовары.Цена * РеализацияТоваровУслугТовары.Количество КАК СуммаБезНДС,   РеализацияТоваровУслугТовары.Сумма / РеализацияТоваровУслугТовары.Количество * РеализацияТоваровУслугТовары.Количество + РеализацияТоваровУслугТовары.СуммаНДС КАК СуммаСНДС,   РеализацияТоваровУслугТовары.Номенклатура.Код КАК ТоварКод,   РеализацияТоваровУслугТовары.Ссылка.Контрагент,   РеализацияТоваровУслугТовары.Ссылка.Дата КАК ДатаДокументаРеал,   РеализацияТоваровУслугТовары.Ссылка.Контрагент.ИНН КАК ИННПокупателя,   РеализацияТоваровУслугТовары.Ссылка.Контрагент.НаименованиеПолное КАК ПредставлениеПлательщика,   РеализацияТоваровУслугТовары.Ссылка.Сделка.Номер КАК Основание,   РеализацияТоваровУслугТовары.Ссылка.Дата КАК ДатаДокумента,   РеализацияТоваровУслугТовары.Ссылка.Номер КАК НомерДокумента,   ПодразделенияОрганизацийСрезПоследних.Организация КАК ПредставлениеПоставщика,   ПодразделенияОрганизацийСрезПоследних.Организация.ИНН КАК ИННОрганизации,   ПодразделенияОрганизацийСрезПоследних.Подразделение.Адрес КАК АдресОрганизации,   РеализацияТоваровУслугТовары.Ссылка.СуммаДокумента КАК ИтогСуммыСНДС ИЗ   Документ.РеализацияТоваровУслуг.Товары КАК РеализацияТоваровУслугТовары     ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.РегистрСведений.СрезПоследних(&ДатаДокумента, ) КАК ПодразделенияОрганизацийСрезПоследних     ПО РеализацияТоваровУслугТовары.Склад.Подразделение = ПодразделенияОрганизацийСрезПоследних.Подразделение ГДЕ   РеализацияТоваровУслугТовары.Ссылка = &Ссылка   И РеализацияТоваровУслугТовары.Цена > 0   И РеализацияТоваровУслугТовары.Количество > 0   И ПодразделенияОрганизацийСрезПоследних.ВидОрганизации = Перечисления.ВидыОрганизацийПодразделений.ДляЮридическихЛиц

В этом запросе добавлено условие:

1С (Код)

1C И ПодразделенияОрганизацийСрезПоследних.ВидОрганизации = Перечисления.ВидыОрганизацийПодразделений.ДляЮридическихЛиц

1 2	1C И ПодразделенияОрганизацийСрезПоследних.ВидОрганизации = Перечисления.ВидыОрганизацийПодразделений.ДляЮридическихЛиц

Это условие будет фильтровать записи, оставляя только те, у которых значение ВидОрганизации равно “ДляЮридическихЛиц”.

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

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

Чтобы добавить в ваш запрос информацию о серии номенклатуры, необходимо включить соответствующее поле из регистра или справочника, где хранится информация о сериях. Предположим, что у вас есть справочник “СерииНоменклатуры”, который содержит информацию о сериях для каждой номенклатуры.

Вот как можно изменить ваш запрос, чтобы добавить поле “Серия”:

1С (Код)

sql ВЫБРАТЬ СпрНоменклатура.Ссылка КАК Номенклатура, ЕСТЬNULL(ЦеныНоменклатурыСрезПоследних.Цена, 0) КАК Цена, ЕСТЬNULL(ТоварыНаСкладахОстатки.КоличествоОстаток, 0) КАК Остаток, СерииНоменклатуры.Ссылка КАК Серия ИЗ Справочник.Номенклатура КАК СпрНоменклатура ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.ЦеныНоменклатуры.СрезПоследних(&период, ВидЦены = &ВидЦены) КАК ЦеныНоменклатурыСрезПоследних ЛЕВОЕ СОЕДИНЕНИЕ РегистрНакопления.ТоварыНаСкладах.Остатки(, Склад = &Склад) КАК ТоварыНаСкладахОстатки ЛЕВОЕ СОЕДИНЕНИЕ Справочник.СерииНоменклатуры КАК СерииНоменклатуры ПО СпрНоменклатура.Ссылка = СерииНоменклатуры.Номенклатура ПО СпрНоменклатура.Ссылка = ЦеныНоменклатурыСрезПоследних.Номенклатура ГДЕ ВЫБОР КОГДА &ТолькоВНаличии ТОГДА ЕСТЬNULL(ТоварыНаСкладахОстатки.КоличествоОстаток, 0) > 0 ИНАЧЕ ИСТИНА КОНЕЦ И ВЫБОР КОГДА &ТолькоСЦенами ТОГДА ЕСТЬNULL(ЦеныНоменклатурыСрезПоследних.Цена, 0) > 0 ИНАЧЕ ИСТИНА КОНЕЦ

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

sql ВЫБРАТЬ   СпрНоменклатура.Ссылка КАК Номенклатура,   ЕСТЬNULL(ЦеныНоменклатурыСрезПоследних.Цена, 0) КАК Цена,   ЕСТЬNULL(ТоварыНаСкладахОстатки.КоличествоОстаток, 0) КАК Остаток,   СерииНоменклатуры.Ссылка КАК Серия ИЗ   Справочник.Номенклатура КАК СпрНоменклатура     ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.ЦеныНоменклатуры.СрезПоследних(&период, ВидЦены = &ВидЦены) КАК ЦеныНоменклатурыСрезПоследних       ЛЕВОЕ СОЕДИНЕНИЕ РегистрНакопления.ТоварыНаСкладах.Остатки(, Склад = &Склад) КАК ТоварыНаСкладахОстатки       ЛЕВОЕ СОЕДИНЕНИЕ Справочник.СерииНоменклатуры КАК СерииНоменклатуры       ПО СпрНоменклатура.Ссылка = СерииНоменклатуры.Номенклатура     ПО СпрНоменклатура.Ссылка = ЦеныНоменклатурыСрезПоследних.Номенклатура ГДЕ   ВЫБОР       КОГДА &ТолькоВНаличии         ТОГДА ЕСТЬNULL(ТоварыНаСкладахОстатки.КоличествоОстаток, 0) > 0       ИНАЧЕ ИСТИНА     КОНЕЦ   И ВЫБОР       КОГДА &ТолькоСЦенами         ТОГДА ЕСТЬNULL(ЦеныНоменклатурыСрезПоследних.Цена, 0) > 0       ИНАЧЕ ИСТИНА     КОНЕЦ

В этом измененном запросе добавлено левое соединение с справочником “СерииНоменклатуры”, чтобы получить информацию о серии для каждой номенклатуры. Поле СерииНоменклатуры.Ссылка добавлено в выборку, чтобы вернуть ссылку на серию номенклатуры. Убедитесь, что в вашей базе данных существует соответствующий справочник и поле для серий.

[Автор]

Сообщения