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

History View Looping

MEL, SQL, Oracle

Last Post by Anonymous 1 second ago

3 Posts

2 Users

0 Reactions

86 Views

RSS

jhayes

(@jhayes)

Posts: 2

New Member

Topic starter

Can anyone tell me why this code in a history view produces duplicates? (bonus: 5 fake internet points to the winner!!!)

//main impression array placeholder

local arrImp = array()

//individual line with values

local result = array()

//array to return
local Imps = array()

//var to track where to insert into new array
local insertme = 0

//get the impression history

arrImp = getfield(LIST_OBS('IMPRESSION','Signed','delimited',"value"),"|","")

//loop through the impressions keeping non-blanks and ones matching to a signer's name

for s = 1, s <= size(arrImp),s=s+1
do
result = array()

//get the list of fields in the current array item
result = getfield(arrImp[s],"^","")

//if size of value field > 0 and signee's name match the string, change whoever to something useful
if (size(result[1])>0 and match(result[4],"WHOEVER")>0) then
insertme = insertme + 1

//insert text into return array

set(Imps,insertme,hret + size(arrImp) + hret + result[2] + " " + result[3] + " - " + result[4] + hret +result[1] + hret)
else "" endif

endfor
IF (size(Imps) > 0) THEN
Imps
ELSE
""
ENDIF

Posted : October 25, 2018 6:36 am

jhayes

(@jhayes)

Posts: 2

New Member

Topic starter

Somehow that code produces text like this, in what universe? The appointments is just for reference.

Posted : October 25, 2018 7:46 am

dcarpenter

(@dcarpenter)

Posts: 323

Reputable Member

Hello,

Would you mind attaching a text-file with your history view in it, or emailing me at [email protected] directly? I tried testing your code as written in my system, but it seemed to function correctly.

Thank you,

Daniel Carpenter

Posted : October 29, 2018 9:06 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