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

    −94

    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
    Если СтрокаТаблицы.ЗакрытьДоговор = Истина Тогда
    			СтарыйЭлемент = Справочники.ДоговорыКонтрагентов.НайтиПоКоду(СтрокаТаблицы.Договор.Код).ПолучитьОбъект();
    			СтарыйЭлемент1 = Справочники.ДоговорыКонтрагентов.НайтиПоНаименованию(СтрокаТаблицы.Договор.Наименование).ПолучитьОбъект();
    			Если СтарыйЭлемент.Наименование <> СтарыйЭлемент1.Наименование Тогда
    				СтарыйЭлемент = СтарыйЭлемент1;
    			Иначе
    				СтарыйЭлемент = СтарыйЭлемент;
    			КонецЕсли;
    			СтарыйЭлемент.мфоДатаЗакрытия = Дата;
    		Иначе
    
    			СтарыйЭлемент = Справочники.ДоговорыКонтрагентов.НайтиПоКоду(СтрокаТаблицы.Договор.Код).ПолучитьОбъект();
    			СтарыйЭлемент1 = Справочники.ДоговорыКонтрагентов.НайтиПоНаименованию(СтрокаТаблицы.Договор.Наименование).ПолучитьОбъект();
    			Если СтарыйЭлемент.Наименование <> СтарыйЭлемент1.Наименование Тогда
    				СтарыйЭлемент = СтарыйЭлемент1;
    			Иначе
    				СтарыйЭлемент = СтарыйЭлемент;
    			КонецЕсли;
    			СтарыйЭлемент.мфоДатаЗакрытия = Дата("00010101");
    		КонецЕсли;
    		СтарыйЭлемент.Записать();

    Крайне сильное колдунство :) Все те же аутсорсеры :)

    Запостил: planaric, 27 Января 2016

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

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