Очередной вариант оповещения о днях рождения сотрудников.
- Выводится список сотрудников у кого день рождения сегодня и завтра.
- Не указывается возраст, многих сильно беспокоит, когда другие сотрудники знают их возраст.
- Есть возможность отказаться от запуска при старте.
Файлы
ВНИМАНИЕ:
Файлы из Базы знаний - это исходный код разработки.
Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы.
Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных.
Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.
Вы можете заказать платную доработку или адаптацию этой разработки под вашу конфигурацию на «Бирже
заказов».
0% комиссии — оплата напрямую исполнителю;
Исполнители любого масштаба — от отдельных специалистов до команд под проект;
Прямой обмен контактами между заказчиком и исполнителем;
Безопасная сделка — при необходимости;
Рейтинги, кейсы и прозрачная система откликов.
Очередной вариант оповещения о днях рождения сотрудников.
Особенности:
- Выводится список сотрудников у кого день рождения сегодня и завтра. - Не указывается возраст, многих сильно беспокоит, когда другие сотрудники знают их возраст. - Есть возможность отказаться от запуска при старте.
В течении дня дни рождения показываются только при первом запуске, чтобы не раздрожать при перезапуске 1С в течении дня. Но при желании посмотрерть у кого день рождения можно в любое время вызовом обработки из меню.
Подключение:
В глобальном модуле в процедуре ПриНачалеРаботыСистемы() добавить вызов ОткрытьФорму("Обработка.ДеньРожденияСегодня", "ПоказатьДеньРожденияСегодня");
В интерфейсе в меню например "Сервис" добавить вызов обработки "ДеньРожденияСегодня". Пункт меню можно назвать "Сегодня день рождения празднуют".
Обязательно наличие справочника "Сотрудники". Обязательные реквизиты: "ДатаРождения", "ДатаУвольнения". Следующие реквизиты используются для вывода в табличной части, их можно изменить или убрать: "Должность", "Подразделение".
Обработка позволяет быстро и массово исправить ошибки заполнения карточек справочника Контрагенты. А именно те случаи, когда вместо ФизЛица установлено ЮрЛицо, когда в карточках справочника СвоиЮрЛица не установлен реквизит ИндивидуальныйПредприниматель, неверно заполнен реквизит ИНН\КПП, а также исправляет реквизит ЮрФизЛица справочника БанковскиеСчета, привязанного к обрабатываемому контрагенту.
Обработка тестировалась на платформе 1С7.7 конфигурации "Торговля и Склад" ред. 998 и 1004. Код обработки открыт.
Данное решение предназначено для упрощенного варианта электронного учёта рабочего времени сотрудников предприятия. Печать титульного листа и таблицы табеля учёта рабочего времени. Печать бейджиков сотрудников. Автоматическая регистрация и расчет рабочего времени по штрих-коду сотрудника. Загрузка сотрудников из справочника. Формирование штрих-кода сотрудника. Совместимо с любой конфигурацией 1С:7.7.
ЗиК 7.7 постепенно сходит на нет. Но, возможно, кому-то из нас все-таки когда-либо еще не раз придется столкнуться с этой конфигурацией. Поскольку работы по ней и заказов всё меньше и меньше, знания о ней и опыт постепенно угасают. Мой опыт с ЗиК 7.7 длиной в 14 лет терять просто так неохота.
В этой статье я запишу, чтобы не забыть, важные моменты об этой конфигурации, чтобы самому не забыть, и вдруг кто-то получит это в наследство на сопровождение и будет вынужден (иначе не скажешь) это обслуживать.
Или еще можно рассматривать эту статью как модное нынче «Письмо самому себе в прошлое».
Печать договоров, заявлений по шаблону WORD и EXCEL (шаблон, пример).
Нужно сделать рыбу и закинуть в каталог. Программисту только надо в рыбе прописать переменные.
Образцы рабочих договоров, заявлений прилагаются - doc, xls, xlsx, rtf.
Нужны были стартмани, выдернул обработку из своей старой конфигурации, это самое простое что мог найти по быстрому. А в обще-то разных интересных идей предостаточно, только времени нет на все это, это минимум целый день нужно потратить чтоб подготовить публикацию.
я делал так:
СпрФизЛиц=СоздатьОбъект("Справочник.ФизЛица");
Есть=0;
Для год = -100 По 100 Цикл
Если СпрФизЛиц.ВыбратьЭлементыПоРеквизиту("ДатаРождения",Дата(ДатаГод(ТекущаяДата())-год,ДатаМесяц(ТекущаяДата()),ДатаЧисло(ТекущаяДата())),0,0)=1 Тогда
Если Есть=0 Тогда
Сообщить("Сегодня день рождения у:");
КонецЕсли;
Пока СпрФизЛиц.ПолучитьЭлемент()=1 Цикл
Сообщить(СпрФизЛиц.Наименование+" /"+СокрЛП(СпрФизЛиц.ПолнНаименование)+"/ "+СпрФизЛиц.ДатаРождения+" -- "+СпрФизЛиц.Телефоны);
КонецЦикла;
Есть=1;
КонецЕсли;
КонецЦикла;
Если Есть=1 Тогда
Предупреждение("Кажется у кое-кого сегодня День Рождения!!!"+РазделительСтрок+"Смотрите подробности в окне сообщений!");
КонецЕсли;
этот код вставил в конец процедуры ПриНачалеРаботыСистемы()
