1. PHP / Говнокод #19008

    +2

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    public function generateRequestXml()
    {
        echo "Start generate request xml\n";
        $dt = date("c");
        $output = "";
        $output .= "<?xml version=\"1.0\" encoding=\"utf-8\"?>\n";
        $output .= "\t<request>\n";
        $output .= "\t<requestTime>" . $dt . "</requestTime>\n";
        $output .= "\t<operatorName>ИМЯ</operatorName>\n";
        $output .= "\t<inn>98989898989</inn>\n";
        $output .= "\t<ogrn>998545454545</ogrn>\n";
        $output .= "\t<email>[email protected]</email>\n";
        $output .= "</request>";
    
        if (!file_put_contents(self::REQUEST_FILE, $output))
            return false;
    }

    SimpleXMLElement? Не, не слышал

    podvzbzdnul, 12 Ноября 2015

    Комментарии (13)
  2. 1C / Говнокод #19006

    −99

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    21. 21
    22. 22
    23. 23
    24. 24
    25. 25
    Функция ПолучитьПолныйСписокКонтрагентовОтбора(текКонтрагентыОтбора) // релиз 3.0
    	    Запрос = Новый Запрос;
    	    Запрос.Текст = 
    	"ВЫБРАТЬ РАЗРЕШЕННЫЕ
    	|	Контрагент.Ссылка КАК Ссылка1
    	|ИЗ
    	|	Справочник.Контрагенты КАК Контрагент
    	|ГДЕ
    	|	Контрагент.ЭтоГруппа = ЛОЖЬ И (";                                                                               ы=0;
    	Для каждого ЭлСпОтбКг из текКонтрагентыОтбора Цикл текКг=ЭлСпОтбКг.Значение;
    		Если ТипЗнч(текКг)=Тип("СправочникСсылка.Контрагенты") И НЕ текКг=Справочники.Контрагенты.ПустаяСсылка() Тогда  ы=ы+1;
    			Если текКг.ЭтоГруппа Тогда Запрос.Текст = Запрос.Текст +" 
    	|	"+?(ы=1,"","ИЛИ ")+"Контрагент.Ссылка В ИЕРАРХИИ(&тКг"+Строка(ы)+")";
                Иначе                      Запрос.Текст = Запрос.Текст +"
    	|	"+?(ы=1,"","ИЛИ ")+"Контрагент.Ссылка = &тКг"+Строка(ы);
    	        КонецЕсли;	               
    	    Запрос.УстановитьПараметр("тКг"+Строка(ы),текКг);
    	    КонецЕсли;	
    	КонецЦикла;	Запрос.Текст = Запрос.Текст +"
        |)";
     	        РезСп=Новый СписокЗначений;
    	                                текТЗрег=Запрос.Выполнить().Выгрузить();
    	        РезСп.ЗагрузитьЗначения(текТЗрег.ВыгрузитьКолонку("Ссылка1"));
    	Возврат РезСп;		 
    КонецФункции

    HomoAlbus, 11 Ноября 2015

    Комментарии (5)
  3. 1C / Говнокод #19005

    −96

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    21. 21
    22. 22
    23. 23
    Функция мПолучитьДанныеПоОтсрочкеОплатыРТУнаДт(тРТУ, тДт, тНедоплатаПоРТУ, теРегЗапись="", текЗаказыПокупателей="", текЗнакЗаказыПокупателей="=", текОтрицаниеЗнакаЗаказыПокупателей=Ложь, тРазрешенныхДнейОтсрочки=0, тМаксДеньПогашения="", КЛ_тРТУ="" , тРТУ_Дата="", тСтрокаТЗотчета, УровеньПоЕжеМесКва=0) // релиз 3.3 доб. , тСтрокаТЗотчета , УровеньПоЕжеМесква=0  // релиз 3.1 доб. , тРТУ_Дата=""
    	                        текРТУ_Дата=?(ТипЗнч(тРТУ_Дата)=Тип("Дата") И НЕ тРТУ_Дата='00010101', тРТУ_Дата, тРТУ.Дата); // релиз 3.1 доб.
    //...	
    	КЛ_тРТУ=теРегЗапись.теРегистратор; тЕстьЕжемес=теРегЗапись.ДеньПогашенияМесяц>0   И теРегЗапись.ДеньПогашенияМесяц<=31;   
    	                                     тЕстьЕжеква=теРегЗапись.ДеньПогашенияКвартал>0 И теРегЗапись.ДеньПогашенияКвартал<=31; 
    		Если      тЕстьЕжемес И теРегЗапись.ДеньМесяцЭтоСледующийЗаОтгрузкой Тогда
    тМаксДеньПогашения=Мин(Дата(Год(ДобавитьМесяц(текРТУ_Дата,1)),Месяц(ДобавитьМесяц(текРТУ_Дата,1)),теРегЗапись.ДеньПогашенияМесяц), теРегЗапись.ДатаОкончания);   // релиз 3.1 зам. тРТУ.Дата на текРТУ_Дата
    		ИначеЕсли тЕстьЕжеква И Найти("/3/6/9/12/","/"+Строка(Месяц(текРТУ_Дата))+"/")<>0 И теРегЗапись.ДеньПогашенияКвартал>День(текРТУ_Дата) Тогда             // релиз 3.1 зам. тРТУ.Дата на текРТУ_Дата
    тМаксДеньПогашения=Мин(Дата(Год(текРТУ_Дата),Месяц(текРТУ_Дата),теРегЗапись.ДеньПогашенияКвартал), теРегЗапись.ДатаОкончания);                                   // релиз 3.1 зам. тРТУ.Дата на текРТУ_Дата                                         
            ИначеЕсли тЕстьЕжемес И ?(Найти("/3/6/9/12/","/"+Строка(Месяц(текРТУ_Дата))+"/")=0,Истина,НЕ тЕстьЕжеква) И теРегЗапись.ДеньПогашенияМесяц>День(текРТУ_Дата)   // релиз 3.1 зам. тРТУ.Дата на текРТУ_Дата 
                    И НЕ(УровеньПоЕжеМесКва=1) Тогда  // релиз 3.3 доб. строку
    тМаксДеньПогашения=Мин(Дата(Год(текРТУ_Дата),Месяц(текРТУ_Дата),теРегЗапись.ДеньПогашенияМесяц), теРегЗапись.ДатаОкончания); ПроверитьЕжеМесКваНаНеполноеПогашение(1,теРегЗапись,тСтрокаТЗотчета); // релиз 3.3 доб. ПроверитьЕжеМесКваНаНеполноеПогашение(1,теРегЗапись,тСтрокаТЗотчета); // релиз 3.1 зам. тРТУ.Дата на текРТУ_Дата                                      
    		ИначеЕсли тЕстьЕжеква И Найти("/3/6/9/12/","/"+Строка(Месяц(ДобавитьМесяц(текРТУ_Дата,1)))+"/")<>0 Тогда                                                 // релиз 3.1 зам. тРТУ.Дата на текРТУ_Дата
    тМаксДеньПогашения=Мин(Дата(Год(ДобавитьМесяц(текРТУ_Дата,1)),Месяц(ДобавитьМесяц(текРТУ_Дата,1)),теРегЗапись.ДеньПогашенияКвартал), теРегЗапись.ДатаОкончания);ПроверитьЕжеМесКваНаНеполноеПогашение(2,теРегЗапись,тСтрокаТЗотчета); // релиз 3.3 доб. ПроверитьЕжеМесКваНаНеполноеПогашение(2,теРегЗапись,тСтрокаТЗотчета); // релиз 3.1 зам. тРТУ.Дата на текРТУ_Дата                                         
            ИначеЕсли тЕстьЕжемес 
                    И НЕ(УровеньПоЕжеМесКва=1 И тМаксДеньПогашения>=Мин(Дата(Год(ДобавитьМесяц(текРТУ_Дата,1)),Месяц(ДобавитьМесяц(текРТУ_Дата,1)),теРегЗапись.ДеньПогашенияМесяц), теРегЗапись.ДатаОкончания)) Тогда  // релиз 3.3 доб. строку
    
    	//...
    		
    	                          тМаксДеньПогашения=НачалоДня(тМаксДеньПогашения);
    	тРазрешенныхДнейОтсрочки=(тМаксДеньПогашения-НачалоДня(текРТУ_Дата))/(24*60*60); // релиз 3.1 зам. тРТУ.Дата на текРТУ_Дата
    	Возврат                  (тМаксДеньПогашения-НачалоДня(тДт))/(24*60*60);
    КонецФункции

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

    HomoAlbus, 11 Ноября 2015

    Комментарии (3)
  4. Куча / Говнокод #19004

    +2

    1. 1
    2. 2
    -- Hehehe
    typeGroups ll = (\(t, tt) -> printf "\n~~~~~~~~~~~~~~~\n%s\n~~~~~~~~~~~~~~~\n%s" t (show tt))  >>= (nub . map (_measInfoId &&&(snd .unzip . M.toList . _measTypes)) . (>>= _measInfo) . (>>= _measData)) $ (concat `fmap` mapM (\file -> runX $ readXml file >>> parseFile)) ll

    скрипт, высранный в спешке для обработки данных в одной задаче перерос в утилиту

    CHayT, 10 Ноября 2015

    Комментарии (13)
  5. PHP / Говнокод #19003

    0

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    $HighSpeed = new HighLoad();
    	$redis = new Redis();
    	$redis->connect($HighSpeed->passwd);
    	$redis->auth('ХХХХХХХХХХХХХХХ');
    	$redis->select(1);

    Всё что после первой строки уже реализовано в самом классе

    proweb, 10 Ноября 2015

    Комментарии (10)
  6. JavaScript / Говнокод #18999

    −2

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    $( '.radio-check-value' ).on( 'change', '.check_value', function(){
    	var checkedVal = $( this ).val();
    	console.log( checkedVal );
    	var nonCheck = checkedVal == 'default' ? 'measure' : 'default';
    	var parentBlock = $( this ).parent().parent();
    	if( parentBlock.find( '[data-units=' + checkedVal + ']' ).hasClass( 'nonactiv' ) ){
    		parentBlock.find( '.count-units.' + nonCheck ).removeClass( 'active' );
    		parentBlock.find( '.count-units.' + nonCheck ).addClass( 'nonactiv' );
    		parentBlock.find( '[data-units=' + nonCheck + ']' ).removeClass( 'active' );
    		parentBlock.find( '[data-units=' + nonCheck + ']' ).addClass( 'nonactiv' );
    		parentBlock.find( '[data-units=' + checkedVal + ']' ).removeClass( 'nonactiv' );
    		parentBlock.find( '[data-units=' + checkedVal + ']' ).addClass( 'active' );
    		parentBlock.find( '.count-units.' + checkedVal ).removeClass( 'nonactiv' );
    		parentBlock.find( '.count-units.' + checkedVal ).addClass( 'active' );
    		parentBlock.find( '.check_value.' + nonCheck ).removeAttr( 'checked' );
    	}
    } );

    Обработчик нестандартного поведения чекбоксов.

    fglukhov, 10 Ноября 2015

    Комментарии (0)
  7. 1C / Говнокод #18998

    −96

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    Если ОтражатьВБухгалтерскомУчете = Истина Тогда
    		Если Лев(Номер, 3) <> ТекПрефикс Тогда	Номер = "";	УстановитьНовыйНомер(); КонецЕсли;
    	Иначе
    		Если Лев(Номер, 3) = ТекПрефикс Тогда	Номер = "";	УстановитьНовыйНомер(); КонецЕсли;
    КонецЕсли;

    В чем смысл проверки на соответствие префиксу остается только гадать...

    imxored, 10 Ноября 2015

    Комментарии (5)
  8. C# / Говнокод #18997

    +11

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    public class Solution
    {
        public static void main(String[] args)
        {
    
            int a = 1, b = 2, c = 3, d = 4, e = 5, f = 6, g = 7, i = 8, j = 9, k = 10;
            System.out.println( + ( a + b ));
            System.out.println( + ( a + b + c ));
            System.out.println( + ( a + b + c + d ));
            System.out.println( + ( a + b + c + d + e ));
            System.out.println( + ( a + b + c + d + e + f ));
            System.out.println( + ( a + b + c + d + e + f + g ));
            System.out.println( + ( a + b + c + d + e + f + g + i ));
            System.out.println( + ( a + b + c + d + e + f + g + i + j ));
            System.out.println( + ( a + b + c + d + e + f + g + i + j + k ));
    
    
    
        }
    }

    Вывести на экран сумму чисел от 1 до 10 построчно.

    luminary, 09 Ноября 2015

    Комментарии (68)
  9. JavaScript / Говнокод #18996

    −3

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    var api = angular.module('GithubApi', []);
    api.controller('GithubStatus', function ($scope, $http) {
        $http.get('/api.json')
            .success(function (response) { $scope.api = response; });
    });

    Пейсатели ж.скрипт фреймоврков не перестают радовать. Код несколько упрощен, но суть должна быть очевидна каждому: переменная api будет затерта как только она будет создана строкой типа "[object Object]" потому что в $scope есть поле с таким же значением.

    wvxvw, 09 Ноября 2015

    Комментарии (116)
  10. PHP / Говнокод #18994

    +2

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    <?
    $key = crc32("release") ^ 0x817990;
    $header_bg = '#' . substr(base_convert(crc32($DBName) ^ $key, 10, 16), 0, 6);
    ?>
    <div id="top_header" style="background:<?= $header_bg ?>">

    На доменах с похожими названиями живут продакшн и версии для разработки. Заказчик путается при тестировании, а потом разрабы удивляются тестовым данным в рабочей базе.
    Вот так была реализована цветовая дифференциация штанов сайтов в зависимости от имени БД. Подобрать им имя базы, которое даст коллизию, что ли...

    clauclauclau, 09 Ноября 2015

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