Нашли или выдавили из себя код, который нельзя назвать нормальным,
на который без улыбки не взглянешь?
Не торопитесь его удалять или рефакторить, — запостите его на
говнокод.ру, посмеёмся вместе!
Если Номенклатура1 <> Номенклатура2 Тогда
Запрос=Новый Запрос("ВЫБРАТЬ
|РаспределениеМатериаловПоМенеджерам.ЗаявкаНаМатериалы,
|РаспределениеМатериаловПоМенеджерам.Материал
|ИЗ
|РегистрСведений.РаспределениеМатериаловПоМенеджерам КАК РаспределениеМатериаловПоМенеджерам
|ГДЕ
|РаспределениеМатериаловПоМенеджерам.Материал = &Материал");
Запрос.УстановитьПараметр("Материал",Номенклатура1);
Выборка=Запрос.Выполнить().Выбрать();
Пока Выборка.Следующий() Цикл
МЗСтарой=РегистрыСведений.РаспределениеМатериаловПоМенеджерам.СоздатьМенеджерЗаписи();
МЗСтарой.ЗаявкаНаМатериалы=Выборка.ЗаявкаНаМатериалы;
МЗСтарой.Материал=Номенклатура2;
МЗСтарой.Прочитать();
МЗНовой=РегистрыСведений.РаспределениеМатериаловПоМенеджерам.СоздатьМенеджерЗаписи();
МЗНовой.ЗаявкаНаМатериалы=Выборка.ЗаявкаНаМатериалы;
МЗНовой.Материал=Выборка.Материал;
МЗНовой.Прочитать();
Если МЗСтарой.Выбран() тогда
МЗНовой.Удалить();
Иначе
МЗНовой.Материал=Номенклатура2;
МЗНовой.Записать(Истина);
КонецЕсли;
КонецЦикла;
КонецЕсли;
Вот такой код сделан был франчем, который потребовал за это еще и 3 часа оплаты)))) Одно только непонятно почему при обращении к регистру нельзя было использовать отбор это же гораздо проще и быстрее и кода меньше
Не промтовый вариант выбивался бы сильно из общей стилистики и переключать раскладку потребно. Немного раздражают/удивляют эти капсовые "ЛЕВОЕ СРЕДНЕЕ РЕЗЬБОВОЕ СОЕДИНЕНИЕ", но так - тот же sql, вид в профиль.
1. Всем похуй.
2. Нормальным людям скрываться нечего. Это ты анонимное гумно с залупой за щекой. Представь что будет если узнают твоя мама/однокласники в школе, на какую херню ты потратил свои каникулы.
3. Гумно пойди на улицу погуляй с друзьями, в речке покупайся, фруктов покушай, или там на велике покатайся.
4. Тут ты не нужен.
> Всегда считал, что SQL - язык, придуманный для домохозяек 🙂
Возможно, вот только сеньоры и тим лиды не могут пройти собеседование на Junior MS SQL developer...
> Однако, встречаются долбоебы, возомнившие себя SQL-программистами 😀
ИМХО, понятие SQL-программист бывает только в совковых конторах.
А если у анона ФГМ, и он не знает как перевести DBdev, то это печально.
>DataBase Developer
>что-то наподобие HTML-программиста
Бгг. Какой феерический уебок сегодня зашел на концерт.
Что еще спизданешь, дружок?! Вот этот конкретный аноним - это что-то наподобие пидараса.
Это всё тот же. http://tinyurl.com/cey9cs2 Хотя в то, что защитился, верится слабо, еще недавно хныкал о несданных задачах по терверу второго-третьего курса.
тут начиная с прохода по выборке вобще половина не нужна
Здесь набор с отбором по материалу нельзя делать, иначе может конфликт уникальности если уже есть запись: Номенклатура2 с Заявкой. Т.е. набором не стоит. Можно менеджером по 1-й записи.
И нахе все эти проверки на существование, ведь он и так записывает с заменой (если измерения совпадают). Я так поня 2 измерения в регистре Материал и Заявка.
Если Номенклатура1 <> Номенклатура2 Тогда
Запрос=Новый Запрос("ВЫБРАТЬ
|РаспределениеМатериаловПоМенеджерам.Зая вкаНаМатериалы,
|РаспределениеМатериаловПоМенеджерам.Мат ериал
|ИЗ
|РегистрСведений.РаспределениеМатериалов ПоМенеджерам КАК РаспределениеМатериаловПоМенеджерам
|ГДЕ
|РаспределениеМатериаловПоМенеджерам.Мат ериал = &Материал");
Запрос.УстановитьПараметр("Материал",Ном енклатура1);
Выборка=Запрос.Выполнить().Выбрать();
Пока Выборка.Следующий() Цикл
МЗНовой = РегистрыСведений.РаспределениеМатериалов ПоМенеджерам.СоздатьМенеджерЗаписи();
МЗНовой.ЗаявкаНаМатериалы=Выборка.Заявка НаМатериалы;
МЗНовой.Материал=Выборка.Номенклатура2;
МЗНовой.Записать(Истина); // пох если дубли, записываем с заменой
КонецЦикла;
КонецЕсли;
кароч кодер хуёво разбирается в механизмах регистров сведений и тупит
> и кода меньше
Сложно объяснить, что он делал три часа, например.
|перевод
|строки
|ящетаю"
к томуже платформа сама форматирует это, так что набирать самому | не приходится
Константин Игоревич Костин 25.06.1986, Можайское Шоссе, д. 30, кв. 65
Состоит в: ..., КодоБред
2. Нормальным людям скрываться нечего. Это ты анонимное гумно с залупой за щекой. Представь что будет если узнают твоя мама/однокласники в школе, на какую херню ты потратил свои каникулы.
3. Гумно пойди на улицу погуляй с друзьями, в речке покупайся, фруктов покушай, или там на велике покатайся.
4. Тут ты не нужен.
guest читается как [гест], а не как [гумно].
Ты чего скрываешь?
>Это ты анонимное гумно с залупой за щекой.
Нет, ты!
Возможно, вот только сеньоры и тим лиды не могут пройти собеседование на Junior MS SQL developer...
> Однако, встречаются долбоебы, возомнившие себя SQL-программистами 😀
ИМХО, понятие SQL-программист бывает только в совковых конторах.
А если у анона ФГМ, и он не знает как перевести DBdev, то это печально.
> DBDev
Это что-то наподобие HTML-программиста 😀
>что-то наподобие HTML-программиста
Бгг. Какой феерический уебок сегодня зашел на концерт.
Что еще спизданешь, дружок?!
Вот этот конкретный аноним - это что-то наподобие пидараса.
http://tinyurl.com/cey9cs2
Хотя в то, что защитился, верится слабо, еще недавно хныкал о несданных задачах по терверу второго-третьего курса.
Здесь набор с отбором по материалу нельзя делать, иначе может конфликт уникальности если уже есть запись: Номенклатура2 с Заявкой. Т.е. набором не стоит. Можно менеджером по 1-й записи.
И нахе все эти проверки на существование, ведь он и так записывает с заменой (если измерения совпадают). Я так поня 2 измерения в регистре Материал и Заявка.
Если Номенклатура1 <> Номенклатура2 Тогда
Запрос=Новый Запрос("ВЫБРАТЬ
|РаспределениеМатериаловПоМенеджерам.Зая вкаНаМатериалы,
|РаспределениеМатериаловПоМенеджерам.Мат ериал
|ИЗ
|РегистрСведений.РаспределениеМатериалов ПоМенеджерам КАК РаспределениеМатериаловПоМенеджерам
|ГДЕ
|РаспределениеМатериаловПоМенеджерам.Мат ериал = &Материал");
Запрос.УстановитьПараметр("Материал",Ном енклатура1);
Выборка=Запрос.Выполнить().Выбрать();
Пока Выборка.Следующий() Цикл
МЗНовой = РегистрыСведений.РаспределениеМатериалов ПоМенеджерам.СоздатьМенеджерЗаписи();
МЗНовой.ЗаявкаНаМатериалы=Выборка.Заявка НаМатериалы;
МЗНовой.Материал=Выборка.Номенклатура2;
МЗНовой.Записать(Истина); // пох если дубли, записываем с заменой
КонецЦикла;
КонецЕсли;
кароч кодер хуёво разбирается в механизмах регистров сведений и тупит