poisk_i_sozdanie_uzla_obmena_dlja_planaobmena

Поиск и создание узла обмена для ПланаОбмена

Функция ПолучитьУзелОбменаОтметокСБУХ()

	ЭтотУзел = ПланыОбмена.ОтметкиНДЗаказовКлиентовВБуХ.ЭтотУзел();
	
	Запрос = Новый Запрос;
	Запрос.Текст = 
		"ВЫБРАТЬ
		|	ОтметкиНДЗаказовКлиентовВБуХ.Ссылка,
		|	ОтметкиНДЗаказовКлиентовВБуХ.Наименование
		|ИЗ
		|	ПланОбмена.ОтметкиНДЗаказовКлиентовВБуХ КАК ОтметкиНДЗаказовКлиентовВБуХ
		|ГДЕ
		|	ОтметкиНДЗаказовКлиентовВБуХ.Ссылка <> &ЭтотУзел";
		
	Запрос.УстановитьПараметр("ЭтотУзел", ЭтотУзел);
	
	Результат = Запрос.Выполнить();
	
	Если Результат.Пустой() Тогда
		УзелОтметкиНДЗаказовКлиентовВБуХ = ПланыОбмена.ОтметкиНДЗаказовКлиентовВБуХ.СоздатьУзел();
		УзелОтметкиНДЗаказовКлиентовВБуХ.Наименование = "УзелОтметкиНДЗаказовКлиентовВБуХ";
		УзелОтметкиНДЗаказовКлиентовВБуХ.Код = 1;
		УзелОтметкиНДЗаказовКлиентовВБуХ.Записать();
		Узел = УзелОтметкиНДЗаказовКлиентовВБуХ.Ссылка;
	Иначе
		Выборка = Результат.Выбрать();
		Выборка.Следующий();
		Узел = Выборка.Ссылка;
	КонецЕсли;
	
	Возврат Узел;
	
КонецФункции
  • /sites/data/pages/poisk_i_sozdanie_uzla_obmena_dlja_planaobmena.txt
  • Последнее изменение: 2024/04/25 11:50
  • tro