Код

оТранзакции.Начать();
	ТЗСодержимое.ВыбратьСтроки();
	Пока ТЗСодержимое.ПолучитьСтроку() = 1 Цикл
		сТекстЗапроса = "INSERT INTO Traffic (idNom, cnt, Weight, UserID, IDDocBasis, IDTare, idProc )
		|	Values ('" + ТЗСодержимое.Что.Код+ "',"
		+ТЗСодержимое.Количество +","
		+ТЗСодержимое.Вес +","
		+глПриложение.ПользовательИД  +","
		+"'"+аИдЗаказа + "'"  +","
		+идТары  +	 ","
		+идРаспред    +  "
		|)";

		Если Сам().RS.Выполнить(сТекстЗапроса) = 0 Тогда
			Сообщить(Сам().RS.ПолучитьОписаниеОшибки());
			оТранзакции.Отменить();
			//Предупреждение("Тара не записана!");
			глПриложение.оВопрос.ВопросТС("Тара не записана!",0,4);
			Возврат 0;
		КонецЕсли;
	КонецЦикла;

оТранзакции.Фиксировать();