"PHP" / Говнокод #336 Ссылка на оригинал

0

  1. 1
  2. 2
  3. 3
  4. 4
  5. 5
  6. 6
  7. 7
  8. 8
  9. 9
  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
Процедура ВакансииРаботодателя()
   
    Таб=СоздатьОбъект("Таблица");
    Таб.ИсходнаяТаблица("НайденныеВакансии");
    Таб.ВывестиСекцию("Все<");
   
    СпрВакансии=СоздатьОбъект("Справочник.Вакансии");
   
   НомПП=0;
   СпрВакансии.ВыбратьЭлементыПоРеквизиту("Работодатель",ТекущийЭлемент(),0,0);
   Пока СпрВакансии.ПолучитьЭлемент()=1 Цикл   
      
      НомПП=НомПП+1;
      Таб.ВывестиСекцию("Вакансия");
      
   КонецЦикла;   
   
   Таб.ВывестиСекцию("Все>");
   Таб.ТолькоПросмотр(1);
   Таб.Показать();
   
КонецПроцедуры

КОД НА 1С!!!
Хоть все и работает, но говнокод сам язык)))

Запостил: guest guest, (Updated )

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

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

Я, guest, находясь в здравом уме и твердой памяти, торжественно заявляю:

    А не использовать ли нам bbcode?


    8