Процедура Сформировать()
Док=СоздатьОбъект("Документ.ПриказОбУвольнении");
Док.ВыбратьДокументы();
Пока Док.ПолучитьДокумент()=1 Цикл
Сообщить(""+Док.Сотрудник.Пол);
Сообщить(""+Док.Сотрудник);
Сообщить(""+Док.Сотрудник.ДатаРождения);
Я не хочу быть самым богатым человеком на кладбище. Засыпать с чувством, что за день я сделал какую-нибудь потрясающую вещь — вот что меня интересует. Стив Джобс