且构网

分享程序员开发的那些事...
且构网 - 分享程序员编程开发的那些事

Crystal Reports XI 中的正确 ISO 周编号

更新时间:2023-11-22 08:34:10

Crystal Reports 支持 DatePart-函数,它可以为您提供给定日期的 ISO 周数.

Crystal Reports supports the DatePart-function which can give you the ISO week number of a given date.

NumberVar week := DatePart("ww", date, crMonday, crFirstFourDays);

但是,Crystal Reports XI 中存在一个错误,它会在新的一年中给出错误的结果.***的解决方案可能是创建一个自己的函数 getISOWeekNumber:

However, in Crystal Reports XI there is a bug that gives erronous results round new year. The best solution is probably to create an own function getISOWeekNumber:

Function (optional DateVar d := CurrentDate)
NumberVar week := DatePart("ww", d, crMonday, crFirstFourDays);

// Correct for that CR doesn't handle the fact that the last days of a year can belong to week 1 of the next year:
if week = 53 and DatePart("ww", cDate(year(d) + 1, 1, 1), crMonday, crFirstFourDays) = 1 then
    week := 1

// A bug in CR makes DatePart return values like 9363 for days in January that belongs to the last week of the previous year.
else if week > 53 then
    week := DatePart("ww", cDate(year(d) - 1, 12, 31), crMonday, crFirstFourDays);

week;

要获取特定日期的周年",您可以使用以下函数:

To get the "week-year" of a specific date, you could then use the following function:

// Returns the year to which the ISO week of the specified date belongs.
// E.g. 2012-12-31 will return 2013, as that date belongs to week 1 of 2013.
Function (optional DateVar d := CurrentDate)

NumberVar week := getISOWeekNumber (d);

if week = 1 and month(d) = 12 then
    year(d) + 1
else if week > 10 and month(d) = 1 then
    year(d) - 1
else
    year(d);