Clearing Remembered Settings in Profiler?

[#1]

I am writing a script that uses the Prediction Profiler inside of the Fit Least Squares Platform.

In particular, I am making use of the Maximize and Remember option, which saves the factor settings into the Remembered Settings Outline Box. After I save certain combinations, I want to clear out the settings. If I would be using JMP manually, I could simply go to the red triangle by "Remembered Settings" and click "Remove All". How can I do this in JSL?

I tried to read about Outline Boxes, and it seems that there's some options like "Set Menu Item State" or "Set Submenu", which might be related. However, I can't get it to work and the documentation is not extensive regarding this topic. Any help is appreciated. 

Toy code to play around:

Names Default To Here( 1 );
dt = Open( "$SAMPLE_DATA/Tiretread.jmp" );

Fit Model(
	Y( :ABRASION ),
	Effects( :SILICA, :SILANE, :SULFUR ),
	Personality( "Standard Least Squares" ),
	Emphasis( "Effect Screening" ),
	Run(
		:ABRASION << {Summary of Fit( 0 ), Analysis of Variance( 0 ),
		Parameter Estimates( 1 ), Effect Details( 0 ), Sorted Estimates( 0 ),
		Plot Actual by Predicted( 1 ), Plot Regression( 0 ),
		Plot Residual by Predicted( 1 ), Plot Studentized Residuals( 1 ),
		Plot Effect Leverage( 0 ), Plot Residual by Normal Quantiles( 0 ),
		Box Cox Y Transformation( 0 ), Profiler(
			1,
			Confidence Intervals( 1 ),
			Desirability Functions( 1 ),
		)}
	),
	SendToReport(
		Dispatch( {}, "Actual by Predicted Plot", OutlineBox, {Close( 1 )} ),
		Dispatch( {}, "Effect Summary", OutlineBox, {Close( 1 )} ),
		Dispatch( {}, "Lack Of Fit", OutlineBox, {Close( 1 )} ),
		Dispatch( {}, "Residual by Predicted Plot", OutlineBox, {Close( 1 )} ),
		Dispatch( {}, "Studentized Residuals", OutlineBox, {Close( 1 )} )
	)
);

// Get current report and profiler
current_rep = current report();
pf=current_rep["Prediction Profiler"] << get scriptable object;

// maximize and remember
pf << maximize and remember;

// clear remembered settings
// ??????

[#2]

I'm not sure if this will perform the same thing as pressing remove all

Names Default To Here(1);

dt = Open("$SAMPLE_DATA/Tiretread.jmp");

fm = dt << Fit Model(
	Y(:ABRASION),
	Effects(:SILICA, :SILANE, :SULFUR),
	Personality("Standard Least Squares"),
	Emphasis("Effect Screening"),
	Run(
		:ABRASION << {Summary of Fit(0), Analysis of Variance(0), Parameter Estimates(1),
		Effect Details(0), Sorted Estimates(0), Plot Actual by Predicted(1), Plot Regression(0),
		Plot Residual by Predicted(1), Plot Studentized Residuals(1), Plot Effect Leverage(0),
		Plot Residual by Normal Quantiles(0), Box Cox Y Transformation(0),
		Profiler(1, Confidence Intervals(1), Desirability Functions(1), )}
	),
	SendToReport(
		Dispatch({}, "Actual by Predicted Plot", OutlineBox, {Close(1)}),
		Dispatch({}, "Effect Summary", OutlineBox, {Close(1)}),
		Dispatch({}, "Lack Of Fit", OutlineBox, {Close(1)}),
		Dispatch({}, "Residual by Predicted Plot", OutlineBox, {Close(1)}),
		Dispatch({}, "Studentized Residuals", OutlineBox, {Close(1)})
	)
);

pf = Report(fm)[Outlinebox("Prediction Profiler")] << get scriptable object;

pf << maximize and remember;

Report(fm)[Outline Box("Remembered Settings")] << Delete Box;

[#3]

Hi Jarmo, thanks for the reply. Unfortunately, this solution works only to delete the box, but one cannot "bring it back" if we click maximize and remember. It seems natural that there should be a general way to click things from the dropdown menu from an outline box.