This will most definitely require error-handling and some checks but basic idea could be: use XPath to find outlineboxes with helpkey attribute and then get scriptable object from those and then send the message.
Names Default To Here(1);
obs = (Current Report() << XPath("//OutlineBox[@helpKey]"));
objs = obs << Get Scriptable Object;
objs[1] << Save Script to Data Table;
There might also be better messages than << Save Script to Data Table (Save Script for All Objects or Save Script for All Objects To Data Table)
-Jarmo