poisk_i_sozdanie_uzla_obmena_dlja_planaobmena [wiki.hostingcloud.com.ua]

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

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

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