Идёт загрузка страницы...

htp://aptem.net.ru





Календари


1С:Предприятие

Учебник

Основы 1С
Пошаговый пример
Конфигуратор
Встроенный язык
Справочники
Документы
Отчеты
Регистры
Запросы
Таблица значений
Список значений
Экранные формы
Встроенные функции
События
Конструкторы
Текстовые файлы
DBF-файлы
Файловая система
Диаграммы

Примеры

Мини-склад
Работенка
Почтальон Печкин
Денежки
Мини-библиотека
Доставочка
Реверси
Охота на лис
Конкурент-магазин
Кадровый учет

Простой склад

Бухгалтерия

Введение
Бухгалтерские счета
Операции и проводки
Бухгалтерские итоги
Бухгалтерский запрос

Простая бухгалтерия

Зарплата

Введение
Журналы расчетов
Виды и группы расчета
Календари
Мини-зарплата

Зарплата / Календари

Ссылка на календарь
Подсчет дней и часов
Отсчет даты


Ссылка на календарь

1-й вариант:

Календ = СоздатьОбъект("Календарь.Служащие");

2-й вариант:

Календ = Календари.Служащие;


Подсчет дней и часов по календарю

Подсчитаем количество рабочих дней для служащих за заданный период с учетом выходных и праздников:
Дни = Календари.Служащие.Дней (НачДата, КонДата);

Подсчитаем количество часов для рабочих за заданный период с учетом выходных, праздников и укороченных предпраздничных дней:
Часы = Календари.Рабочие.Часов (НачДата, КонДата);

Календари, казалось бы простой объект, но без них отсчитывать дни было бы неимоверно тяжело. Наверное, программисты в других программах мучаются без календарей. Пожелаем им приятных кошмаров. ;-)


Отсчет даты

Получим дату, отстоящую по календарю от указанной даты на заданное количество дней. Календарь пропускает дни с нулевыми значениями (выходные и праздники).

КонецОтпуска = Календари.Служащие.ПолучитьДату (НачалоОтпуска, 28);