D3 and mvBase

 View Only

 How the get week of the month and from the year from a date

Alberto Leal's profile image
Alberto Leal posted 08-06-2021 08:24
Hy... a situation, i need to know what week of the month a date is, for example if it is the 1st week of the month, if the second week of the month, if it is the third week, fourth or fifth week of the month for a specific date, in addition of this I need to know for the same date which is the week of the year.. for example if it is the 20th week of the 21st month so on, looking at the OCONV documentation for the mask date, I found only the options for the day of the week and for quarter of the year. Does anyone have any simpler suggestions to find out this information? for now the only solution I found was to loop for the entire year and calculate this, but this is impractical, as I will have to store a "calendar" in the database

i'm using d3 linux 10.2
Manu Fernandes's profile image
PARTNER Manu Fernandes posted 08-06-2021 12:26
hi alberto,
I share the algo we use from years. 

manu 
SUBROUTINE WeekNo(WEEK, DATE)
year = OCONV(DATE, 'D4Y')
gosub calc
WEEK = int((DATE - day1) / 7) + 1
if DATE < day1 then
     year -= 1
     gosub calc
     WEEK = int((DATE - day1) / 7) + 1
end else
     if WEEK = 53 then
          year += 1
          gosub calc
          if day1 >= dd0101 then WEEK = 1 
     end 
end 
return 
*---------------------------------------
calc:
     date0101 = ICONV('01.01.' : year, 'D4.') ;* date of first january
     dd0101 = OCONV(date0101, 'DW')       ;* day of week of first january
     if dd0101 < 4 then shift = 1 else shift = 8
     day1 = date0101 - dd0101 + shift
return
​
Manu Fernandes's profile image
PARTNER Manu Fernandes posted 08-06-2021 12:45
hi,

I suppose WeekofMonth can be : 
int( oconv(date,'DD') / 7 ) + 1 ​
Alberto Leal's profile image
Alberto Leal posted 08-06-2021 12:58

Thanks Manu

It works perfectly everything, it was just everything that I needed, and with a good code I imagine that I was going to have to invoke ghosts to get to this result hahah

thanks again for your quick response...