Closing a hidden data table when closing a figure

[#1]

I have a few hidden data tables that I only show to the user via some plots.

As they are hidden, they accumulate in memory (as many times as the user calls the function in the toolbox).

Is there a way to embed the JSL action (closing the invisible table) when the user closes the figure created?

[#2 · Accepted solution]

You can just use a On Close method like below,

dt = Open( "$SAMPLE_DATA/Big Class.jmp",private );
obj = dt << Bivariate( Y( :Weight ), X( :Height ) );
obj<<on close(close(dt,NoSave));

[#3]

There is a problem with this approach.  Closing the bivariate window occurs after the script has finished execution.  At that point the variable 'dt' may or may not exist.  This is a more robust approach:

dtName = dt << Get Name;
rep = obj << Report;
Eval(Parse(EvalInsert("\[ 	
	rep << On Close(
		Close(DataTable("^dtName^"),NoSave)
	);
]\")));