Форум 1С
Программистам, бухгалтерам, администраторам, пользователям
Задай вопрос - получи решение проблемы
25 ноя 2024, 18:10

Выбор именинников при запуске системы

Автор Константин163, 28 фев 2015, 14:07

0 Пользователей и 1 гость просматривают эту тему.

Константин163

    Здравствуйте. Недавно посмотрел урок Чистова по созданию списка именинников при запуске системы, но там было для всего справочника *Работники*.
А вот если есть в справочнике *Работники* еще и папка *Уволенные*, то как добавить содержимое этой папки в исключения, чтобы при запуске программы именинники из этой группы не находились.
Помогите пожалуйста.

дфтын

Если Сотр.Родитель.Наименвоание <> "Уволеные" Тогда

|И Сотр.Родитель.Наименование <> "Уволеные"


Константин163

Цитата: дфтын от 28 фев 2015, 15:42
Если Сотр.Родитель.Наименвоание <> "Уволеные" Тогда

|И Сотр.Родитель.Наименование <> "Уволеные"
Я конечно извиняюсь, но я чтото не понимаю. Копирую я Ваш код, дописываю его, получается:

если Сотр.Родитель.Наименование <> "Уволеные" Тогда
         продолжить
      иначе отказ = истина;
         конецесли;

система говорит: *Переменная не определена (Сотр)*.
Вот полный код:

Функция ПолучитьСписокИменинников() Экспорт
   
   ТД_День =   День(ТекущаяДата());
   ТД_Месяц = Месяц(ТекущаяДата());
   
   //Создаю пустой массив
   Массив = Новый Массив();
   
   Выборка = Справочники.Сотрудники.Выбрать();
   Пока Выборка.Следующий() Цикл
      
      Если Выборка.ЭтоГруппа Тогда
         Продолжить;
      КонецЕсли;
      если Сотр.Родитель.Наименование <> "Уволеные" Тогда
         продолжить
      иначе отказ = истина;
         конецесли;
         
      ДР_День =   День(Выборка.ДатаРождения);
      ДР_Месяц = Месяц(Выборка.ДатаРождения);
      
      Если ДР_Месяц = ТД_Месяц И ДР_День = ТД_День Тогда
         //Добавляю новый элемент в массив
         Массив.Добавить(Выборка.Наименование);
      КонецЕсли;
   КонецЦикла;
   
   Возврат Массив;
КонецФункции
Вы либо напишите так, чтобы работало и понятно было, либо не пишите вообще. А то на чем был на том и остался. Извините, если грубо получилось.

Клуб 01С

Цитата: Константин163 от 28 фев 2015, 14:07
    Здравствуйте. Недавно посмотрел урок Чистова по созданию списка именинников при запуске системы, но там было для всего справочника *Работники*.
А вот если есть в справочнике *Работники* еще и папка *Уволенные*, то как добавить содержимое этой папки в исключения, чтобы при запуске программы именинники из этой группы не находились.
Помогите пожалуйста.

x-01c@lenta.ru сюда базу и посмотрю.

Теги:

Похожие темы (5)

Рейтинг@Mail.ru

Поиск