Последний день месяца

Тема в разделе "Lotus - Программирование", создана пользователем LIGHT, 6 май 2008.

  1. LIGHT

    LIGHT Гость

    Привет всем!

    Не оходо писать сложную функцию определения последнего дня месяца, может есть что-то существующее на собаках?

    Типа @MaxDay(@Month(@Now))
     
  2. Medevic

    Medevic Что это ? :)
    Lotus team

    Регистрация:
    10 дек 2004
    Сообщения:
    3.346
    Симпатии:
    2
    Так, например:
    date := @Today;
    (@Adjust(date; 0; 1; 0; 0; 0; 0) - date) / 86400
     
  3. LIGHT

    LIGHT Гость

    Спасибо! Фунциклирует, а вот не как не могу получить макс дней в прошлом месяце, а очень нужно

    Для отчета тредуется выгребать документы прошлого месяца, т.е. так:
    Код (Text):
    MaxDay:=(@Adjust(@Today; 0; 1; 0; 0; 0; 0) - @Today) /86400;

    (OrigYesDate >= @Date(2008; (@Month(@Now))-1; 1; 0; 0; 0)) & (OrigYesDate <= @Date(2008; (@Month(@Now))-1; MaxDay; 0; 0; 0))
    Получается значение MaxDay принимает максимальное дней в текущем месяце.
     
  4. Medevic

    Medevic Что это ? :)
    Lotus team

    Регистрация:
    10 дек 2004
    Сообщения:
    3.346
    Симпатии:
    2
    Вместо @Today нужно взять дату из прошлого месяца.

    Прошлый месяц берешь неправильно. Если сейчас январь, то предыдущий месяц какой у тебя получится? Используй @Adjust.

    И вообще не проще ли проверить только год и месяц?
    Код (Text):
    date := @Adjust(@Today; 0; -1; 0; 0; 0; 0);
    @Year(OrigYesDate) = @Year(date) & @Month(OrigYesDate) = @Month(date)
     
Загрузка...

Поделиться этой страницей