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

    −174

    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
    Стр = ТЗОбщая.Добавить();
Стр.сотрудник = Выборка.сотрудник;
Стр.Результат = ВЫборка.Результат;
ИскомаяСтрока = ТЗСотрДатаПриема.Найти(Стр.сотрудник,"Сотрудник");
Если ИскомаяСтрока <> Неопределено Тогда
	месяц_ = Месяц(ИскомаяСтрока.ДатаПриемаНаРаботу);
	если месяц_ > 7 тогда  // чел принят после июля
		число_ = 12 - месяц_;  //кол-во отработанных месяцев
	иначе	  
		число_ = 6 ; 
	конецесли;	  
КонецЕсли;	
число_ = число_+ Месяц(ВыбДата) ;
если число_ >=12 тогда
	число_=12;
конецесли;	 
Стр.СреднийЗаработок = Окр(ВЫборка.Результат/29.4/число_,2);

    Вот так у нас считают средний заработок за последний год)))

    Запостил: doom2good, 17 Июля 2013

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

    • ava doom2good 17.07.2013 13:52 # +3

      АПД: когда спросил "а нахера эти черточки у переменных?" ответ убил - "так я отличаю свои переменные"
      Ответить

      • ava bormand 17.07.2013 15:10 # +1

        > "так я отличаю свои переменные"
        Ладно бы они глобальными были... а локальные то зачем отличать?
        Ответить

        • ava bee-squid 17.07.2013 16:37 # +1

          а как иначе подать на авторские отчисления после увольнения?
          Ответить

        • ava doom2good 18.07.2013 07:28 # 0

          Да причем тут глобальные? "отмечание" своих переменных говорит о нежелании (или неумении) разобраться в алгоритме. А судя по тексту, речь здесь именно о "неумении"))
          Ответить

    • ava psycho-coder 18.07.2013 10:53 # −2 

      Стр.сотрудник = Выборка.сотрудник;
Стр.Результат = ВЫборка.Результат;

      ВЫборка - пусто будет. ИЛИ упадет. Точно не помню как она себя ведет в таких ситуациях.
      Ответить

    • ava mrbus 11.02.2014 19:32 # 0

      У нас в ЗУПе постоянно создают новый документ, когда появляется новый вид расчета, и кодят туды алгоритм расчета.
      Как-то раз ко мне обратились с вопросом, мол алгоритм неправильно работает, исправь. Я х... положил на их документ, и просто нормально настроил формулу у вида расчета.
      Ну что я могу сказать... Идея моя, видать, не понравилась, до сих пор плодят новые документы для каждой премии, но в то же время моя-то формула до сих пор работает...
      И это - внимание - попросили меня методологи. Меня, программиста, попросили решить по сути методологический вопрос. Без единой строки кода.
      Ответить

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