Номер недели

[moid]

Какой ф-ей можно получить номер недели текущего месяца?

[Gustav]

Цитата:

Сообщение от moid

...номер недели текущего месяца?

Зависит от того, что Вы вкладываете в это понятие:
- можно конкретное число месяца поделить на 7 и округлить в нужную сторону
- а можно вычислить неделю года от конкретного числа месяца и потом из нее вычесть неделю года от первого числа этого месяца

Вы уверены, что Вам нужен именно месяц, а не год?

[MikeR]

Когда то писал что то подобное сейчас уже не помню, а посмотри для начала формочку SysDateLookup там прорисовываются на grid недели по определенному году

[Gustav]

Цитата:

Сообщение от Gustav

Зависит от того, что Вы вкладываете в это понятие:
- можно конкретное число месяца поделить на 7 и округлить в нужную сторону
- а можно вычислить неделю года от конкретного числа месяца и потом из нее вычесть неделю года от первого числа этого месяца

Я коллеге сразу предлагал сначала определиться:

static void Job11(Args _args)
{
    ;
    // ЛИБО
    info( int2str( trunc((dayOfMth(today())-1)/7) + 1 ) );

    // ЛИБО
    info( int2str( wkofyr(today()) - wkofyr(dateStartMth(today())) + 1) );
}

P.S. Дозвольте еще сюда эту темку до кучи прицепить. Может, на что сгодится. Люблю я всякие такие штучки с датами.

[Bishop]

Цитата:

Сообщение от Gustav

Я коллеге сразу предлагал сначала определиться:

static void Job11(Args _args)
{
    ;
 
    // ЛИБО
    info( int2str( wkofyr(today()) - wkofyr(dateStartMth(today())) + 1) );
}

Некорректно определяет неделю для января/конца декабря (из-за упомянутого выше стандарта ISO Week numbers).
Например, для 11.01.2010 получается -50, для 31.12.2008 = -47...

Вот "самый" правильный вариант:

// Номер недели месяца
static int wkOfMth(date _date)
{
    return (dayOfMth(_date) + dayOfWk(dateStartMth(_date)) + 5) div 7;
}

[Владимир Максимов]

Цитата:

Сообщение от Bishop

Вот "самый" правильный вариант:

Если уж Вы подняли тему более чем двухлетней давности, то неплохо бы было ознакомится со всеми статьями на эту тему

количество месяцев...

В данном случае, так и не был получен ответ на вопрос с какого дня начинать отсчет недель? С первого числа месяца? С первого понедельника месяца? С первой недели года пришедшейся на первое сило месяца? А как считать неполные недели в начале и конце месяца? Следует ли их вообще учитывать?

От того, какие правила будут приняты для расчета и будет зависеть какой именно "самый правильный" алгоритм следует использовать. Нет единого общего решения.

[moid]

В месяце есть 4 недели мне нужно узнать какая по счету текущая неделя.

[moid]

wkofyr - вот эта если кому пригодится

[Gustav]

Цитата:

Сообщение от moid

wkofyr - вот эта если кому пригодится

Ну, ёлка-палка... Она же возвращает номер недели в году! Т.е. от 1 до 52 (53).

Странно, вроде мы по-русски изъяснялись...

[fialka]

Цитата:

Сообщение от moid

Какой ф-ей можно получить номер недели текущего месяца?

так спрашивал же номер недели, а эта функция для определения номера недели с начала года...

[moid]

Ну...
Вот по русски если чё :

WeekOfMonth = (wkofyr(ToDay()) - mthofyr(ToDay())*4) + 1 ;
И получиться, то что надо...

[Gustav]

Цитата:

Сообщение от moid

WeekOfMonth = (wkofyr(ToDay()) - mthofyr(ToDay())*4) + 1 ;
И получиться, то что надо...

И чо? Сёдня типа 2-я неделя месяца? Круто! Йо!

static void Job11(Args _args)
{
    ;
    info( int2str( (wkofyr(20\02\2007) - mthofyr(20\02\2007)*4) + 1 ) );
}

Результат: 2.
Результат: 1.

[Zabr]

В Аксапте используются ISO Week numbers:

Under the ISO standard, a week always begins on a Monday, and ends on a Sunday. The first week of a year is that week which contains the first Thursday of the year, or, equivalently, contains Jan-4.

While this provides some standardization, it can lead to unexpected results -- namely that the first few days of a year may not be in week 1 at all. Instead, they will be in week 52 of the preceding year! For example, the year 2000 began on Saturday. Under the ISO standard, weeks always begin on a Monday. In 2000, the first Thursday was Jan-6, so week 1 begins the preceding Monday, or Jan-3. Therefore, the first two days of 2000, Jan-1 and Jan-2, fall into week 52 of 1999.

An ISO week number may be between 1 and 53. Under the ISO standard, week 1 will always have at least 4 days. If 1-Jan falls on a Friday, Saturday, or Sunday, the first few days of the year are defined as being in the last (52nd or 53rd) week of the previous year.

Unlike absolute week numbers, not every year will have a week 53. For example, the year 2000 does not have a week 53. Week 52 begins on Monday, 25-Dec, and ends on Sunday, 31-Dec. But the year 2004 does have a week 53, from Monday, 27-Dec , through Friday, 31-Dec.

[moid]

WeekOfMonth = (wkofyr(ToDay()) - mthofyr(ToDay())*4) + 1 ;

Результат = 1, а не 2

Или если ввести дату
WeekOfMonth = (wkofyr(28\2\2007) - mthofyr(28\2\2007)*4 + 1) ;
результат = 2

Какие у тебя проблемы не знаю

[moid]

упс... извиняюсь... запутался в датах

[oip]

Цитата:

Сообщение от moid

WeekOfMonth = (wkofyr(ToDay()) - mthofyr(ToDay())*4) + 1 ;
И получиться, то что надо...

Да ну? Сегодня какая неделя года? Восьмая. Какой месяц? Второй. 8-2*4 +1 = 1. Сейчас первая неделя февраля?

Цитата:

Сообщение от Gustav

Результат: 2.

1.

[Gustav]

Цитата:

Сообщение от oip

1.

Ага. Виноват!
Я в джобе опечатался и написал 20\07\2007, а здесь менял от руки today на литерал.
Ну, кстати, еще один тест. 20 июля - тоже явно не 2-я неделя

[Sada]

Айм сорри, но помоему должно быть 3....

[kashperuk]

То есть сейчас таки первая неделя месяца?
Оригинально. Я бы (если смотреть по Аксаптовскому календарю), сказал что сейчас 4ая неделя месяца, но судя по сообщению о ISO Week numbers - это тоже не верно

А приведите, пожалуйста, пару примеров, какие результаты вы хотите видеть для различных дат.

[oip]

Цитата:

Сообщение от Gustav

Ну, кстати, еще один тест.

Да чего тут тестировать, если с первого взгляда видно, что написана ерунда?