function in_touchup(win,oid) {
local exists = "no";
for (oid = oid_parent(oid); oid_valid(oid); oid = oid_parent(oid)) {
if (oid_name(oid) == "_touchup") {
exists = "yes";
}
}
# This stopped working at some upgrade somewhen. PIs got more
invisible.
# if (oid_xpath_boolean($oid,'ancestor::_touchup')) {
# exists = "yes";
# }
return exists;
}
Screen FOSI (in print, we use change bars for the "outer" _touchup, and
yellow background for the inner _touchup):
<att>
<specval attname="my_fosi::in_touchup" attloc="system-func" attval="no">
<charsubset>
<highlt fontclr="violet"></charsubset>
</att>
<att>
<specval attname="my_fosi::in_touchup" attloc="system-func" attval="yes">
<charsubset>
<highlt bckclr="FFFF00" fontclr="black"></charsubset>
</att>
<att>
--
Paul Nagai
