1. 1C / Говнокод #12749

    −117

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    Функция КоличествоМесяцев(Дата1, Дата2)
    	Запрос = Новый Запрос;
    	Запрос.Текст = "ВЫБРАТЬ
    	|	РАЗНОСТЬДАТ(&Дата1, &Дата2, МЕСЯЦ) + 1 КАК Результат";
    	Запрос.УстановитьПараметр("Дата1", Дата1);
    	Запрос.УстановитьПараметр("Дата2", Дата2);
    	Выборка = Запрос.Выполнить().Выбрать();
    	Если Выборка.Следующий() тогда
    		Возврат Выборка.Результат
    	КонецЕсли;
    КонецФункции

    Хотя, по-моему, неоригинально, уже было.
    Может начнем ходить на сервер, чтобы два числа сложить?

    Запостил: mrbus, 14 Марта 2013

    Комментарии (12) RSS

    • ИМХО любой код на 1С выглядит как говонокод! :)
      Ответить
      • Я вот всё жду, когда появится пост в раздел 1С, не содержащий этого коммента.
        Ответить
      • показать все, что скрытоА негры для вас говном не выглядят?
        Ответить
        • Причём тут негры? Зачем вы сюда расизм приплетаете? Если для Вас "Если" и "КонецЕсли" это норма, то для меня это не так. Конкретно к 1Сникам я претензий не имею. У меня куча претензий к Б. Нуралиеву.
          Ответить
          • Я к Вам тоже претензий не имею, но накопил большую статистику - фраза "код в 1С выглядит как говнокод" обычно имеет под собой ровно столько же оснований, как и расизм - просто не нравится, и всё.
            Но если как-то обоснуете, посмотрю с интересом и верну +1.
            Ответить
            • Я считаю подход перевода языка а русский изначально не верным. Подозреваю, что задумывалось что бухгалтера сами будут дописывать необходимые вещи, но компания 1С не учла, что для этого необходимо сначала научить их программировать. Существуют же общепринятые обозначения типов знакомые каждому программисту (integer, float, double...) так же как и конструкции языка. Поэтому неудачная попытка переучивания бухгалтеров закончилась переучиваниями программистов... Для меня это дикость!
              Ответить
            • Это бейсик, переведённый промтом, только и всего. Сам язык уныл, трещов, и годится только для написания говнокода.
              Тонкий момент. Язык и "погромисты" находятся в идеальной гармонии. Одноэсные обезьяны заслуживают именно тот язык, и язык полностью определяется этими обезьянами.

              Данный конкретный пример уже бывал, на разных языках, скучно, даты, PHP^W1с.
              Ответить
              • Мы самые лучшие программисты на свете, и все остальные программисты нам завидуют. Ведь именно мы дали миру УТ, УПП и ЗУП с БП. Это мы придумали ПроцессорВыводаРезультатаКомпоновкиДанны хВТабличныйДокументИмениБорисаГеоргиевич аНуралиева. Это мы придумали менять законодательство когда нам нечего делать. Это мы придумали ЖКК. Именно мы придумали СКД и RLS. Мы гордо называем себя Программисты 1С, а другие программисты завистливо говорят одинэсники. Но все-таки мы лучшие!
                Ответить
              • зря вы так.
                Ответить
          • > КонецЕсли
            Я так хочу чтобы Если не кончалось
            Чтоб оно за мною мчалось за мною вслед
            Я так хочу чтобы маленьким и взрослым
            Удивительные звезды дарили свет (c)
            Ответить
    • Неделя 1с на уютненьком
      Ответить

    Добавить комментарий