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

List box selection to count as 1 for each selected

Trading Post

Last Post by Anonymous 1 second ago

8 Posts

3 Users

0 Reactions

121 Views

RSS

Adam Daniel

(@adaniel)

Posts: 524

Prominent Member

Topic starter

I think I found the problem. I had two scoring function in two different forms in the same update. Once I changed the function name for one of the forms both seem to count properly.

Posted : November 18, 2013 1:14 am

Adam Daniel

(@adaniel)

Posts: 524

Prominent Member

Topic starter

Building a score calculation form and I have list box for 8 choices and need for each for to count as 1 when selected. Right now I can only get it to count once even with all selected. Here's the code:

if r4 <> "" then

if r4 = "Arthralgia" or "Uveitis/Iritis" or "Erythema Nodosum" or "Apthous Ulcers" or "Pyoderma Gangrenosum" or "Anal Fissure" or "Draining Fistula (eg;perianal;enterocutaneous;rectovaginal)" or "Perianal Abscess" then

score = 1

else if r4 = "Arthralgia" and "Uveitis/Iritis" then

score = 2

else if r4 = "Arthralgia" and "Uveitis/Iritis" and "Erythema Nodosum" then

score = 3

else if r4 = "Arthralgia" and "Uveitis/Iritis" and "Erythema Nodosum" and "Apthous Ulcers" then

score = 4

else if r4 = "Arthralgia" and "Uveitis/Iritis" and "Erythema Nodosum" and "Apthous Ulcers" and "Pyoderma Gangrenosum" then

score = 5

else if r4 = "Arthralgia" and "Uveitis/Iritis" and "Erythema Nodosum" and "Apthous Ulcers" and "Pyoderma Gangrenosum" and "Anal Fissure" then

score = 6

else if r4 = "Arthralgia" and "Uveitis/Iritis" and "Erythema Nodosum" and "Apthous Ulcers" and "Pyoderma Gangrenosum" and "Anal Fissure" and "Draining Fistula (eg;perianal;enterocutaneous;rectovaginal)" then

score = 7

score = 8

endif

tot_score = tot_score + score

score = 0

endif

Posted : November 18, 2013 1:14 am

gibsonmi

(@gibsonmi)

Posts: 827

Prominent Member

In a list box the results save a single string such as "Arthralgia, Uveitis/Iritis" so the same variable cannot be equal to "Arthralgia" and "Uveitis/Iritis", it can be one or the other, or contain both, but not equal to both.

Try something more like this

declare a variable to store the score and start with zero

local score = 0

if a keyword is in the result, add one to score, make as many of these in a row as you need

if match(r4,"Arthralgia")>0 then

score = score + 1

endif

if match(r4,"Uveitis/Iritis")>0 then

score = score + 1

endif

score should have your total at the end

Posted : November 18, 2013 1:54 am

Anonymous

(@Anonymous)

Posts: 0

New Member Guest

I do something similar in one of my custom forms. I use Yes/No radio buttons to calculate the Revised Cardiac Risk Index score; it works perfectly. Here's the code:

/*
Calculates the RCRI score.
*/
{
   local r1
   local r2
   local r3
   local r4
   local r5

!IF DOCUMENT.RCRI1 = "" then r1=0
     else if (DOCUMENT.RCRI1 = "Yes") then r1=1
     else if (DOCUMENT.RCRI1 = "No") then r1=0

     else ""

     endif
     endif
     endif

!IF document.rcri2 = "" then r2=0
     else if (document.rcri2 = "Yes") then r2=1
     else if (document.rcri2 = "No") then r2=0

     else ""

     endif
     endif
     endif

!IF document.rcri3 = "" then r3=0
     else if (document.rcri3 = "Yes") then r3=1
     else if (document.rcri3 = "No") then r3=0

     else ""

     endif
     endif
     endif

!IF document.rcri4 = "" then r4=0
     else if (document.rcri4 = "Yes") then r4=1
     else if (document.rcri4 = "No") then r4=0

     else ""

     endif
     endif
     endif

!IF document.rcri5 = "" then r5=0
     else if (document.rcri5 = "Yes") then r5=1
     else if (document.rcri5 = "No") then r5=0

     else ""

     endif
     endif
     endif

!document.cardio_risk = r1+r2+r3+r4+r5
}

Posted : November 18, 2013 2:16 am

Adam Daniel

(@adaniel)

Posts: 524

Prominent Member

Topic starter

Thanks!

Posted : November 18, 2013 3:32 am

Adam Daniel

(@adaniel)

Posts: 524

Prominent Member

Topic starter

Works great for the lstbox, Thanks

gibsonmi said:

In a list box the results save a single string such as "Arthralgia, Uveitis/Iritis" so the same variable cannot be equal to "Arthralgia" and "Uveitis/Iritis", it can be one or the other, or contain both, but not equal to both.

Try something more like this

declare a variable to store the score and start with zero

local score = 0

if a keyword is in the result, add one to score, make as many of these in a row as you need

if match(r4,"Arthralgia")>0 then

score = score + 1

endif

if match(r4,"Uveitis/Iritis")>0 then

score = score + 1

endif

score should have your total at the end

Posted : November 18, 2013 3:43 am

Adam Daniel

(@adaniel)

Posts: 524

Prominent Member

Topic starter

Any thought as to why the calculations will work if done once but when I go back in, It will stick on say a score of 1 and no matter what I choose even if nothing is selected the total score remains 1.

Posted : November 18, 2013 6:09 am

gibsonmi

(@gibsonmi)

Posts: 827

Prominent Member

It will update properly until you put the update on hold, then it will not work even when you change the variable? I cant think of a setup where that should happen...

My recommended setup would be something like this in the code panel -

{!document.tot_score} //declare variable

{document.tot_score = FindTotalScore(document.r4)} //set variable on change

{fn FindTotalScore(r4){

...code from above...

}}

Posted : November 18, 2013 6:37 am

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