1C — Говнокод.ру

1C / Говнокод #25336

+2

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
28
29
30
31
32
33
34
35
36
37
38
39
40

ВЫБРАТЬ
КОЛИЧЕСТВО ( РАЗЛИЧНЫЕ УвольнениеИзОрганизации.Сотрудник) КАК Сотрудник
Кадровая история сотрудников спецслужб их.Подразделение,
ЕСТЬNULL (КОЛИЧЕСТВО ( РАЗЛИЧНЫЕ ВЫБОР
КОГДА УвольнениеИзОрганизаций.СтатьяТКРФ.Наименование = "" По собой желанию, на учебу пункт 3 статьи 77 ТК РФ""
ИЛИ УвольнениеИзОрганизаций.СтатьяТКРФ.Наименование ="" По соб желанию, по уходу за инвалидном п.3 статьи 77 ТК РФ""
ИЛИ УвольнениеИзОрганизаций.СтатьяТКРФ.Наименование = "" По соб желанию, ребёнок-инвалид до 18 л., А 3 статьи 77 ТК РФ""
ИЛИ УвольнениеИзОрганизаций.СтатьяТКРФ.Наименование ="" По соб желанию , с переменой м. ж.,  пункт 3 статьи 77 ТК РФ""
ИЛИ УвольнениеИзОрганизаций.СтатьяТКРФ.Наименование ="" По соб желанию, по уходу за ребенком до 14 лет, п 3 статьи 77 ТК РФ""
ИЛИ УвольнениеИзОрганизаций.СтатьяТКРФ.Наименование ="" По соб желанию , на пенсию, п 3 статьи 77 ТК РФ""
ИЛИ УвольнениеИзОрганизаций.СтатьяТКРФ.Наименование ="" по соб желанию, п.3 статьи 77 ТК РФ""
ТОГДА УвольнениеИзОрганизаций.Сотрудник
КОНЕЦ ), 0) КАК увПоСобств,
 ЕСТЬNULL (ВЫБОР
 
КОГДА УвольнениеИзОрганизаций.СтатьяТКРФ.Наименование ="" За прогулы, подпункт """" а"""" пункта 6 статьи 81 ТК РФ""
ТОГДА УвольнениеИзОрганизаций.Сотрудник
КОНЕЦ ,0) КАК УвПрогул,
ЕСТЬNULL ( КОЛИЧЕСТВО ( РАЗЛИЧНЫЕ УвольнениеИзОрганизации.Сотрудник
),0) Как УвВсего
ИЗ Документ.Увольнение.Сотрудник КАК УвольнениеИзОрганизации
ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.КадроваяИсторияСотрудников.СрезПоследних как КадроваяИсторияСотрудниковСрезПоследних
ПО Сотрудник КАК УвольнениеИзОрганизации.Сотрудник = КадроваяИсторияСотрудниковСрезПоследних.Сотрудник 
ГДЕ 
УвольнениеИзОрганизации.Ссылка.Организации в ИЕРАРХИИ (& Организация)
И УвольнениеИзОрганизации.ДатаУвольнения >=& НачалоГода
 И (УвольнениеИзОрганизаций.СтатьяТКРФ.Наименование ="" По соб желанию, по уходу за инвалидном п.3 статьи 77 ТК РФ""
ИЛИ УвольнениеИзОрганизаций.СтатьяТКРФ.Наименование = "" По соб желанию, ребёнок-инвалид до 18 л., А 3 статьи 77 ТК РФ""
ИЛИ УвольнениеИзОрганизаций.СтатьяТКРФ.Наименование ="" По соб желанию , с переменой м. ж.,  пункт 3 статьи 77 ТК РФ""
ИЛИ УвольнениеИзОрганизаций.СтатьяТКРФ.Наименование ="" По соб желанию, по уходу за ребенком до 14 лет, п 3 статьи 77 ТК РФ""
ИЛИ УвольнениеИзОрганизаций.СтатьяТКРФ.Наименование ="" По соб желанию , на пенсию, п 3 статьи 77 ТК РФ""
ИЛИ УвольнениеИзОрганизаций.СтатьяТКРФ.Наименование ="" по соб желанию, п.3 статьи 77 ТК РФ""
ИЛИ  УвольнениеИзОрганизаций.СтатьяТКРФ.Наименование ="" За прогулы, подпункт """" а"""" пункта 6 статьи 81 ТК РФ""
) 
СГРУППИРОВАТЬ ПО
КадроваяИсторияСотрудниковСрезПоследних.Подразлеление
ЕСТЬNULL (ВЫБОР 
КОГДА Увольнение Зоран зайти.СтатьяТКРФ.Наименование = "" За прогулы, подпункт """" а"""" пункта 6 статьи 81 ТК РФ""
ТОГДА УвольнениеИзОрганизации.Сотрудник 
КОНЕЦ ,0);

Зачем ему конфигуратор? Он и так может отчеты выводить в табДок через блокнот)))
Ссылка на источник ТУТ - http://www.cyberforum.ru/1c/thread2394049.html

dethmontt, 29 Января 2019

Комментарии (137)

1C / Говнокод #25322

+1

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
21
22

// Проверим необходимость проведения авторизаций безналичных платежей
	АвторизацийБПЕсть = НЕ (НетОплатПлатежнойКартой()
	Если АвторизацийБПЕсть Тогда
		// Выполняем авторизации безналичных платежей
		Если НЕ ВыполнитьАвторизациюБП() Тогда
.....



Функция НетОплатПлатежнойКартой()

	НетОплатПлатежнойКартой = Истина;
	Для Каждого СтрокаОплаты Из Оплаты Цикл
		Если СтрокаОплаты.ТипОплаты.Объект = Перечисления.ТипыОплатыВРознице.Безналичные Тогда
			НетОплатПлатежнойКартой = Ложь;
			Прервать;
		КонецЕсли;
	КонецЦикла;

	Возврат НетОплатПлатежнойКартой;

КонецФункции

Нужно больше инверсий!

Jtsuken, 23 Января 2019

Комментарии (5)

1C / Говнокод #25301

+4

1
2
3

Если ЭтаФорма.ВладелецФормы.ВладелецФормы.Объект.Заголовок = "Согласование контрагента " Или ЭтаФорма.ВладелецФормы.ВладелецФормы.Объект.Заголовок = "" Тогда
             ЭтаФорма.ВладелецФормы.ВладелецФормы.Объект.Заголовок = "Согласование контрагента " + КонтрагентДО;
КонецЕсли;

Просто оставлю это здесь.
Когда ж вы все передохните любители ВладельцевФормы через ВладельцаФормы.

MaxBS, 11 Января 2019

Комментарии (4)

1C / Говнокод #25300

+1

01
02
03
04
05
06
07
08
09
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24

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

Функция из типовой, возвращает реквизит документа через жопу. Можно заменить на
возврат ?(ЗначениеЗаполнено(Ссылка.Идентификатор Цепочки), Ссылка.ИдентификаторЦепочки, Документы.ЭтапПроизводства2_2.ПустаяСсыл ка()).
А можно вообще нихуя не делать, потому что если реквизит не заполнен, там и так пустая ссылка.
Нахуй так жить

acula98, 11 Января 2019

Комментарии (5)

1C / Говнокод #25236

0

1

Сумма = Цел(Окр(Сумма * 1000, 0, 1)) / 1000;

Или я мандаринов переел, или от этого портал должен открыться

valchara, 27 Декабря 2018

Комментарии (42)

1C / Говнокод #25211

+2

1
2
3
4

СообщениеСМС = Перечисления.СостоянияСообщенияSMS.Исходящее;
		Для каждого СообщениеСМС Из СообщениеSMS.Услуги Цикл
			СообщениеСМС.СостояниеСообщения = Перечисления.СостоянияСообщенияSMS.Исходящее;
		КонецЦикла;

1С:Медицина. Поликлинка

gk-5ccd112a, 21 Декабря 2018

Комментарии (4)

1C / Говнокод #25210

+2

1
2
3
4
5

ТекЧас = Строка(Час(Дата2));
ТекЧас = Прав("00" + ТекЧас, 2);
ТекМин = Строка(Минута(Дата2));
ТекМин = Прав("00" + ТекМин, 2);
ТекВремя = ТекЧас + ":" + ТекМин;

Это способ получить время в формате "чч:мм" из даты и времени (переменная Дата2).
Заменяется этим:
ТекВремя = Формат(Дата2, "ДФ=hh:mm");

VladC, 21 Декабря 2018

Комментарии (4)

1C / Говнокод #25178

−5

1

EFG тред иди.

Тред в котором мы пишим реквесты и пожелания EFG.
EFG, прикрути живое обновление через вебсокеты, переделай фронт уже с этого древнего говна, на модное SPA, прикрути нейросеточку и блокчейн.

хуита, 11 Декабря 2018

Комментарии (29)

1C / Говнокод #25164

−1

01
02
03
04
05
06
07
08
09
10
11

Процедура ПередЗаписью(Отказ, РежимЗаписи, РежимПроведения)
	//...
	Если НЕ Отказ Тогда
		
		ЭтотОбъект.ОбменДанными.Загрузка = Истина;
		ЭтотОбъект.Записать();
		ЭтотОбъект.ОбменДанными.Загрузка = Ложь;
		//...
	КонецЕсли; 	
	
КонецПроцедуры // ПередЗаписью

БУдУ, УТПдУ, УППдУ
Бля, ну как так можно? Что за идиот это писал?
Сначала Пактум от школьника, теперь эта херь...

Asaharu, 07 Декабря 2018

Комментарии (6)

1C / Говнокод #25161

−1

01
02
03
04
05
06
07
08
09
10
11

процедура расш_таблицаприактивациистроки(элемент)
простодеревозначений = новый деревозначений;
простодеревозначений.очистить();
конецпроцедуры
//впадает в рекурсию и программа умирает

процедура расш_таблицаприактивациистроки_(элемент)
простодеревозначений = новый таблицазначений;
простодеревозначений.очистить();
конецпроцедуры
//не впадает в рекурсию

Чо поцоны, изи рекурсия. УТ 11. Насчет других не тестил.
При активации строки ТЧ, срабатывает эта процедура. Создаю новое дерево значений, и при его очистки вызывается какой-то общий модуль который я не звал и начинает активировать всю форму - охуенно. соответственно вызывается эта процедура пофторно. При ТЗ такой хуйни нет.

3oJIoTou_xyu, 06 Декабря 2018

Комментарии (6)

Говнокод: по колено в коде.

1C / Говнокод #25336

1C / Говнокод #25322

1C / Говнокод #25301

1C / Говнокод #25300

1C / Говнокод #25236

1C / Говнокод #25211

1C / Говнокод #25210

1C / Говнокод #25178

1C / Говнокод #25164

1C / Говнокод #25161