How to obtain the day of year and the week of year in EasyLanguage

February 8th, 2023, 12:55 PM

Hello

I need help to have a way to get the number of day of the year (1-365) and also the number of week of the year (1-53) in EasyLanguage, because as I can see it seems the language doesn�t come with these 2 built-in functions and I can�t find examples about it.

About the day of year, for now the closest I�ve gotten is to work at the same time with the month of year and the day of month `Month(Date) = n1 And DayOfMonth(Date) = n2` that is a two step process that I think this could be done in a more efficient and direct way, like maybe defining a starting date of the year and adding the n days needed, to in this way to go to a specific day of the year, but I haven�t found how to cover the situation to have the year not specified, i.e. in a general way that works for any year, where for example maybe you only specify a Jan fixed date (YYYY0101) as starting point and then adding n days to that date, but this working in a general way for any year.

Anyways, this is just an idea because those who are more familiar with EasyLanguage maybe have other ways to get this and other alternatives are more than welcome.

And about the week of the year I haven�t found much information, but as with the day of the year calculation, the idea is to get this in an efficient way that keeps the logic running as smooth as possible

Thank you in advance for the help!

February 12th, 2023, 06:42 PM

Haven't tested this but this should work

Code

Var: Day(0), Week(0);

If intportion(DATE/10000) <> intportion(DATE[1]/10000) then Day = 0;
if DATE <> DATE[1] then Day = Day + 1;
If DayOfWeek(DATE) < DayOfWeek(DATE[1]) then Week = Week + 1;
If intportion(DATE/10000) <> intportion(DATE[1]/10000) then Week = 1;

February 13th, 2023, 01:03 PM

SMCJB

Haven't tested this but this should work

Code

Var: Day(0), Week(0);

If intportion(DATE/10000) <> intportion(DATE[1]/10000) then Day = 0;
if DATE <> DATE[1] then Day = Day + 1;
If DayOfWeek(DATE) < DayOfWeek(DATE[1]) then Week = Week + 1;
If intportion(DATE/10000) <> intportion(DATE[1]/10000) then Week = 1;

About the Week, it seems to work OK.

But about the Day, I can see it skips the weekends/holidays, what maybe was the purpose, but, would it be possible to take into account every calendar day of the year including weekends/holidays, where for example yesterday Sunday Feb 12, 2023 was the day 43, and today is the day 44, ...

Thank you @SMCJB for your time!

February 13th, 2023, 01:29 PM

I had assumed (incorrectly) you wanted a trading day count not a calendar day count.

Using Calendar Day makes calculating week easier. Haven't tested this but this should work

Code

Var: Day(0), Week(0);

If intportion(DATE/10000) <> intportion(DATE[1]/10000) then Day = 0;
if DATE <> DATE[1] then Day = Day + DATE - DATE[1];
Week = intportion(Day/7) + 1;

February 15th, 2023, 10:05 AM

SMCJB

Using Calendar Day makes calculating week easier. Haven't tested this but this should work

Code

Var: Day(0), Week(0);

If intportion(DATE/10000) <> intportion(DATE[1]/10000) then Day = 0;
if DATE <> DATE[1] then Day = Day + DATE - DATE[1];
Week = intportion(Day/7) + 1;

Thank you @SMCJB, but I made some tests and I see this other solution doesn't calculate the calendar day or the week number.

For example, for today Feb 15, it shows Day = 8985 and Week = 1284, so maybe it could be some consideration not applied to the calculation.

February 15th, 2023, 11:50 AM

Use Datetojulian

February 15th, 2023, 01:01 PM

Thank You @TurtleInTheSky your right need to use Datetojulian.
Problem was

Code

if DATE <> DATE[1] then Day = Day + DATE - DATE[1];

worked for most days but when the month changed (ie 1230131 to 1230201) it was adding 70 odd to the day count and not 1 etc!

This definitely works. (Have tested it).

Code

Var: DayNum(0), WeekNum(0);

if DATE <> DATE[1] then DayNum = DayNum + Datetojulian(DATE) - Datetojulian(DATE[1]);
If intportion(DATE/10000) <> intportion(DATE[1]/10000) then DayNum = dayofmonth(DATE);
WeekNum = intportion(DayNum/7) + 1;

Note I changed the variable names to avoid conflicts with reserved words.

February 16th, 2023, 03:04 PM

Now it is getting correct values.

Thank you for your time and for the help @SMCJB

How to obtain the day of year and the week of year in EasyLanguage

Discussion in EasyLanguage Programming

How to obtain the day of year and the week of year in EasyLanguage