1. Куча / Говнокод #17363

    +120

    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
    26. 26
    <html>
        <head>
            <title>Тест</title>
            <meta charset="UTF-8">
            <meta name="viewport" content="width=device-width, initial-scale=1.0">
        </head>
        <body>
            <div align="center">
                <h1>Задание</h1>
                Написать решение c использованием ООП, которое позволяет переводить целые числа в каком-нибудь диапазоне (c миллионами включительно) в текст ( разговорный)<br>
                на трех языках (рус., англ., укр.)
            </div>
            <form action="receivenumber.php" method="post">
                <label for="textnumber">Число:</label>
                <input type="number" id="textnumber" name="textnumber" required 
                       min="-9999999" max="9999999" step="1"/><br>
                <label for="selectlanguage">Выбирите язык:</label>
                <select id="selectlanguage" name="selectlanguage">
                    <option value="eng">English</option>
                    <option value="ukr">Ukrainian</option>
                    <option value="rus" selected>Russian</option>
                </select><br>
                <input type="submit" name="submitnumber" value="Отправить"><br>
            </form>
        </body>
    </html>

    А это файл "index.html", который передает данные скрипту "receivenumber.php"

    ppd, 23 Декабря 2014

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

    +158

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    require_once 'numberspelling.php';
    $number=$_POST['textnumber'];
    $language=$_POST['selectlanguage'];
    $numberspellingobj=new numberspelling($number, $language);
    $spelling=$numberspellingobj->spell();
    echo $spelling;

    Это файл "receivenumber.php", который получает данные от клиента (число и язык).

    ppd, 23 Декабря 2014

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

    +155

    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
    }
            if(isset($this->digits[1])) {//разряд десятков
                if($this->digits[1]>1)
                    $result.=$this->spelling['ties'][$this->language][$this->digits[1]]." ";
                if($this->digits[1]==1) $result.=$this->spelling['teens'][$this->language][$this->digits[0]]." ";
            }
            if(isset($this->digits[0])) {//разряд единиц
                if((isset($this->digits[1]))&&($this->digits[1]!=1)) 
                    $result.=$this->spelling['ones'][$this->language][$this->digits[0]]." ";
                if(!isset($this->digits[1])) {
                    if($this->digits[0]==0) $result.=$this->spelling['nought'][$this->language]." ";
                    else $result.=$this->spelling['ones'][$this->language][$this->digits[0]]." ";
                }
            }
            return $result;
        }
    }

    Часть программы, которая преобразовывает целое число из промежутка [-9999999; 9999999] в текст (разговорный) на трех языках (Russian, Ukrainian, English). Состоит из трех классов. Это продолжение класса numberspelling , начиная с закрытой скобки последнего if`а предыдущего поста. Именно класс numberspelling преобразует цифру из уже имеющегося массива number в массив в произношение этой цифры на данном языке, в соответствии с её весом (той степенью числа 10, на которую она умножена). Например, если цифра 5 в уже имеющемся массиве стоит под номером 2, то она будет произносится "пятьсот". Напомню, номер элемента в массиве соответствует степени числа 10, на которую надо умножить элемент.

    ppd, 23 Декабря 2014

    Комментарии (0)
  4. PHP / Говнокод #17360

    +155

    1. 001
    2. 002
    3. 003
    4. 004
    5. 005
    6. 006
    7. 007
    8. 008
    9. 009
    10. 010
    11. 011
    12. 012
    13. 013
    14. 014
    15. 015
    16. 016
    17. 017
    18. 018
    19. 019
    20. 020
    21. 021
    22. 022
    23. 023
    24. 024
    25. 025
    26. 026
    27. 027
    28. 028
    29. 029
    30. 030
    31. 031
    32. 032
    33. 033
    34. 034
    35. 035
    36. 036
    37. 037
    38. 038
    39. 039
    40. 040
    41. 041
    42. 042
    43. 043
    44. 044
    45. 045
    46. 046
    47. 047
    48. 048
    49. 049
    50. 050
    51. 051
    52. 052
    53. 053
    54. 054
    55. 055
    56. 056
    57. 057
    58. 058
    59. 059
    60. 060
    61. 061
    62. 062
    63. 063
    64. 064
    65. 065
    66. 066
    67. 067
    68. 068
    69. 069
    70. 070
    71. 071
    72. 072
    73. 073
    74. 074
    75. 075
    76. 076
    77. 077
    78. 078
    79. 079
    80. 080
    81. 081
    82. 082
    83. 083
    84. 084
    85. 085
    86. 086
    87. 087
    88. 088
    89. 089
    90. 090
    91. 091
    92. 092
    93. 093
    94. 094
    95. 095
    96. 096
    97. 097
    98. 098
    99. 099
    100. 100
    require_once 'number.php';
    class numberspelling extends number {
        //put your code here
        private $spelling=array(
            'nought'=>array(
                'eng'=>'nought',
                'ukr'=>'нуль',
                'rus'=>'ноль'
            ),
            'ones'=>array(
                'eng'=>array("", "one", "two", "three", "four", "five", "six", "seven", "eight", "nine"),
                'ukr'=>array("", "один", "два", "три", "чотири", "п`ять", "шість", "сім", "вісім", "дев`ять"),
                'rus'=>array("", "один", "два", "три", "четыре", "пять", "шесть", "семь", "восемь", "девять")
                ),
            'teens'=>array(
                'eng'=>array("ten", "eleven", "twelve", "thirteen", "fourteen", "fifteen", "sixteen", "seventeen", "eighteen", "nineteen"),
                'ukr'=>array("десять", "одинадцять", "дванадцять", "тринадцять", "чотирнадцять", "п`ятнадцять", "шістнадцять", "сімнадцять", "вісімнадцять", "дев`ятнадцять"),
                'rus'=>array("десять", "одиннадцать", "двенадцать", "тринадцать", "четырнадцать", "пятнадцать", "шестнадцать", "семнадцать", "восемнадцать", "девятнадцать")
            ),
            'ties'=>array(
                'eng'=>array("", "ten", "twenty", "thirty", "forty", "fifty", "sixty", "seventy", "eighty", "ninety"),
                'ukr'=>array("", "десять", "двадцять", "тридцять", "сорок", "п`ятдесят", "шістдесят", "сімдесят", "вісімдесят", "дев`яносто"),
                'rus'=>array("", "десять", "двадцать", "тридцать", "сорок", "пятьдесят", "шестьдесят", "семдесят", "восемдесят", "девяносто")
            ),
            'hundreds'=>array(
                'eng'=>array("", "hundred", "two hundred", "three hundred", "four hundred", "five hundred", "six hundred", "seven hundred", "eight hundred", "nine hundred"),
                'ukr'=>array("", "сто", "двісті", "триста", "чотириста", "п`ятсот", "шістсот", "сімсот", "вісімсот", "дев`ятсот"),
                'rus'=>array("", "сто", "двести", "триста", "четыреста", "пятьсот", "шестьсот", "семьсот", "восемьсот", "девятьсот")
            )
        );
        private $greatnumbersspelling=array(
            'thousands'=>array(
                'eng'=>array("", "one thousand", "two thousand", "three thousand", "four thousand", "thousand"),
                'ukr'=>array("", "одна тисяча", "дві тисячі", "три тисячі", "чотири тисячі", "тисяч"),
                'rus'=>array("", "одна тысяча", "две тысячи", "три тысячи", "четыре тысячи", "тысяч")
            ),
            'millions'=>array(
                'eng'=>array("", "one million", "two million", "three million", "four million", "million"),
                'ukr'=>array("", "один мільйон", "два мільйони", "три мільйони", "чотири мільйони", "мільйонів"),
                'rus'=>array("", "один миллион", "два миллиона", "три миллиона", "четыре миллиона", "миллионов")
            )
        );
        private $signspelling=array(
            'negative'=>array(
                'eng'=>'minus',
                'ukr'=>'мінус',
                'rus'=>'минус'
            ),
            'positive'=>array(//для удобства изменения кода при необходимости
                'eng'=>'',
                'ukr'=>'',
                'rus'=>''
            )
        );
        private $language;
        public function __construct($number, $language) {
            parent::__construct($number);
            $this->language=$language;
        }
        public function spell() {
            //spelling
            $result="";
            if($this->sign==-1) 
                $result=$result.
                    $this->signspelling['negative'][$this->language]." ";
            else $result.=$this->signspelling['positive'][$this->language]." ";
            if(isset($this->digits[6])) {//разряд миллионов
                for($i=1; $i<5; $i++) {
                    if($this->digits[6]==$i) {
                        $result.=$this->greatnumbersspelling['millions'][$this->language][$i]." ";
                    }
                }
                if($this->digits[6]>=5) {
                    $result.=$this->spelling['ones'][$this->language][$this->digits[6]]." ".$this->greatnumbersspelling['millions'][$this->language][5]." ";
                }
            }
            if(isset($this->digits[5])) {//разряд сотен тысяч
                $result.=$this->spelling['hundreds'][$this->language][$this->digits[5]]." ";
                if(($this->digits[5]!=0)&($this->digits[4]==0)&($this->digits[3]==0)) $result.=$this->greatnumbersspelling['thousands'][$this->language][5]." ";
            }
            if(isset($this->digits[4])) {//разряд десятков тысяч
                if($this->digits[4]>1) {
                    $result.=$this->spelling['ties'][$this->language][$this->digits[4]]." ";
                    if($this->digits[3]==0) $result.=$this->greatnumbersspelling['thousands'][$this->language][5]." ";
                }
                if($this->digits[4]==1) $result.=$this->spelling['teens'][$this->language][$this->digits[3]]." ".$this->greatnumbersspelling['thousands'][$this->language][5]." ";    
            }
            if(isset($this->digits[3])) {//разряд тысяч
                for($i=1; $i<5; $i++) {
                    if($this->digits[3]==$i) {
                        if(!isset($this->digits[4])||(isset($this->digits[4])&&$this->digits[4]!=1)) $result.=$this->greatnumbersspelling['thousands'][$this->language][$i]." ";
                    }
                }
                if($this->digits[3]>=5) {
                    if(!isset($this->digits[4])||(isset($this->digits[4])&&$this->digits[4]!=1))
                        $result.=$this->spelling['ones'][$this->language][$this->digits[3]]." ".$this->greatnumbersspelling['thousands'][$this->language][5]." ";
                }
            }
            if(isset($this->digits[2])) {//разряд сотен
                $result.=$this->spelling['hundreds'][$this->language][$this->digits[2]]." ";

    Часть программы, которая преобразовывает целое число из промежутка [-9999999; 9999999] в текст (разговорный) на трех языках (Russian, Ukrainian, English). Состоит из трех классов. Это класс numberspelling - основной класс программы. Точнее его часть. Остальное - в следующем посте. Именно он преобразует цифру из уже имеющегося массива number в массив в произношение этой цифры на данном языке, в соответствии с её весом (той степенью числа 10, на которую она умножена). Например, если цифра 5 в уже имеющемся массиве стоит под номером 2, то она будет произносится "пятьсот". Напомню, номер элемента в массиве соответствует степени числа 10, на которую надо умножить элемент.

    ppd, 23 Декабря 2014

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

    +155

    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
    26. 26
    27. 27
    28. 28
    29. 29
    30. 30
    31. 31
    32. 32
    33. 33
    34. 34
    35. 35
    36. 36
    37. 37
    class number {
        //put your code here
        protected $digits;/*массив цифр числа. 0й эл-т - самый правый разряд*/ 
        protected $sign;/*знак числа*/
        public function __construct($number) {
            if(($number>=-9999999)&($number<=9999999)) {
                if(intval($number)<0) {
                    $this->sign=-1;   
                }
                else {
                    $this->sign=1;
                }
                $this->digits=  preg_split("//", $number*$this->sign, -1, 
                        PREG_SPLIT_NO_EMPTY);//преобразовываем число в массив цифр
                $this->digits=array_reverse($this->digits);/*переворачиваем массив, 
                 * чтобы индексы соответствовали степеням числа 10*/
            }
            else {
                exit("Введено число вне диапазона или неверного типа!<br>".
                        "The number from non-essential range or type!<br>");
            }
        }
        public function isNegative() {
            if($this->sign==-1) return true;
            else return false;
        }
        public function isPositive() {
            if($this->sign==-1) return false;
            else return true;
        }
        public function getSign() {return $this->sign;}
        public function getDigits() {return $this->digits;}
        public function getDigit($cn) {
            if(($cn>=0)&($cn<=7)) return $this->digits[$cn];
            else return 0;
        }
    }

    Часть программы, которая преобразовывает целое число из промежутка [-9999999; 9999999] в текст (разговорный) на трех языках (Russian, Ukrainian, English). Состоит из трех классов. Это класс number , основное назначение которого - преобразовать число в массив цифр, номера цифр в котором соответствуют степерям числа 10.

    ppd, 23 Декабря 2014

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

    +156

    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
    26. 26
    27. 27
    28. 28
    29. 29
    30. 30
    31. 31
    32. 32
    33. 33
    34. 34
    35. 35
    36. 36
    37. 37
    38. 38
    39. 39
    40. 40
    41. 41
    42. 42
    43. 43
    44. 44
    45. 45
    46. 46
    47. 47
    48. 48
    49. 49
    50. 50
    51. 51
    52. 52
    53. 53
    54. 54
    55. 55
    56. 56
    57. 57
    58. 58
    59. 59
    60. 60
    61. 61
    62. 62
    63. 63
    64. 64
    65. 65
    66. 66
    67. 67
    68. 68
    69. 69
    70. 70
    71. 71
    72. 72
    73. 73
    74. 74
    75. 75
    76. 76
    77. 77
    78. 78
    79. 79
    80. 80
    81. 81
    82. 82
    83. 83
    84. 84
    85. 85
    86. 86
    87. 87
    88. 88
    89. 89
    90. 90
    91. 91
    92. 92
    93. 93
    94. 94
    95. 95
    96. 96
    97. 97
    98. 98
    jQuery(document).ready(function(){ 
    jQuery("a.m1_show").click(function(){ 
    jQuery('div#emul_1').addClass('mshow').show();
    jQuery('div#emul_2').addClass('minvis').hide();
    jQuery('div#emul_3').addClass('minvis').hide();
    jQuery('div#emul_4').addClass('minvis').hide();
    jQuery('div#emul_5').addClass('minvis').hide();
    //jQuery('li#emul_6').addClass('minvis').hide();
    });
    });
    
    jQuery(document).ready(function(){ 
    jQuery("a.m2_show").click(function(){ 
    jQuery('div#emul_2').addClass('mshow').show();
    jQuery('div#emul_1').addClass('minvis').hide();
    jQuery('div#emul_3').addClass('minvis').hide();
    jQuery('div#emul_4').addClass('minvis').hide();
    jQuery('div#emul_5').addClass('minvis').hide();
    //jQuery('li#emul_6').addClass('minvis').hide();
    });
    });
    
    jQuery(document).ready(function(){ 
    jQuery("a.m3_show").click(function(){ 
    jQuery('div#emul_3').addClass('mshow').show();
    jQuery('div#emul_1').addClass('minvis').hide();
    jQuery('div#emul_2').addClass('minvis').hide();
    jQuery('div#emul_4').addClass('minvis').hide();
    jQuery('div#emul_5').addClass('minvis').hide();
    //jQuery('li#emul_6').addClass('minvis').hide();
    });
    });
    
    jQuery(document).ready(function(){ 
    jQuery("a.m4_show").click(function(){ 
    jQuery('div#emul_4').addClass('mshow').show();
    jQuery('div#emul_1').addClass('minvis').hide();
    jQuery('div#emul_3').addClass('minvis').hide();
    jQuery('div#emul_2').addClass('minvis').hide();
    jQuery('div#emul_5').addClass('minvis').hide();
    //jQuery('li#emul_6').addClass('minvis').hide();
    });
    });
    
    jQuery(document).ready(function(){ 
    jQuery("a.m5_show").click(function(){ 
    jQuery('div#emul_5').addClass('mshow').show();
    jQuery('div#emul_1').addClass('minvis').hide();
    jQuery('div#emul_3').addClass('minvis').hide();
    jQuery('div#emul_2').addClass('minvis').hide();
    jQuery('div#emul_4').addClass('minvis').hide();
    //jQuery('li#emul_6').addClass('minvis').hide();
    });
    });
    
    function but_1 () {
    jQuery('span#emul_img_1').addClass('img_none').hide();
    jQuery('span#emul_img_2').addClass('img_inline').show();
    jQuery('span#emul_img_3').addClass('img_inline').show();
    jQuery('span#emul_img_4').addClass('img_inline').show();
    jQuery('span#emul_img_5').addClass('img_inline').show();
    
    
    jQuery('span#emul_img_none_1').addClass('img_inline').show();
    jQuery('span#emul_img_none_1').addClass('current_tab').show();
    
    jQuery('span#emul_img_none_2').addClass('img_none').hide();
    jQuery('span#emul_img_none_3').addClass('img_none').hide();
    jQuery('span#emul_img_none_4').addClass('img_none').hide();
    jQuery('span#emul_img_none_5').addClass('img_none').hide();
    }
    
    function but_2 () {
    jQuery('span#emul_img_2').addClass('img_none').hide();
    jQuery('span#emul_img_1').addClass('img_inline').show();
    jQuery('span#emul_img_3').addClass('img_inline').show();
    jQuery('span#emul_img_4').addClass('img_inline').show();
    jQuery('span#emul_img_5').addClass('img_inline').show();
    
    jQuery('span#emul_img_none_2').addClass('img_inline').show();
    jQuery('span#emul_img_none_2').addClass('current_tab').show();
    
    jQuery('span#emul_img_none_1').addClass('img_none').hide();
    jQuery('span#emul_img_none_3').addClass('img_none').hide();
    jQuery('span#emul_img_none_4').addClass('img_none').hide();
    jQuery('span#emul_img_none_5').addClass('img_none').hide();
    
    }
    
    function but_3 () {
    jQuery('span#emul_img_3').addClass('img_none').hide();
    jQuery('span#emul_img_2').addClass('img_inline').show();
    jQuery('span#emul_img_1').addClass('img_inline').show();
    jQuery('span#emul_img_4').addClass('img_inline').show();
    jQuery('span#emul_img_5').addClass('img_inline').show();
    
    jQuery('span#emul_img_none_3').addClass('img_inline').show();
    jQuery('span#emul_img_none_3').addClass('current_tab').show();

    Сегодня наткнулся на такой вот скрипт для табов. Кому нужен - воруйте. Скрипт лаконичный. Работает шустро.

    Serj, 23 Декабря 2014

    Комментарии (3)
  7. Objective C / Говнокод #17356

    −404

    1. 1
    UIImageView *footerWhite1PxLineThatOnlyAndersWillNotice = [[UIImageView alloc] initWithImage:[UIImage imageNamed:@"sidebar_line_white"]];

    ох уж этот Андерс!

    besprincypniycentner, 23 Декабря 2014

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

    −124

    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
    26. 26
    27. 27
    28. 28
    29. 29
    30. 30
    31. 31
    32. 32
    33. 33
    34. 34
    35. 35
    36. 36
    37. 37
    38. 38
    39. 39
    40. 40
    41. 41
    42. 42
    43. 43
    44. 44
    45. 45
    46. 46
    47. 47
    48. 48
    49. 49
    50. 50
    51. 51
    52. 52
    53. 53
    54. 54
    55. 55
    56. 56
    57. 57
    58. 58
    59. 59
    60. 60
    61. 61
    62. 62
    63. 63
    64. 64
    65. 65
    66. 66
    67. 67
    68. 68
    69. 69
    //часть текста запроса
                                   |ИЗ
    		               |	ЭтапыОплатыИсходник КАК ЭтапыОплаты
    		       		   |//ТекстОтбора
    		               |{ГДЕ
    .................
    
    		//Добавляем поля если используется отбор
    		ТекстОтбора="ГДЕ ";
    		ТекстОтбора=ТекстОтбора+" ИСТИНА";		
    		НомерПеременнойОтбора=1;
    		Для каждого  СтрокаТекущегоОтбора Из ПостроительОтчета.Отбор Цикл
    
    			if НЕ СтрокаТекущегоОтбора.Использование then
    				continue;
    			endif;
    
    			СложноеИмяПоля=ПолучитьИмяПоляБезТочек(СтрокаТекущегоОтбора.ПутьКДанным);
    			Если  ПостроительОтчета.Отбор.Найти(СложноеИмяПоля)=Неопределено Тогда
    				Если СтрокаТекущегоОтбора.ВидСравнения=ВидСравнения.Больше Тогда
    					ТекстОтбора=ТекстОтбора+Символы.ПС+" И ЭтапыОплаты."+СтрокаТекущегоОтбора.ПутьКДанным+" > &ПеременнаяОтбора"+НомерПеременнойОтбора;	
    					Запрос.УстановитьПараметр("ПеременнаяОтбора"+НомерПеременнойОтбора,СтрокаТекущегоОтбора.Значение);
    					НомерПеременнойОтбора=НомерПеременнойОтбора+1
    				ИначеЕсли СтрокаТекущегоОтбора.ВидСравнения=ВидСравнения.БольшеИлиРавно Тогда
    					ТекстОтбора=ТекстОтбора+Символы.ПС+" И ЭтапыОплаты."+СтрокаТекущегоОтбора.ПутьКДанным+" >= &ПеременнаяОтбора"+НомерПеременнойОтбора;	
    					Запрос.УстановитьПараметр("ПеременнаяОтбора"+НомерПеременнойОтбора,СтрокаТекущегоОтбора.Значение);
    					НомерПеременнойОтбора=НомерПеременнойОтбора+1
    				ИначеЕсли СтрокаТекущегоОтбора.ВидСравнения=ВидСравнения.ВИерархии или 
    					СтрокаТекущегоОтбора.ВидСравнения=ВидСравнения.ВСписке или 
    					СтрокаТекущегоОтбора.ВидСравнения=ВидСравнения.ВСпискеПоИерархии Тогда
    					ТекстОтбора=ТекстОтбора+Символы.ПС+" И ЭтапыОплаты."+СтрокаТекущегоОтбора.ПутьКДанным+" В (&ПеременнаяОтбора"+НомерПеременнойОтбора+")";	
    					Запрос.УстановитьПараметр("ПеременнаяОтбора"+НомерПеременнойОтбора,СтрокаТекущегоОтбора.Значение);
    					НомерПеременнойОтбора=НомерПеременнойОтбора+1
    				ИначеЕсли СтрокаТекущегоОтбора.ВидСравнения=ВидСравнения.ВИерархии Тогда
    					ТекстОтбора=ТекстОтбора+Символы.ПС+" И ЭтапыОплаты."+СтрокаТекущегоОтбора.ПутьКДанным+" В ИЕРАРХИИ(&ПеременнаяОтбора"+НомерПеременнойОтбора+")";	
    					Запрос.УстановитьПараметр("ПеременнаяОтбора"+НомерПеременнойОтбора,СтрокаТекущегоОтбора.Значение);
    					НомерПеременнойОтбора=НомерПеременнойОтбора+1
    				ИначеЕсли СтрокаТекущегоОтбора.ВидСравнения=ВидСравнения.Меньше Тогда
    					ТекстОтбора=ТекстОтбора+Символы.ПС+" И ЭтапыОплаты."+СтрокаТекущегоОтбора.ПутьКДанным+" < &ПеременнаяОтбора"+НомерПеременнойОтбора;	
    					Запрос.УстановитьПараметр("ПеременнаяОтбора"+НомерПеременнойОтбора,СтрокаТекущегоОтбора.Значение);
    					НомерПеременнойОтбора=НомерПеременнойОтбора+1
    				ИначеЕсли СтрокаТекущегоОтбора.ВидСравнения=ВидСравнения.МеньшеИлиРавно Тогда
    					ТекстОтбора=ТекстОтбора+Символы.ПС+" И ЭтапыОплаты."+СтрокаТекущегоОтбора.ПутьКДанным+" <= &ПеременнаяОтбора"+НомерПеременнойОтбора;	
    					Запрос.УстановитьПараметр("ПеременнаяОтбора"+НомерПеременнойОтбора,СтрокаТекущегоОтбора.Значение);
    					НомерПеременнойОтбора=НомерПеременнойОтбора+1
    				ИначеЕсли СтрокаТекущегоОтбора.ВидСравнения=СтрокаТекущегоОтбора.ВидСравнения=ВидСравнения.НеВСписке или 
    					СтрокаТекущегоОтбора.ВидСравнения=ВидСравнения.НеВСпискеПоИерархии Тогда
    					ТекстОтбора=ТекстОтбора+Символы.ПС+" И НЕ "+"ЭтапыОплаты."+СтрокаТекущегоОтбора.ПутьКДанным+" В (&ПеременнаяОтбора"+НомерПеременнойОтбора+")";	
    					Запрос.УстановитьПараметр("ПеременнаяОтбора"+НомерПеременнойОтбора,СтрокаТекущегоОтбора.Значение);
    					НомерПеременнойОтбора=НомерПеременнойОтбора+1
    				ИначеЕсли СтрокаТекущегоОтбора.ВидСравнения=ВидСравнения.НеВИерархии  Тогда
    					ТекстОтбора=ТекстОтбора+Символы.ПС+" И НЕ "+"ЭтапыОплаты."+СтрокаТекущегоОтбора.ПутьКДанным+" В ИЕРАРХИИ(&ПеременнаяОтбора"+НомерПеременнойОтбора+")";	
    					Запрос.УстановитьПараметр("ПеременнаяОтбора"+НомерПеременнойОтбора,СтрокаТекущегоОтбора.Значение);
    					НомерПеременнойОтбора=НомерПеременнойОтбора+1
    				ИначеЕсли СтрокаТекущегоОтбора.ВидСравнения=ВидСравнения.НеРавно Тогда
    					ТекстОтбора=ТекстОтбора+Символы.ПС+" И ЭтапыОплаты."+СтрокаТекущегоОтбора.ПутьКДанным+" <> &ПеременнаяОтбора"+НомерПеременнойОтбора;	
    					Запрос.УстановитьПараметр("ПеременнаяОтбора"+НомерПеременнойОтбора,СтрокаТекущегоОтбора.Значение);
    					НомерПеременнойОтбора=НомерПеременнойОтбора+1
    				ИначеЕсли СтрокаТекущегоОтбора.ВидСравнения=ВидСравнения.Равно Тогда
    					ТекстОтбора=ТекстОтбора+Символы.ПС+" И ЭтапыОплаты."+СтрокаТекущегоОтбора.ПутьКДанным+" = &ПеременнаяОтбора"+НомерПеременнойОтбора;	
    					Запрос.УстановитьПараметр("ПеременнаяОтбора"+НомерПеременнойОтбора,СтрокаТекущегоОтбора.Значение);
    					НомерПеременнойОтбора=НомерПеременнойОтбора+1
    				КонецЕсли; 
    			КонецЕсли; 
    		КонецЦикла; 
    
    		Если НомерПеременнойОтбора>1 Тогда
    			Запрос.Текст=СтрЗаменить(Запрос.Текст,"//ТекстОтбора",ТекстОтбора);
    		КонецЕсли;

    При этом при всем, в отчете используется 2 построителя ( на одном не смог построить , одного видимо было было мало для стратегии заложенной в голове:) ) + между ними используется куча запросов , в которых выгружаются таблицы (РезультатЗапроса.Выполнить().Выгрузить( )) и передаются в следующие запросы как параметры.
    От себя добавлю: Добавлял элементарные вещи, чтобы вывести пару дополнительных колонок - убить 1 час , тоже самое, что ничего не сделать..... Да и к тому же отчет рисуется через "ТабДок.Присоеденить".

    Ba_Ka, 22 Декабря 2014

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

    −125

    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
    26. 26
    27. 27
    28. 28
    29. 29
    30. 30
    31. 31
    32. 32
    33. 33
    34. 34
    35. 35
    36. 36
    37. 37
    38. 38
    39. 39
    40. 40
    41. 41
    42. 42
    43. 43
    44. 44
    45. 45
    46. 46
    47. 47
    48. 48
    49. 49
    50. 50
    51. 51
    52. 52
    53. 53
    54. 54
    55. 55
    56. 56
    57. 57
    58. 58
    59. 59
    60. 60
    61. 61
    62. 62
    63. 63
    64. 64
    65. 65
    66. 66
    67. 67
    68. 68
    69. 69
    //часть текста запроса
                                   |ИЗ
    		               |	ЭтапыОплатыИсходник КАК ЭтапыОплаты
    		       		   |//ТекстОтбора
    		               |{ГДЕ
    .................
    
    		//Добавляем поля если используется отбор
    		ТекстОтбора="ГДЕ ";
    		ТекстОтбора=ТекстОтбора+" ИСТИНА";		//NP002
    		НомерПеременнойОтбора=1;
    		Для каждого  СтрокаТекущегоОтбора Из ПостроительОтчета.Отбор Цикл
    
    			if НЕ СтрокаТекущегоОтбора.Использование then
    				continue;
    			endif;
    
    			СложноеИмяПоля=ПолучитьИмяПоляБезТочек(СтрокаТекущегоОтбора.ПутьКДанным);
    			Если  ПостроительОтчета.Отбор.Найти(СложноеИмяПоля)=Неопределено Тогда
    				Если СтрокаТекущегоОтбора.ВидСравнения=ВидСравнения.Больше Тогда
    					ТекстОтбора=ТекстОтбора+Символы.ПС+" И ЭтапыОплаты."+СтрокаТекущегоОтбора.ПутьКДанным+" > &ПеременнаяОтбора"+НомерПеременнойОтбора;	//NP002
    					Запрос.УстановитьПараметр("ПеременнаяОтбора"+НомерПеременнойОтбора,СтрокаТекущегоОтбора.Значение);
    					НомерПеременнойОтбора=НомерПеременнойОтбора+1
    				ИначеЕсли СтрокаТекущегоОтбора.ВидСравнения=ВидСравнения.БольшеИлиРавно Тогда
    					ТекстОтбора=ТекстОтбора+Символы.ПС+" И ЭтапыОплаты."+СтрокаТекущегоОтбора.ПутьКДанным+" >= &ПеременнаяОтбора"+НомерПеременнойОтбора;	//NP002
    					Запрос.УстановитьПараметр("ПеременнаяОтбора"+НомерПеременнойОтбора,СтрокаТекущегоОтбора.Значение);
    					НомерПеременнойОтбора=НомерПеременнойОтбора+1
    				ИначеЕсли СтрокаТекущегоОтбора.ВидСравнения=ВидСравнения.ВИерархии или 
    					СтрокаТекущегоОтбора.ВидСравнения=ВидСравнения.ВСписке или 
    					СтрокаТекущегоОтбора.ВидСравнения=ВидСравнения.ВСпискеПоИерархии Тогда
    					ТекстОтбора=ТекстОтбора+Символы.ПС+" И ЭтапыОплаты."+СтрокаТекущегоОтбора.ПутьКДанным+" В (&ПеременнаяОтбора"+НомерПеременнойОтбора+")";	//NP002
    					Запрос.УстановитьПараметр("ПеременнаяОтбора"+НомерПеременнойОтбора,СтрокаТекущегоОтбора.Значение);
    					НомерПеременнойОтбора=НомерПеременнойОтбора+1
    				ИначеЕсли СтрокаТекущегоОтбора.ВидСравнения=ВидСравнения.ВИерархии Тогда
    					ТекстОтбора=ТекстОтбора+Символы.ПС+" И ЭтапыОплаты."+СтрокаТекущегоОтбора.ПутьКДанным+" В ИЕРАРХИИ(&ПеременнаяОтбора"+НомерПеременнойОтбора+")";	//NP002
    					Запрос.УстановитьПараметр("ПеременнаяОтбора"+НомерПеременнойОтбора,СтрокаТекущегоОтбора.Значение);
    					НомерПеременнойОтбора=НомерПеременнойОтбора+1
    				ИначеЕсли СтрокаТекущегоОтбора.ВидСравнения=ВидСравнения.Меньше Тогда
    					ТекстОтбора=ТекстОтбора+Символы.ПС+" И ЭтапыОплаты."+СтрокаТекущегоОтбора.ПутьКДанным+" < &ПеременнаяОтбора"+НомерПеременнойОтбора;	//NP002
    					Запрос.УстановитьПараметр("ПеременнаяОтбора"+НомерПеременнойОтбора,СтрокаТекущегоОтбора.Значение);
    					НомерПеременнойОтбора=НомерПеременнойОтбора+1
    				ИначеЕсли СтрокаТекущегоОтбора.ВидСравнения=ВидСравнения.МеньшеИлиРавно Тогда
    					ТекстОтбора=ТекстОтбора+Символы.ПС+" И ЭтапыОплаты."+СтрокаТекущегоОтбора.ПутьКДанным+" <= &ПеременнаяОтбора"+НомерПеременнойОтбора;	//NP002
    					Запрос.УстановитьПараметр("ПеременнаяОтбора"+НомерПеременнойОтбора,СтрокаТекущегоОтбора.Значение);
    					НомерПеременнойОтбора=НомерПеременнойОтбора+1
    				ИначеЕсли СтрокаТекущегоОтбора.ВидСравнения=СтрокаТекущегоОтбора.ВидСравнения=ВидСравнения.НеВСписке или 
    					СтрокаТекущегоОтбора.ВидСравнения=ВидСравнения.НеВСпискеПоИерархии Тогда
    					ТекстОтбора=ТекстОтбора+Символы.ПС+" И НЕ "+"ЭтапыОплаты."+СтрокаТекущегоОтбора.ПутьКДанным+" В (&ПеременнаяОтбора"+НомерПеременнойОтбора+")";	//NP002
    					Запрос.УстановитьПараметр("ПеременнаяОтбора"+НомерПеременнойОтбора,СтрокаТекущегоОтбора.Значение);
    					НомерПеременнойОтбора=НомерПеременнойОтбора+1
    				ИначеЕсли СтрокаТекущегоОтбора.ВидСравнения=ВидСравнения.НеВИерархии  Тогда
    					ТекстОтбора=ТекстОтбора+Символы.ПС+" И НЕ "+"ЭтапыОплаты."+СтрокаТекущегоОтбора.ПутьКДанным+" В ИЕРАРХИИ(&ПеременнаяОтбора"+НомерПеременнойОтбора+")";	//NP002
    					Запрос.УстановитьПараметр("ПеременнаяОтбора"+НомерПеременнойОтбора,СтрокаТекущегоОтбора.Значение);
    					НомерПеременнойОтбора=НомерПеременнойОтбора+1
    				ИначеЕсли СтрокаТекущегоОтбора.ВидСравнения=ВидСравнения.НеРавно Тогда
    					ТекстОтбора=ТекстОтбора+Символы.ПС+" И ЭтапыОплаты."+СтрокаТекущегоОтбора.ПутьКДанным+" <> &ПеременнаяОтбора"+НомерПеременнойОтбора;	//NP002
    					Запрос.УстановитьПараметр("ПеременнаяОтбора"+НомерПеременнойОтбора,СтрокаТекущегоОтбора.Значение);
    					НомерПеременнойОтбора=НомерПеременнойОтбора+1
    				ИначеЕсли СтрокаТекущегоОтбора.ВидСравнения=ВидСравнения.Равно Тогда
    					ТекстОтбора=ТекстОтбора+Символы.ПС+" И ЭтапыОплаты."+СтрокаТекущегоОтбора.ПутьКДанным+" = &ПеременнаяОтбора"+НомерПеременнойОтбора;	//NP002
    					Запрос.УстановитьПараметр("ПеременнаяОтбора"+НомерПеременнойОтбора,СтрокаТекущегоОтбора.Значение);
    					НомерПеременнойОтбора=НомерПеременнойОтбора+1
    				КонецЕсли; 
    			КонецЕсли; 
    		КонецЦикла; 
    
    		Если НомерПеременнойОтбора>1 Тогда
    			Запрос.Текст=СтрЗаменить(Запрос.Текст,"//ТекстОтбора",ТекстОтбора);
    		КонецЕсли;

    При этом при всем, в отчете используется 2 построителя ( на одном не смог построить , одного видимо было было мало для стратегии заложенной в голове:) ) + между ними используется куча запросов , в которых выгружаются таблицы (РезультатЗапроса.Выполнить().Выгрузить( )) и передаются в следующие запросы как параметры.
    От себя добавлю: Добавлял элементарные вещи, чтобы вывести пару дополнительных колонок - убить 1 час , тоже самое, что ничего не сделать..... Да и к тому же отчет рисуется через "ТабДок.Присоеденить".

    Ba_Ka, 22 Декабря 2014

    Комментарии (0)
  10. Куча / Говнокод #17353

    +136

    1. 1
    2. 2
    Prelude> [(-1/0),1 .. 1]
    [-Infinity,1.0,Infinity,Infinity]

    Целых 2 бесконечности между единицей.

    Abbath, 22 Декабря 2014

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