- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
- 12
- 13
- 14
- 15
- 16
- 17
- 18
- 19
- 20
- 21
- 22
- 23
- 24
- 25
- 26
- 27
Если Номенклатура1 <> Номенклатура2 Тогда
Запрос=Новый Запрос("ВЫБРАТЬ
|РаспределениеМатериаловПоМенеджерам.ЗаявкаНаМатериалы,
|РаспределениеМатериаловПоМенеджерам.Материал
|ИЗ
|РегистрСведений.РаспределениеМатериаловПоМенеджерам КАК РаспределениеМатериаловПоМенеджерам
|ГДЕ
|РаспределениеМатериаловПоМенеджерам.Материал = &Материал");
Запрос.УстановитьПараметр("Материал",Номенклатура1);
Выборка=Запрос.Выполнить().Выбрать();
Пока Выборка.Следующий() Цикл
МЗСтарой=РегистрыСведений.РаспределениеМатериаловПоМенеджерам.СоздатьМенеджерЗаписи();
МЗСтарой.ЗаявкаНаМатериалы=Выборка.ЗаявкаНаМатериалы;
МЗСтарой.Материал=Номенклатура2;
МЗСтарой.Прочитать();
МЗНовой=РегистрыСведений.РаспределениеМатериаловПоМенеджерам.СоздатьМенеджерЗаписи();
МЗНовой.ЗаявкаНаМатериалы=Выборка.ЗаявкаНаМатериалы;
МЗНовой.Материал=Выборка.Материал;
МЗНовой.Прочитать();
Если МЗСтарой.Выбран() тогда
МЗНовой.Удалить();
Иначе
МЗНовой.Материал=Номенклатура2;
МЗНовой.Записать(Истина);
КонецЕсли;
КонецЦикла;
КонецЕсли;
Вот такой код сделан был франчем, который потребовал за это еще и 3 часа оплаты)))) Одно только непонятно почему при обращении к регистру нельзя было использовать отбор это же гораздо проще и быстрее и кода меньше
Follow us!
> и кода меньше
Сложно объяснить, что он делал три часа, например.
|перевод
|строки
|ящетаю"
к томуже платформа сама форматирует это, так что набирать самому | не приходится
Константин Игоревич Костин 25.06.1986, Можайское Шоссе, д. 30, кв. 65
Состоит в: ..., КодоБред
2. Нормальным людям скрываться нечего. Это ты анонимное гумно с залупой за щекой. Представь что будет если узнают твоя мама/однокласники в школе, на какую херню ты потратил свои каникулы.
3. Гумно пойди на улицу погуляй с друзьями, в речке покупайся, фруктов покушай, или там на велике покатайся.
4. Тут ты не нужен.
guest читается как [гест], а не как [гумно].
Ты чего скрываешь?
>Это ты анонимное гумно с залупой за щекой.
Нет, ты!
Возможно, вот только сеньоры и тим лиды не могут пройти собеседование на Junior MS SQL developer...
> Однако, встречаются долбоебы, возомнившие себя SQL-программистами :-D
ИМХО, понятие SQL-программист бывает только в совковых конторах.
А если у анона ФГМ, и он не знает как перевести DBdev, то это печально.
> DBDev
Это что-то наподобие HTML-программиста :-D
>что-то наподобие HTML-программиста
Бгг. Какой феерический уебок сегодня зашел на концерт.
Что еще спизданешь, дружок?!
Вот этот конкретный аноним - это что-то наподобие пидараса.
http://tinyurl.com/cey9cs2
Хотя в то, что защитился, верится слабо, еще недавно хныкал о несданных задачах по терверу второго-третьего курса.
Здесь набор с отбором по материалу нельзя делать, иначе может конфликт уникальности если уже есть запись: Номенклатура2 с Заявкой. Т.е. набором не стоит. Можно менеджером по 1-й записи.
И нахе все эти проверки на существование, ведь он и так записывает с заменой (если измерения совпадают). Я так поня 2 измерения в регистре Материал и Заявка.
Если Номенклатура1 <> Номенклатура2 Тогда
Запрос=Новый Запрос("ВЫБРАТЬ
|РаспределениеМатериаловПоМенеджерам.Зая вкаНаМатериалы,
|РаспределениеМатериаловПоМенеджерам.Мат ериал
|ИЗ
|РегистрСведений.РаспределениеМатериалов ПоМенеджерам КАК РаспределениеМатериаловПоМенеджерам
|ГДЕ
|РаспределениеМатериаловПоМенеджерам.Мат ериал = &Материал");
Запрос.УстановитьПараметр("Материал",Ном енклатура1);
Выборка=Запрос.Выполнить().Выбрать();
Пока Выборка.Следующий() Цикл
МЗНовой = РегистрыСведений.РаспределениеМатериалов ПоМенеджерам.СоздатьМенеджерЗаписи();
МЗНовой.ЗаявкаНаМатериалы=Выборка.Заявка НаМатериалы;
МЗНовой.Материал=Выборка.Номенклатура2;
МЗНовой.Записать(Истина); // пох если дубли, записываем с заменой
КонецЦикла;
КонецЕсли;
кароч кодер хуёво разбирается в механизмах регистров сведений и тупит