I have 2 check boxes and a watcher expression in my form now. This is the rest of what I have.
{/*WATCHER EXPRESSIONS*/}
{
/*Function for SetValues Button Denies All*/
/*Function for SetValues Button Denies All*/
/*Function for SetValues Button Denies All*/
/*Function for SetValues Button Denies All*/
/*Function for SetValues Button Denies All*/
/*Function for SetValues Button Denies All*/
/*Function for SetValues Button Denies All*/
/*Function for SetValues Button Denies All*/
/*Function for SetValues Button Denies All*/
/*Function for SetValues Button Denies All*/
/*Function for SetValues Button Denies All*/
/*Function for SetValues Button Denies All*/
/*Function for SetValues Button Denies All*/
/*Function for SetValues Button Denies All*/
/*Function for SetValues Button Denies All*/
{OBSNOW("ROS GEN COMM", ListBoxResult(DOCUMENT.GENERAL,DOCUMENT.LISTBOX,DOCUMENT.MULTI_LINE1))}
{obsnow("ROS HEAD", ListBoxResult(DOCUMENT.HEAD,DOCUMENT.LISTBOX2,DOCUMENT.MULTI_LINE2))}
{obsnow("ROS EYES", ListBoxResult(DOCUMENT.EYES,DOCUMENT.LISTBOX3, DOCUMENT.MULTI_LINE3))}
{obsnow("ROS EARS", ListBoxResult(DOCUMENT.EARS,DOCUMENT.LISTBOX4,DOCUMENT.MULTI_LINE4))}
{obsnow("ROS NOSE", ListBoxResult(DOCUMENT.NOSE,DOCUMENT.LISTBOX5,DOCUMENT.MULTI_LINE5))}
{obsnow("ROSOTHERCOMM", ListBoxResult(DOCUMENT.MOUTH,DOCUMENT.LISTBOX6,DOCUMENT.MULTI_LINE6))}
{obsnow("ROS THROAT", ListBoxResult(DOCUMENT.THROAT,DOCUMENT.LISTBOX7,DOCUMENT.MULTI_LINE7))}
{obsnow("ROS NECK", ListBoxResult(DOCUMENT.NECK,DOCUMENT.LISTBOX8,DOCUMENT.MULTI_LINE8))}
{obsnow("ROS BREAST", ListBoxResult(DOCUMENT.BREAST,DOCUMENT.LISTBOX9,DOCUMENT.MULTI_LINE9))}
{obsnow("ROS RESPIRAT", ListBoxResult(DOCUMENT.RESP,DOCUMENT.LISTBOX10,DOCUMENT.MULTI_LINE10))}
{obsnow("ROS CARD COM", ListBoxResult(DOCUMENT.CARDIO,DOCUMENT.LISTBOX11,DOCUMENT.MULTI_LINE11))}
{obsnow("ROS GI COM", ListBoxResult(DOCUMENT.GI,DOCUMENT.LISTBOX12,DOCUMENT.MULTI_LINE12))}
{obsnow("ROS GU COMM", ListBoxResult(DOCUMENT.GU,DOCUMENT.LISTBOX13,DOCUMENT.MULTI_LINE13))}
{obsnow("ROS GU FEMAL", ListBoxResult(DOCUMENT.MENSTRUAL,DOCUMENT.LISTBOX14,DOCUMENT.MULTI_LINE14))}
{obsnow("ROS NEUHE", ListBoxResult(DOCUMENT.NEURO,DOCUMENT.LISTBOX15,DOCUMENT.MULTI_LINE15))}
{obsnow("ROS SKIN", ListBoxResult(DOCUMENT.SKIN,DOCUMENT.LISTBOX16,DOCUMENT.MULTI_LINE16))}
{obsnow("ROS MSK COMM", ListBoxResult(DOCUMENT.MUSCLE,DOCUMENT.LISTBOX17,DOCUMENT.MULTI_LINE17))}
{obsnow("ROS ENDO", ListBoxResult(DOCUMENT.ENDO,DOCUMENT.LISTBOX18,DOCUMENT.MULTI_LINE18))}
{obsnow("ROS ALLERG", ListBoxResult(DOCUMENT.ALLERGY,DOCUMENT.LISTBOX19,DOCUMENT.MULTI_LINE19))}
{obsnow("ROSPSYCHCOMM", ListBoxResult(DOCUMENT.MENTAL,DOCUMENT.LISTBOX20,DOCUMENT.MULTI_LINE20))}
/*FUNCTION DEFINITIONS*/
fn ListBoxResult(cstr,dstr,ostr) {
local fullStr = ""
if (size(cstr) > 0) then
fullStr = "Complains of " + cstr + ". "
endif
if (size(dstr) > 0) then
fullStr = fullstr + "Denies " + dstr + ". "
endif
if (size(ostr) > 0) then
fullStr = fullstr + ostr
endif
return fullStr
}
fn ListBoxTranslation(label,cstr,dstr,ostr) {
local fullStr = ListBoxResult(cstr,dstr,ostr)
return cfmt(fullStr, "", label + ": ", "B", "
")
}
}