По колено в коде — Говнокод.ру

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

−90

1

Если ВРЕГ(ДанныеСчета.УсловияЗаполнения)<>"ЛОЖЬ" Тогда

УПП 1.3 (1.3.75.2)
ОбщиеМодули.СчетаУчетаВДокументах

Подскажите если изменятся языковые настройки конфигурации как себя поведет данный код?

znsoft, 23 Июня 2016

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

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

−73

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

Запрос=Новый Запрос;
	ТекстЗапроса="ВЫБРАТЬ
	|	РасходнаяНакладнаяТовары.Товар КАК Товар,
	|	РасходнаяНакладнаяТовары.Ссылка КАК Ссылка,
	|	СУММА(РасходнаяНакладнаяТовары.Количество) КАК КоличествоОстаток
	|ИЗ
	|	Документ.РасходнаяНакладная.Товары КАК РасходнаяНакладнаяТовары
	|ГДЕ
	|	РасходнаяНакладнаяТовары.Ссылка.Проведен = Ложь
	|	И РасходнаяНакладнаяТовары.Ссылка.ПометкаУдаления = Ложь
	|";
	Если ЗначениеЗаполнено(ВыбСклад) Тогда
		ТекстЗапроса=ТекстЗапроса+"
		|	И РасходнаяНакладнаяТовары.Ссылка.Склад =&ВыбСклад ";
	КонецЕсли; 
	Если ВыбТовар.Количество()>0 Тогда
		ТекстЗапроса=ТекстЗапроса+"
		|	И РасходнаяНакладнаяТовары.Товар В ИЕРАРХИИ(&ВыбТовар) ";
	КонецЕсли; 
	ТекстЗапроса=ТекстЗапроса+"
	|СГРУППИРОВАТЬ ПО
	|	Товар,
	|	Ссылка
	|ИТОГИ
	|	СУММА(КоличествоОстаток)
	|ПО
	|	ОБЩИЕ,
	|	Товар,
	|	Ссылка
	|";
	Запрос.Текст=ТекстЗапроса;			 
	Запрос.УстановитьПараметр("ВыбСклад",ВыбСклад);
	Запрос.УстановитьПараметр("ВыбТовар",ВыбТовар);
	РезультатЗапроса=Запрос.Выполнить();
	ТабДокумент = Новый ТабличныйДокумент;
	Макет  = ПолучитьМакет("ОстаткиТоваров");
	ОбластьМакета = Макет.ПолучитьОбласть("Шапа");

построитель запроса не существует... шапа... ШАПА, КАРЛ!!!

oleganatolievich, 23 Июня 2016

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

C++ / Говнокод #20253

+10

1

http://i.imgur.com/g5MswBc.png

Emotive programming in XCode

myaut, 22 Июня 2016

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

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

−11

001
002
003
004
005
006
007
008
009
010
011
012
013
014
015
016
017
018
019
020
021
022
023
024
025
026
027
028
029
030
031
032
033
034
035
036
037
038
039
040
041
042
043
044
045
046
047
048
049
050
051
052
053
054
055
056
057
058
059
060
061
062
063
064
065
066
067
068
069
070
071
072
073
074
075
076
077
078
079
080
081
082
083
084
085
086
087
088
089
090
091
092
093
094
095
096
097
098
099
100

з.Текст = 
	"ВЫБРАТЬ
	|	СобственныеКонтрагенты.Контрагент
	|ПОМЕСТИТЬ втСобственныеКонтрагенты
	|ИЗ
	|	РегистрСведений.СобственныеКонтрагенты КАК СобственныеКонтрагенты
	|;
	|
	|////////////////////////////////////////////////////////////////////////////////
	|ВЫБРАТЬ
	|	РеализацияТоваровУслугТовары.Номенклатура КАК Номенклатура,
	|	РеализацияТоваровУслугТовары.ХарактеристикаНоменклатуры КАК ХарактеристикаНоменклатуры,
	|	РеализацияТоваровУслугТовары.Цена КАК Цена,
	|	РеализацияТоваровУслугТовары.Ссылка.Дата КАК Дата
	|ПОМЕСТИТЬ втПоступление_Доки
	|ИЗ
	|	Документ.ПоступлениеТоваровУслуг.Товары КАК РеализацияТоваровУслугТовары
	|ГДЕ
	|	РеализацияТоваровУслугТовары.Ссылка.Проведен
	|	И РеализацияТоваровУслугТовары.Ссылка.Дата <= КОНЕЦПЕРИОДА(&ДатаДок, ДЕНЬ)
	|	И РеализацияТоваровУслугТовары.Ссылка.Организация = &ОрганизацияПродавец
	|;
	|
	|////////////////////////////////////////////////////////////////////////////////
	|ВЫБРАТЬ
	|	втПоступление_Доки.Номенклатура КАК Номенклатура,
	|	втПоступление_Доки.ХарактеристикаНоменклатуры КАК ХарактеристикаНоменклатуры,
	|	МАКСИМУМ(втПоступление_Доки.Дата) КАК Дата
	|ПОМЕСТИТЬ втПоступление_Макс
	|ИЗ
	|	втПоступление_Доки КАК втПоступление_Доки
	|
	|СГРУППИРОВАТЬ ПО
	|	втПоступление_Доки.Номенклатура,
	|	втПоступление_Доки.ХарактеристикаНоменклатуры
	|;
	|
	|////////////////////////////////////////////////////////////////////////////////
	|ВЫБРАТЬ
	|	втПоступление_Макс.Номенклатура,
	|	втПоступление_Макс.ХарактеристикаНоменклатуры,
	|	МИНИМУМ(втПоступление_Доки.Цена) КАК Цена
	|ПОМЕСТИТЬ втПоступлениеЦена
	|ИЗ
	|	втПоступление_Макс КАК втПоступление_Макс
	|		ВНУТРЕННЕЕ СОЕДИНЕНИЕ втПоступление_Доки КАК втПоступление_Доки
	|		ПО втПоступление_Макс.Номенклатура = втПоступление_Доки.Номенклатура
	|			И втПоступление_Макс.ХарактеристикаНоменклатуры = втПоступление_Доки.ХарактеристикаНоменклатуры
	|			И втПоступление_Макс.Дата = втПоступление_Доки.Дата
	|
	|СГРУППИРОВАТЬ ПО
	|	втПоступление_Макс.Номенклатура,
	|	втПоступление_Макс.ХарактеристикаНоменклатуры
	|;
	|
	|////////////////////////////////////////////////////////////////////////////////
	|ВЫБРАТЬ
	|	РеализацияТоваровУслугТовары.Номенклатура КАК Номенклатура,
	|	РеализацияТоваровУслугТовары.ХарактеристикаНоменклатуры КАК ХарактеристикаНоменклатуры,
	|	РеализацияТоваровУслугТовары.Цена КАК Цена,
	|	РеализацияТоваровУслугТовары.Ссылка.Дата КАК Дата
	|ПОМЕСТИТЬ втРеализацияПоставщика_Доки
	|ИЗ
	|	Документ.РеализацияТоваровУслуг.Товары КАК РеализацияТоваровУслугТовары
	|ГДЕ
	|	РеализацияТоваровУслугТовары.Ссылка.Проведен
	|	И РеализацияТоваровУслугТовары.Ссылка.Дата <= КОНЕЦПЕРИОДА(&ДатаДок, ДЕНЬ)
	|	И РеализацияТоваровУслугТовары.Ссылка.Организация = &ОрганизацияПродавец
	|;
	|
	|////////////////////////////////////////////////////////////////////////////////
	|ВЫБРАТЬ
	|	втРеализацияПоставщика_Доки.Номенклатура КАК Номенклатура,
	|	втРеализацияПоставщика_Доки.ХарактеристикаНоменклатуры КАК ХарактеристикаНоменклатуры,
	|	МАКСИМУМ(втРеализацияПоставщика_Доки.Дата) КАК Дата
	|ПОМЕСТИТЬ втРеализацияПоставщика_Макс
	|ИЗ
	|	втРеализацияПоставщика_Доки КАК втРеализацияПоставщика_Доки
	|
	|СГРУППИРОВАТЬ ПО
	|	втРеализацияПоставщика_Доки.Номенклатура,
	|	втРеализацияПоставщика_Доки.ХарактеристикаНоменклатуры
	|;
	|
	|////////////////////////////////////////////////////////////////////////////////
	|ВЫБРАТЬ
	|	втРеализацияПоставщика_Макс.Номенклатура,
	|	втРеализацияПоставщика_Макс.ХарактеристикаНоменклатуры,
	|	МИНИМУМ(втРеализацияПоставщика_Доки.Цена) КАК Цена
	|ПОМЕСТИТЬ втРеализацияПоставщикаЦена
	|ИЗ
	|	втРеализацияПоставщика_Макс КАК втРеализацияПоставщика_Макс
	|		ВНУТРЕННЕЕ СОЕДИНЕНИЕ втРеализацияПоставщика_Доки КАК втРеализацияПоставщика_Доки
	|		ПО втРеализацияПоставщика_Макс.Номенклатура = втРеализацияПоставщика_Доки.Номенклатура
	|			И втРеализацияПоставщика_Макс.ХарактеристикаНоменклатуры = втРеализацияПоставщика_Доки.ХарактеристикаНоменклатуры
	|			И втРеализацияПоставщика_Макс.Дата = втРеализацияПоставщика_Доки.Дата
	|
	|СГРУППИРОВАТЬ ПО
	|	втРеализацияПоставщика_Макс.Номенклатура,
	|	втРеализацияПоставщика_Макс.ХарактеристикаНоменклатуры";

про регистр накопления закупки мы походу не слышали... менеджер временных таблиц висит как глобальная переменная модуля формы, поиск организаций по коду в справочнике и т д

oleganatolievich, 22 Июня 2016

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

PHP / Говнокод #20250

0

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

public function getOrdersByMonth($year)
    {

        $data = array();

        $overallquanities = self::$DBH->query('SELECT SUM(quanity) as quanity, DATE_FORMAT(timestamp,\'%m\') as mdata,phone,comment FROM statistics WHERE DATE_FORMAT(timestamp,\'%Y\')=\'' . $year . '\' AND phone!=(\'test\') AND phone!=(\'тест\') AND comment!=(\'test\') AND comment!=(\'тест\') GROUP BY DATE_FORMAT(timestamp,\'%Y %m\')')->fetchAll(PDO::FETCH_ASSOC);
        $overallsumms = self::$DBH->query('SELECT SUM(cost) as cost, DATE_FORMAT(timestamp,\'%Y %m %d\') as mdata FROM statistics WHERE DATE_FORMAT(timestamp,\'%Y\')=\'' . $year . '\' AND phone!=(\'test\') AND phone!=(\'тест\') AND comment!=(\'test\') AND comment!=(\'тест\') GROUP BY DATE_FORMAT(timestamp,\'%Y %m\')')->fetchAll(PDO::FETCH_ASSOC);
        $overallorders = self::$DBH->query('SELECT COUNT(DISTINCT currcount) as count, DATE_FORMAT(timestamp,\'%Y %m %d\') as mdata FROM statistics WHERE DATE_FORMAT(timestamp,\'%Y\')=\'' . $year . '\' AND phone!=(\'test\') AND phone!=(\'тест\') AND comment!=(\'test\') AND comment!=(\'тест\') GROUP BY DATE_FORMAT(timestamp,\'%Y %m\')')->fetchAll(PDO::FETCH_ASSOC);
        $overallcomplex = self::$DBH->query('SELECT COUNT(*) as count, DATE_FORMAT(timestamp,\'%Y %m %d\') as mdata FROM statistics WHERE DATE_FORMAT(timestamp,\'%Y\')=\'' . $year . '\' AND suborder=2 AND phone!=(\'test\') AND phone!=(\'тест\') AND comment!=(\'test\') AND comment!=(\'тест\') GROUP BY DATE_FORMAT(timestamp,\'%Y %m\')')->fetchAll(PDO::FETCH_ASSOC);
        $overall_glnz = self::$DBH->query('SELECT SUM(quanity) as quanity,SUM(cost) as cost, DATE_FORMAT(timestamp,\'%Y %m %d\') as mdata FROM statistics WHERE DATE_FORMAT(timestamp,\'%Y\')=\'' . $year . '\' AND paper=\'glnz\' AND phone!=(\'test\') AND phone!=(\'тест\') AND comment!=(\'test\') AND comment!=(\'тест\') GROUP BY DATE_FORMAT(timestamp,\'%Y %m\')')->fetchAll(PDO::FETCH_ASSOC);
        //TODO: $overall_mat сделать просто рассчет вычитание из общего количества
        $overall_mat = self::$DBH->query('SELECT SUM(quanity) as quanity,SUM(cost) as cost, DATE_FORMAT(timestamp,\'%Y %m %d\') as mdata FROM statistics WHERE DATE_FORMAT(timestamp,\'%Y\')=\'' . $year . '\' AND paper=\'mat\' AND phone!=(\'test\') AND phone!=(\'тест\') AND comment!=(\'test\') AND comment!=(\'тест\') GROUP BY DATE_FORMAT(timestamp,\'%Y %m\')')->fetchAll(PDO::FETCH_ASSOC);
        $overall_autocor = self::$DBH->query('SELECT SUM(quanity) as quanity,SUM(cost) as cost, DATE_FORMAT(timestamp,\'%Y %m %d\') as mdata FROM statistics WHERE DATE_FORMAT(timestamp,\'%Y\')=\'' . $year . '\' AND autocor=1 AND phone!=(\'test\') AND phone!=(\'тест\') AND comment!=(\'test\') AND comment!=(\'тест\') GROUP BY DATE_FORMAT(timestamp,\'%Y %m\')')->fetchAll(PDO::FETCH_ASSOC);
        $formats = self::$DBH->query('SELECT DATE_FORMAT(timestamp,\'%m\') as mdata, format, SUM(quanity) as quanity,SUM(cost) as cost FROM statistics WHERE DATE_FORMAT(timestamp,\'%Y\')=\'' . $year . '\' AND phone!=(\'test\') AND phone!=(\'тест\') AND comment!=(\'test\') AND comment!=(\'тест\') GROUP BY DATE_FORMAT(timestamp,\'%Y %m\'),format')->fetchAll(PDO::FETCH_GROUP | PDO::FETCH_ASSOC);

        //************* Собираем итоги **************//
        $whereOption = 'AND phone!=(\'test\') AND phone!=(\'тест\') AND comment!=(\'test\') AND comment!=(\'тест\') AND comment NOT LIKE \'%test%\' AND comment NOT LIKE \'%тест%\'';
        
        $totalOrders = self::$DBH->query('SELECT COUNT(DISTINCT currcount) as totalOrders FROM statistics WHERE DATE_FORMAT(timestamp,\'%Y\') =\''.$year.'\' '.$whereOption)->fetchAll(PDO::FETCH_ASSOC);
        
        $totalSum = self::$DBH->query('SELECT SUM(cost) as totalSum FROM statistics WHERE DATE_FORMAT(timestamp,\'%Y\') =\''.$year.'\' '.$whereOption)->fetchAll(PDO::FETCH_ASSOC);

        $totalGLNZ = self::$DBH->query('SELECT SUM(quanity) as paperCount, SUM(cost) as paperCost FROM statistics WHERE DATE_FORMAT(timestamp,\'%Y\') = \''.$year.'\' AND paper=\'glnz\' '.$whereOption)->fetchAll(PDO::FETCH_ASSOC);

        $totalMAT = self::$DBH->query('SELECT SUM(quanity) as paperCount, SUM(cost) as paperCost FROM statistics WHERE DATE_FORMAT(timestamp,\'%Y\') = \''.$year.'\' AND paper=\'mat\' '.$whereOption)->fetchAll(PDO::FETCH_ASSOC);

        $totalSubsCount = self::$DBH->query('SELECT COUNT(suborder) as totalSubsCount FROM statistics WHERE DATE_FORMAT(timestamp,\'%Y\') =\''.$year.'\' '.$whereOption)->fetchAll(PDO::FETCH_ASSOC);

        $totalPhotos = self::$DBH->query('SELECT SUM(quanity) as totalPhotos FROM statistics WHERE DATE_FORMAT(timestamp,\'%Y\') =\''.$year.'\' '.$whereOption)->fetchAll(PDO::FETCH_ASSOC);

        //******************************************//

       // $this->Logging(self::$DBH->query('SELECT quanity, DATE_FORMAT(timestamp,\'%m\') as mdata,phone,comment FROM statistics WHERE DATE_FORMAT(timestamp,\'%Y\')=\'' . $year . '\'')->fetchAll(PDO::FETCH_ASSOC));

        /*$this->Logging($data);*/

        return $data;
    }

Выводим статистику и итоги

phpMASTER666, 22 Июня 2016

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

PHP / Говнокод #20249

0

1
2
3
4
5
6
7

$php1 = "<";
$php2= "?php";
$php3 = " require_once $";
$php4 = "_SERVER['DOCUMENT_ROOT'].\"/gen/admin/Debugger.php\"; ?";
$php5 = "";
$php6 = ">\r\n";
$php_debuger = $php1 .$php2 .$php3 .$php4 .$php5 .$php6;

Даже трудно предположить нахрен так.

kerberos, 22 Июня 2016

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

Куча / Говнокод #20248

+5

1
2
3

Тут недавно оказия вышла. В одном чатике, где были несколько программистов и математик, задали вопрос:

В каком порядке наследование верное целые числа -> рациональные или наоборот?

laMer007, 22 Июня 2016

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

C++ / Говнокод #20247

+2

01
02
03
04
05
06
07
08
09
10

#define QVERIFY2(statement, description) \
do {\
    if (statement) {\
        if (!QTest::qVerify(true, #statement, (description), __FILE__, __LINE__))\
            return;\
    } else {\
        if (!QTest::qVerify(false, #statement, (description), __FILE__, __LINE__))\
            return;\
    }\
} while (0)

Код из QTest либы Qt4.

GLaz, 22 Июня 2016

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

PHP / Говнокод #20246

0

1
2
3
4

$fname=rand(0,10000)."_".$fname;
while (is_file($upload_path.$fname)) {
    $fname=rand(0,10000)."_".$filename;
}

Если вдруг пользователь загрузил файл с одним и тем же именем, то надо ему приделать префикс. НО! Вдруг такой префикс уже был сгенерирован, ГПСЧ, тервер же! Сразу видно автор из ВУЗа.

carte, 22 Июня 2016

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

C# / Говнокод #20244

+6

1

habrahabr.ru/post/113215/

Кодогенерируем вместе!

dm_fomenok, 21 Июня 2016