- 1
- 2
- 3
- 4
СообщениеСМС = Перечисления.СостоянияСообщенияSMS.Исходящее;
Для каждого СообщениеСМС Из СообщениеSMS.Услуги Цикл
СообщениеСМС.СостояниеСообщения = Перечисления.СостоянияСообщенияSMS.Исходящее;
КонецЦикла;
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
+2
СообщениеСМС = Перечисления.СостоянияСообщенияSMS.Исходящее;
Для каждого СообщениеСМС Из СообщениеSMS.Услуги Цикл
СообщениеСМС.СостояниеСообщения = Перечисления.СостоянияСообщенияSMS.Исходящее;
КонецЦикла;
1С:Медицина. Поликлинка
+2
ТекЧас = Строка(Час(Дата2));
ТекЧас = Прав("00" + ТекЧас, 2);
ТекМин = Строка(Минута(Дата2));
ТекМин = Прав("00" + ТекМин, 2);
ТекВремя = ТекЧас + ":" + ТекМин;
Это способ получить время в формате "чч:мм" из даты и времени (переменная Дата2).
Заменяется этим:
ТекВремя = Формат(Дата2, "ДФ=hh:mm");
−5
EFG тред иди.
Тред в котором мы пишим реквесты и пожелания EFG.
EFG, прикрути живое обновление через вебсокеты, переделай фронт уже с этого древнего говна, на модное SPA, прикрути нейросеточку и блокчейн.
−1
Процедура ПередЗаписью(Отказ, РежимЗаписи, РежимПроведения)
//...
Если НЕ Отказ Тогда
ЭтотОбъект.ОбменДанными.Загрузка = Истина;
ЭтотОбъект.Записать();
ЭтотОбъект.ОбменДанными.Загрузка = Ложь;
//...
КонецЕсли;
КонецПроцедуры // ПередЗаписью
БУдУ, УТПдУ, УППдУ
Бля, ну как так можно? Что за идиот это писал?
Сначала Пактум от школьника, теперь эта херь...
−1
процедура расш_таблицаприактивациистроки(элемент)
простодеревозначений = новый деревозначений;
простодеревозначений.очистить();
конецпроцедуры
//впадает в рекурсию и программа умирает
процедура расш_таблицаприактивациистроки_(элемент)
простодеревозначений = новый таблицазначений;
простодеревозначений.очистить();
конецпроцедуры
//не впадает в рекурсию
Чо поцоны, изи рекурсия. УТ 11. Насчет других не тестил.
При активации строки ТЧ, срабатывает эта процедура. Создаю новое дерево значений, и при его очистки вызывается какой-то общий модуль который я не звал и начинает активировать всю форму - охуенно. соответственно вызывается эта процедура пофторно. При ТЗ такой хуйни нет.
−3
ТекстОшибки = НСтр("ru='Клиенту ""%Партнер%"" запрещена отгрузка.'");
ТекстОшибки = СтрЗаменить(ТекстОшибки, "%Партнер%", Партнер);
Когда платят за количество строчек, а не смысл. Ебала жаба гадюку просто.
+1
Выб = выбратьизсписка(элемент.списоквыбора,элемент);
СИДЕЛ НАД ЭТОЙ ХУЕТОЙ ДЖВА ЧАСА, И НЕ ПОНИМАЛ ПОЧЕМУ ЭТОТ КУСОК НЕОТРАБАТЫВАЛ И ВОЗВРАЩАЛ НЕОПРЕДЕЛЕНО И СРАЗУ ЖЕ ПРОСКАКИВАЛ ДАЛЬШЕ. ХОТЯ ЭЛЕМЕНТ И СПИСОК ЕСТЬ, ПОИДЕИ ДОЛЖЕН БЫЛ ПОВЫСНУТЬ В ОЖИДАНИИ ПОКА ПОЛЬЗОВАТЕЛЬ ВЫБЕРЕТ ИЗ НЕГО ЗНАЧЕНИЕ.
ОКАЗАЛОСЬ. ОТЛАДЧИК... РЕШИЛ ВЫЗЫВАТЬ САМ СЕБЕ ЭТОТ СПИСОК И САМ ПО СЕБЕ НИХУЯ НЕ ВЫБИРАТЬ.
−1
Функция ПолучитьСтавкуНДС(СтавкаНДС) Экспорт
Если СтавкаНДС = Перечисления.СтавкиНДС.НДС20 ИЛИ СтавкаНДС = Перечисления.СтавкиНДС.НДС20_120 Тогда
Возврат 20;
ИначеЕсли СтавкаНДС = Перечисления.СтавкиНДС.НДС10 ИЛИ СтавкаНДС = Перечисления.СтавкиНДС.НДС10_110 Тогда
Возврат 10;
ИначеЕсли СтавкаНДС = Перечисления.СтавкиНДС.НДС18 ИЛИ СтавкаНДС = Перечисления.СтавкиНДС.НДС18_118 Тогда
Возврат 18;
КонецЕсли;
Возврат 0;
КонецФункции
Банально.
Рарус.
0
Писал значит обмен ну там по http запросами и прочим говном на 1С между сайтом на битриксе и самой базой.
Сидел и думал, каким форматом обмениваться
Эти ссаные phpшники из центральной россии предлагали JSON и CSV.
А я подумал, и подумал что не хочу слишком банально. Написал сериализацию с 1С в lua, и обмениваюсь lua.
эти phpшные хуйни в шоке, ведь у них нет такого десериализатора. Жду от них результата уже джва года.
ух какой я злодей.
−9
Процедура тпТоварыПриПолученииДанных(Элемент, ОформленияСтрок)
Модифицированность_ = Модифицированность;
Для Каждого Стр из ОформленияСтрок Цикл
Если НЕ Стр.ДанныеСтроки.Вес = 0 И НЕ Стр.ДанныеСтроки.ПроцентУсушки = 0 Тогда
Стр.ДанныеСтроки.Усушка = (Стр.ДанныеСтроки.Вес * Стр.ДанныеСтроки.ПроцентУсушки / 100) * Стр.ДанныеСтроки.Количество;
КонецЕсли;
КонецЦикла;
Модифицированность = Модифицированность_;
КонецПроцедуры
Данные табличной части модифицируются в процедуре ПриПолученииДанных (видимо, лучшего места для этого не нашлось), что закономерно приводит к отложенному на мгновение вызову ПриПолученииДанных ещё раз, и ещё, и так далее. В результате процессор загружается почти на 100%, значок * в заголовке формы дико мерцает.
Написано программистом с 6-значной ЗП.