Welcome to the NEW CHUG— your ultimate destination for cutting-edge insights and discussions at the intersection of healthcare and technology.

Our platform is dedicated to exploring the dynamic landscape of healthcare technology, empowering professionals, enthusiasts, and innovators alike with the knowledge and resources to navigate the rapidly evolving field.

From telemedicine revolutionizing patient care to the transformative potential of artificial intelligence in diagnostics, we delve into a myriad of topics shaping the future of healthcare delivery. Whether you’re a seasoned healthcare IT professional, an aspiring entrepreneur in the digital health space, or simply curious about the latest innovations, our curated content, expert interviews, and thought-provoking articles provide a comprehensive exploration of healthcare technology’s most pressing issues.

Join us as we navigate the forefront of innovation, driving forward the transformation of healthcare for a healthier, more connected world.

Have questions or suggestions? Please use the contact button below.

Notifications

Clear all

Date Functions

MEL, SQL, Oracle

Last Post by Anonymous 1 second ago

6 Posts

2 Users

0 Reactions

70 Views

RSS

bhoover

(@bhoover)

Posts: 360

Honorable Member

Topic starter

Hello All,

I figured I would ask before I reinvent the wheel. Has anyone developed any functions they would want to share that calculate months and/or weeks between dates in MEL?

Thanks,

Brad

Posted : March 27, 2017 7:34 am

dcarpenter

(@dcarpenter)

Posts: 323

Reputable Member

I don't have a function built, but for weeks, it is pretty easy. here is the code using DURATIONDAYS() that can translate 2 dates into weeks and days. You can put any date into the DURATIONDAYS code, including str(._TODAYSDATE) for the current day.

{tempVar = DURATIONDAYS("01/01/2016","01/27/2016")

weeks = div(tempVar,7)

days = mod(tempVar,7)

return "Weeks: " + weeks + " Days: "+ days}

You can modify the code here to check if you should put an s at the end of weeks or days, or if you don't care about the leftover days, you can only return the weeks value. Let me know if you have any questions. 🙂

Posted : March 27, 2017 12:01 pm

bhoover

(@bhoover)

Posts: 360

Honorable Member

Topic starter

Thanks! Eventually what I am going for is something like this:

Input: Date1 and Date2

Output: Between Date1 and Date2 there are x months, x weeks and x days.

Months will be the tricky part.

Posted : March 28, 2017 12:15 am

dcarpenter

(@dcarpenter)

Posts: 323

Reputable Member

Oh OK. I am curious as to what kind of dates you are comparing in this way. is a general month acceptable, or does it need to exactly line up with a Calendar (consider leap year, months with different days, etc...)

Either way, the Months will be a little trickier. ^_^ Good luck!

Posted : March 28, 2017 5:54 am

bhoover

(@bhoover)

Posts: 360

Honorable Member

Topic starter

What this is going to handle is a display for time since surgery. The providers would prefer this format over days. So date1 = date of surgery and date2 = the clinical date. I need to give them something that is accurate to the day, so I need to take into account variation in the number of days in a month and leap years.

Posted : March 29, 2017 12:51 am

bhoover

(@bhoover)

Posts: 360

Honorable Member

Topic starter

I figured I would share a bit of what I've been working on. This part is fairly simple, but if anyone needs to figure out the number of days in a month and/or if a year is a leap year you can use the following:

(Pass the function number of the month and the year)

fn fnMonthsDays(month, year)
{
COND
CASE month == "1"
return "31"
CASE month == "2"
//determine if year is leap year.
if (fnChkLeap(year) == "true") then
return "29"
else
return "28"
endif
CASE month == "3"
return "31"
CASE month == "4"
return "30"
CASE month == "5"
return "31"
CASE month == "6"
return "30"
CASE month == "7"
return "31"
CASE month == "8"
return "31"
CASE month == "9"
return "30"
CASE month == "10"
return "31"
CASE month == "11"
return "30"
CASE month == "12"
return "31"
ENDCOND
}

fn fnChkLeap(chkYear)
{
//evenly divisable by 4, but not by 100 (except if divisable by 400)

if (mod(chkYear,4) == 0) AND ((mod(chkYear,100) <> 0) OR (mod(chkYear,400) == 0)) then
return "true"
else
return "false"
endif
}

Posted : March 29, 2017 7:36 am

Share:

24 Forums
9,940 Topics
39.9 K Posts
0 Online
6,470 Members

Forum Icons: Forum contains no unread posts Forum contains unread posts

Topic Icons: Not Replied Replied Active Hot Sticky Unapproved Solved Private Closed

Powered by wpForo Powered by wpForo version 2.4.0