Номер недели

[kashperuk]

А если вот так?
Может и околесица, но вроде результаты совподают с (моими, во всяком случае) ожиданиями

static void Job17(Args _args)
{
    int         fullWeeks;
    transDate   curDate;
    ;

    curDate = SystemDateGet();
//    curDate = mkDate(02, 04, 2007);
    fullWeeks = (dayOfMth(curDate) - dayOfWk(curDate) - dayOfWk(dateStartMth(curDate))) / 7;
    //full weeks can be negative ;)

    info(strFmt("Номер недели месяца - %1", fullWeeks + 2));
}