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

    −171

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    7. 7
    8. 8
    ЕстьПроблема       = (Мин(СсылкаНаЗапрос.ЭтоПроблема,СвязанныйЗапрос.ЭтоПроблема)<>Макс(СсылкаНаЗапрос.ЭтоПроблема,СвязанныйЗапрос.ЭтоПроблема));
ТолькоПроблемы = Мин(СсылкаНаЗапрос.ЭтоПроблема,СвязанныйЗапрос.ЭтоПроблема);

Если ЕстьПроблема И Не ТолькоПроблемы Тогда 
     // кусок кода
Иначе 
     // кусок кода
КонецЕсли;

    Наваял тут... Самому прикольно стало.

    Запостил: jerokee, 16 Мая 2013

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

    • ava serpinski 16.05.2013 13:31 # −2

      Однозначно плюс, Коллега.
      Ответить

    • ava orion 16.05.2013 18:33 # +1

      Пилять, товарищи! Как вы на этом пишите?!
      а вообще, зачем эти Мин/Максы ?
      ЕстьПроблема = СсылкаНаЗапрос.ЭтоПроблема <> СвязанныйЗапрос.ЭтоПроблема. или тут так нельзя и в этом суть гк?
      Ответить

      • ava jerokee 17.05.2013 05:15 # +1

        Во! Вариант. Спасибо. Для "ЕстьПроблема" - это то, что нужно. Я и говорю, что наговнокодил...
        Ответить

        • ava orion 17.05.2013 11:50 # 0

          ТолькоПроблемы - вообще не нужно. при условии, что ЕстьПроблема - истина, ТолькоПроблемы - всегда ложно
          т.е. код эквивалетен:

          Если СсылкаНаЗапрос.ЭтоПроблема <> СвязанныйЗапрос.ЭтоПроблема Тогда
          // кусок кода
          Иначе
          // кусок кода
          КонецЕсли;
          Ответить

          • ava jerokee 17.05.2013 11:54 # 0

            Не, мне нужно отдельно отслеживать в другом месте ситуацию ТолькоПроблемы", когда есть "Истина" у обоих.
            Ответить

    • ava someone 16.05.2013 18:47 # +5 

      Если ЕстьЧеловек Тогда
    ЕстьПроблема
ИначеЕсли НетЧеловека Тогда
    НетПроблемы
КонецЕсли
      Ответить

      • ava guest 17.05.2013 07:08 # +1

        ЕстьЧеловек = ЕстьПроблемы;
        Ответить

        • ava guest 17.05.2013 08:05 # +2

          ЕстьПроблемы = ЕстьЧеловек.
          Не путайте логику :)
          Ответить

          • ava mrbus 17.05.2013 19:39 # 0

            Это смотря "логика" или "присваивание".
            Ответить

    • ava guest 18.05.2013 12:28 # +2

      В 1С первой строчкой должно идти ЕстьПроблемы = Истина;
      Ответить

      • ava bormand 18.05.2013 19:27 # +4 

        Если Я.ПишуНа("1C") Тогда
    ЕстьПроблемы = Истина
КонецЕсли
        Ответить

        • ava eth0 18.05.2013 20:43 # +3

          Несмотря на то, что это диалект бейсика, точка с запятой должна ставиться в конце практически каждой строки.
          Ответить

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