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

MEL/Function Help?!

MEL, SQL, Oracle

Last Post by Anonymous 1 second ago

5 Posts

3 Users

0 Reactions

80 Views

RSS

acardenas

(@acardenas)

Posts: 85

Estimable Member

Topic starter

Hello,

I had previously posted a question to see if it was possible to display the last date a specific order was ordered in a data display. I received some code that although it works, pulls in ALL the dates the specific code was ordered. Is there any one who could help me fix the code or have code to only bring in the last date this code was ordered???

This is the function I received and was using:

{ fn RetrieveOrder()

{

local arrayOrder

local i=0

local strSel="CPT-G0444"

local strOrder=""

local strRet=""

strOrder=Orders_All("delimited")

if strOrder"" then

arrayOrder=GetField(strOrder,"|","")

for i=1,i<=size(arrayOrder),i=i+1 do

arrayOrder[i]=GetField(arrayOrder[i],"^","")

if arrayOrder[i][3]==strSel then

strRet=strRet+(if strRet=="","",",")+arrayOrder[i][3]+" -- "+arrayOrder[i][4]

endif

endfor

endif

return strRet

}

}

Thank you very much for all your help in advanced! 🙂

-Alex

Posted : May 26, 2016 10:10 am

cecild

(@cecild)

Posts: 314

Reputable Member

{ fn RetrieveOrder()
{
local arrayOrder
local i=0
local strSel="CPT-G0444″
local strOrder=""
local strRet=""
local Result=""

strOrder=Orders_All("delimited")
arrayOrder=GetField(strOrder,"|","")

for i=1,i<=size(arrayOrder),i=i+1 do

arrayOrder[i]=GetField(arrayOrder[i],"^","")

if arrayOrder[i][3]==strSel then
Result=arrayOrder[i][3]+" — "+arrayOrder[i][4]
endif

endfor

if Result <> "" then
strRet=Result
endif

return strRet
}
}

Posted : May 26, 2016 10:39 am

virtualHITman

(@virtualhitman)

Posts: 319

Reputable Member

You will need to capture all occurrences of the order code you are looking for inside your loop and then pick the occurrence that has the most recent date. Try something like this inside of your loop (you will need to define a local variable to store the date):

local last_order_date = "" //initialize local variable to store order date

for i=1,i<=size(arrayOrder),i=i+1 do

arrayOrder[i]=GetField(arrayOrder[i],"^","")

if arrayOrder[i][3]==strSel then

if last_order_date == "" //first order encountered

last_order_date = arrayOrder[i][4]

else

if (DURATIONDAYS(arrayOrder[i][4],last_order_date) < 0)

last_order_date = arrayOrder[i][4]

else

//do nothing, last_order_date is more recent than this order date

endif

endif

endif

endfor

strRet= strSel +" — "+ last_order_date

return strRet

Posted : May 26, 2016 10:46 am

virtualHITman

(@virtualhitman)

Posts: 319

Reputable Member

Just want to clarify. The above code is just the "for loop" that you need to substitute in your current code. The return string should occur outside the loop since all you want returned is the last (most recent) order date. I saw Cecil's response and believe that it will work as well, however if you want to be absolutely sure that you are getting the most recent order date, you should probably compare the order dates.

Posted : May 26, 2016 11:02 am

acardenas

(@acardenas)

Posts: 85

Estimable Member

Topic starter

Thank you very much guys for all your help I got it working perfectly! 🙂

-Alex

Posted : June 2, 2016 6:14 am

Share:

24 Forums
9,940 Topics
39.9 K Posts
2 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