FIX: recordscr.tcl Command to get the ids fails to do so.

TODO: use inernal tcl code to track exec ID