Days of year - Level Extreme

Level Extreme platform

Subscription

Corporate profile

Products & Services

Support

Legal

Français

Days of year

Message

From

29/12/2005 12:29:01

29/12/2005 12:24:56

General information

Forum:

Visual FoxPro

Category:

Coding, syntax & commands

Title:

Environment versions

Visual FoxPro:

VFP 6

OS:

Windows '98

Network:

Windows 98

Database:

Visual FoxPro

Miscellaneous

Thread ID:

01081717

Message ID:

01081720

Views:

Hi,

FUNCTION NoOfDaysInYear(lnYear)
 RETURN DATE(lnYear+1,1,1) - DATE(lnYear,1,1)
ENDFUNC

lnDays = NoOfDaysInYear(2005)
?INT(lnDays/11), MOD(lnDays,11)

?!

Regards
Christian