гзв
This commit is contained in:
artem
parent
12463f9c90
commit
53c619ae4f
BIN
public/poleznoe/РегистрацияИзмененийДляОбменаДанными.epf
Normal file
BIN
public/poleznoe/РегистрацияИзмененийДляОбменаДанными.epf
Normal file
Binary file not shown.
@ -0,0 +1,42 @@
|
||||
---
|
||||
title: Как выгрузить изменения в сообщение обмена
|
||||
slug: общие-обмен-данными-1-планы-обмена/как-выгрузить-изменения-в-сообщение-обмена
|
||||
---
|
||||
```bsl
|
||||
УзелОбмена = ПланыОбмена.ОбменИсточникПриемник.НайтиПоКоду("ПР");
|
||||
|
||||
Если НЕ УзелОбмена.Пустая() Тогда
|
||||
|
||||
// 0. Создаем объект ЗаписьXML для формирования XML-файла
|
||||
ПутьКФайлуСообщения = "S:\Exchange\Message_ИС_ПР.xml";
|
||||
ЗаписьXML = Новый ЗаписьXML();
|
||||
ЗаписьXML.ОткрытьФайл(ПутьКФайлуСообщения);
|
||||
|
||||
// 1. Создаем объект "ЗаписьСообщенияОбмена"
|
||||
ЗаписьСообщения = ПланыОбмена.СоздатьЗаписьСообщения();
|
||||
|
||||
// 2. Начинаем запись сообщения обмена для выбранного узла в файл XML
|
||||
ЗаписьСообщения.НачатьЗапись(ЗаписьXML, УзелОбмена);
|
||||
|
||||
// 3. Выбираем изменения
|
||||
ВыборкаИзменений = ПланыОбмена.ВыбратьИзменения(УзелОбмена, ЗаписьСообщения.НомерСообщения);
|
||||
|
||||
// 4. Записываем изменения в файл XML
|
||||
Пока ВыборкаИзменений.Следующий() Цикл
|
||||
Данные = ВыборкаИзменений.Получить();
|
||||
ЗаписатьXML(ЗаписьXML, Данные);
|
||||
КонецЦикла;
|
||||
|
||||
// 5. Заканчиваем запись сообщения обмена
|
||||
ЗаписьСообщения.ЗакончитьЗапись();
|
||||
|
||||
Сообщение = Новый СообщениеПользователю;
|
||||
Сообщение.Текст = "Сообщение обмена успешно сформировано!";
|
||||
Сообщение.Сообщить();
|
||||
|
||||
Иначе
|
||||
Сообщение = Новый СообщениеПользователю;
|
||||
Сообщение.Текст = "Не найден узел плана обмена";
|
||||
Сообщение.Сообщить();
|
||||
КонецЕсли;
|
||||
```
|
||||
@ -0,0 +1,26 @@
|
||||
---
|
||||
title: Как зарегистрировать изменнеия в план обмена
|
||||
slug: общие-обмен-данными-1-планы-обмена/как-зарегистрировать-изменнеия-в-план-обмена
|
||||
---
|
||||
```bsl
|
||||
УзелОбмена = ПланыОбмена.ОбменИсточникПриемник.НайтиПоКоду("ПР");
|
||||
Если НЕ УзелОбмена.Пустая() Тогда
|
||||
|
||||
Контрагент = Справочники.Контрагенты.НайтиПоКоду("000000005");
|
||||
Если НЕ Контрагент.Пустая() Тогда
|
||||
ПланыОбмена.ЗарегистрироватьИзменения(УзелОбмена, Контрагент);
|
||||
Текст = "Изменения контрагента зарегистрированы";
|
||||
Иначе
|
||||
Текст = "Контрагент не найден";
|
||||
КонецЕсли;
|
||||
|
||||
Сообщение = Новый СообщениеПользователю;
|
||||
Сообщение.Текст = Текст;
|
||||
Сообщение.Сообщить();
|
||||
|
||||
Иначе
|
||||
Сообщение = Новый СообщениеПользователю;
|
||||
Сообщение.Текст = "Не найден узел плана обмена";
|
||||
Сообщение.Сообщить();
|
||||
КонецЕсли;
|
||||
```
|
||||
@ -0,0 +1,49 @@
|
||||
---
|
||||
title: Как прочиттать изменения
|
||||
slug: общие-обмен-данными-1-планы-обмена/как-прочиттать-изменения
|
||||
---
|
||||
|
||||
# С присваиванием номера сообщения
|
||||
|
||||
```bsl
|
||||
УзелОбмена = ПланыОбмена.ОбменИсточникПриемник.НайтиПоКоду("ПР");
|
||||
НомерСообщения = 1;
|
||||
Если НЕ УзелОбмена.Пустая() Тогда
|
||||
ВыборкаИзменений = ПланыОбмена.ВыбратьИзменения(УзелОбмена, НомерСообщения);
|
||||
Пока ВыборкаИзменений.Следующий() Цикл
|
||||
Объект = ВыборкаИзменений.Получить();
|
||||
Сообщение = Новый СообщениеПользователю;
|
||||
Сообщение.Текст = Объект;
|
||||
Сообщение.Сообщить();
|
||||
КонецЦикла;
|
||||
Иначе
|
||||
Сообщение = Новый СообщениеПользователю;
|
||||
Сообщение.Текст = "Не найден узел плана обмена";
|
||||
Сообщение.Сообщить();
|
||||
КонецЕсли;
|
||||
```
|
||||
|
||||
# Просто запросом
|
||||
```bsl
|
||||
УзелОбмена = ПланыОбмена.ОбменИсточникПриемник.НайтиПоКоду("ПР");
|
||||
|
||||
Запрос = Новый Запрос;
|
||||
Запрос.УстановитьПараметр("Узел", УзелОбмена);
|
||||
Запрос.Текст =
|
||||
"ВЫБРАТЬ
|
||||
| КонтрагентыИзменения.Узел КАК Узел,
|
||||
| КонтрагентыИзменения.НомерСообщения КАК НомерСообщения,
|
||||
| КонтрагентыИзменения.Ссылка КАК Ссылка
|
||||
|ИЗ
|
||||
| Справочник.Контрагенты.Изменения КАК КонтрагентыИзменения
|
||||
|ГДЕ
|
||||
| КонтрагентыИзменения.Узел = &Узел";
|
||||
|
||||
РезультатЗапроса = Запрос.Выполнить();
|
||||
Выборка = РезультатЗапроса.Выбрать();
|
||||
Пока Выборка.Следующий() Цикл
|
||||
Сообщение = Новый СообщениеПользователю;
|
||||
Сообщение.Текст = Выборка.Ссылка;
|
||||
Сообщение.Сообщить();
|
||||
КонецЦикла;
|
||||
```
|
||||
@ -0,0 +1,18 @@
|
||||
---
|
||||
title: Как удалить изменения из таблицы регистрации изменений
|
||||
slug: общие-обмен-данными-1-планы-обмена/как-удалить-изменения-из-таблицы-регистрации-изменений
|
||||
---
|
||||
```bsl
|
||||
УзелОбмена = ПланыОбмена.ОбменИсточникПриемник.НайтиПоКоду("ПР");
|
||||
|
||||
Если НЕ УзелОбмена.Пустая() Тогда
|
||||
ПланыОбмена.УдалитьРегистрациюИзменений(УзелОбмена);
|
||||
Сообщение = Новый СообщениеПользователю;
|
||||
Сообщение.Текст = "Изменения для узла ""Приемник"" удалены";
|
||||
Сообщение.Сообщить();
|
||||
Иначе
|
||||
Сообщение = Новый СообщениеПользователю;
|
||||
Сообщение.Текст = "Не найден узел плана обмена";
|
||||
Сообщение.Сообщить();
|
||||
КонецЕсли;
|
||||
```
|
||||
@ -28,3 +28,7 @@ slug: общие/полезные-обработки-и-отчеты
|
||||
[На гитхаб](https://github.com/Dyrnwyn/1C_OM/tree/master)
|
||||
|
||||
[Файлом](/poleznoe/УправляемаяКонсольОтчетов_3.8.9.epf)
|
||||
|
||||
## Регистрация изменений для обмена данными
|
||||
|
||||
[Файлом](/poleznoe/РегистрацияИзмененийДляОбменаДанными.epf)
|
||||
@ -1,6 +1,6 @@
|
||||
---
|
||||
title: Цвета стиля
|
||||
slug: общие-стили/цвета-стиля
|
||||
slug: общие-управляемые-формы-стили/цвета-стиля
|
||||
---
|
||||
```bsl
|
||||
////////////////////////////////////////////////////////////////////////////////
|
||||
@ -1,6 +1,6 @@
|
||||
---
|
||||
title: Шрифт стиля
|
||||
slug: общие-стили/шрифт-стиля
|
||||
slug: общие-управляемые-формы-стили/шрифт-стиля
|
||||
---
|
||||
```bsl
|
||||
// Получает шрифт стиля по имени элемента стиля.
|
||||
Loading…
x
Reference in New Issue
Block a user