Спр=Создатьобъект("СправочникСотрудники");
Спр.ИспользоватьДату(ТекущаяДата());
Спр.ВыбратьЭлементы();
Пока Спр.ПолучитьЭлемент()=1 Цикл
Если ПустоеЗначение(Спр.СостояниеФизЛица)=0 тогда // работает
(6) а когда уволен ?
там будет тоже не пустое значение
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство. Фредерик Брукс-младший