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

COND CASE & Function

MEL, SQL, Oracle

Last Post by Anonymous 1 second ago

2 Posts

2 Users

0 Reactions

74 Views

RSS

[email protected]

(@nthomasnorwalkchc-org)

Posts: 23

Eminent Member

Topic starter

Hi Everyone,

It's been a few year since I thought about any MEL related things and now I'm stuck and looking for help!

I have a form to record result values and enter when the test is next due (dropdown with intervals). I tried making a function with a case condition but I'm missing a piece and for the life of me I can't figure out what it is. I'm calling the function with a button:
{fnnextdate(DOCUMENT.Nextdue,"Obs Name")}

{fn fnnextdate(due,obs) {
local duedate = ""
duedate = (cond
case due == "3 mo" return ADDDATES(str(._TODAYSDATE),0,3,0)
case due == "6 mo" return ADDDATES(str(._TODAYSDATE),0,6,0)
case due == "1 yr" return ADDDATES(str(._TODAYSDATE),1,0,0)
case due == "2 yr" return ADDDATES(str(._TODAYSDATE),2,0,0)
case due == "3 yr" return ADDDATES(str(._TODAYSDATE),3,0,0)
case due == "5 yr" return ADDDATES(str(._TODAYSDATE),5,0,0)
case due == "10 yr" return ADDDATES(str(._TODAYSDATE),10,0,0)
else ""
endcond)

OBSNOW(obs,duedate,str(._TODAYSDATE))
end
}
}

I'm also open to recommendations on alternatives to do this. I need to determine the next dates for about a dozen tests.

Thanks!

Posted : February 26, 2020 8:44 am

Lee

(@lee-cooper)

Posts: 348

Reputable Member

Think about the keyword 'return'. It is used to exit the function, hence if a condition is met, the latter code is never executed. Instead, use a local variable to store the value for the case statement. You almost had it, replace the 'return' with 'duedate = ' and you should be fine. Also, delete the 'end' statement, it is not used in MEL proper and probably will cause issues. Instead, if you are not returning an actual value to a variable outside of the function, use 'return "" ' to avoid having a result printed in the chart note.

Posted : February 26, 2020 8:58 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