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

День

Автор 1cwiki, 19 июл 2015, 12:38

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

1cwiki

Раздел
Глобальный контекст
Подразделы
Функции работы со значениями типа Дата
День (Day)
Синтаксис:

День(<Дата>)
Параметры:

<Дата> (обязательный)

Тип: Дата.
Исходная дата.
Возвращаемое значение:

Тип: Число.
День в указанной дате.
Описание:

Определяет календарный день в указанной дате.

Доступность:

Тонкий клиент, веб-клиент, сервер, толстый клиент, внешнее соединение, мобильное приложение(клиент), мобильное приложение(сервер).
Пример:

Процедура ПолучитьСтажЗаПериод(Знач ДатаОкончанияПериода,
            Знач ДатаНачалаПериода,
            Лет=0, Месяцев=0, Дней=0) Экспорт
    Если ДатаОкончанияПериода >= ДатаНачалаПериода тогда
        Лет1 = Год(ДатаОкончанияПериода);
        Месяцев1 = Месяц(ДатаОкончанияПериода);
        Если НачалоДня(ДатаОкончанияПериода) <> НачалоДня(КонецМесяца(ДатаОкончанияПериода)) Тогда
            Дней1 = День(ДатаОкончанияПериода);
        Иначе
            Дней1 = 30;//В каждом месяце ровно 30 дней
        КонецЕсли;     

        Лет2 = Год(ДатаНачалаПериода);
        Месяцев2 = Месяц(ДатаНачалаПериода);
        Если НачалоДня(ДатаНачалаПериода) <> НачалоДня(КонецМесяца(ДатаНачалаПериода)) Тогда
            Дней2 = День(ДатаНачалаПериода);
        Иначе
            Дней2 = 30;//В каждом месяце ровно 30 дней
        КонецЕсли;

        Лет = Лет1 - Лет2;
        Месяцев = Месяцев1 - Месяцев2;
        Дней = Дней1 - Дней2 + 1; //1 день на увольнение
    Иначе
        Лет = 0;
        Месяцев = 0;
        Дней = 0;
    КонецЕсли;   
КонецПроцедуры //ПолучитьСтажЗаПериод

Теги:

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

Рейтинг@Mail.ru

Поиск