Save Summaries for multiple graphs in one report using JSL

DerekMoore

I have a report which I run that spits out anywhere between 2 and 26 graphs into a report tab so they can all be viewed at one time, in one tab. I'd like to find a way get it to export the Save Summaries for all of the graphs in the report using JSL. At the current time, I just CTRL + click the button in the attached image and it exports everything I need into many data tables.

 

Is there a way I can force JMP to pull the Save Summaries on a report just using JSL? Pulling the summaries into data tables one by one would be fine. All of the other examples that I have seen include assigning the Control Chart Builder to an object, then saving those summaries. I would prefer not to do that but can if that's my only option.

 

Thanks!

SaveSummaries.png

jthi

Below are three suggestions in the order I would try them.

 

You could try scripting Make Combined Data table

 

Names Default To Here(1);

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

nw = New Window("Charts",
	For(i = 1, i <= N Row(dt), i++,
		name = dt:Name[i];
		obj = dt << Control Chart Builder(
			Variables(Y(:height, :weight)),
			Show Control Panel(0),
			SendToReport(
				Dispatch(
					{},
					"graph display 1 title",
					TextEditBox,
					{Set Text(name || " Individual & Moving Range chart of height")}
				)
			)
		);
	)
);

dt_summaries = nw["Control Chart Builder", "height Limit Summaries", Table Box(1)] << Make Combined Data Table;

Or you could store references to those control chart builders during loop and then loop again with Save Summaries (you should most likely save values inside the loop and then close the tables):

 

 

Names Default To Here(1);

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

ccb_list = {};

nw = New Window("Charts",
	For(i = 1, i <= N Row(dt), i++,
		name = dt:Name[i];
		obj = dt << Control Chart Builder(
			Variables(Y(:height, :weight)),
			Show Control Panel(0),
			SendToReport(
				Dispatch(
					{},
					"graph display 1 title",
					TextEditBox,
					{Set Text(name || " Individual & Moving Range chart of height")}
				)
			)
		);
		Insert Into(ccb_list, obj);
	);
);

For(i = 1, i <= N Items(ccb_list), i++,
	dt_temp = ccb_list[i] << Save Summaries;
	show(dt_temp); 
	//Close(dt_temp, no save);
);

Or you can use XPath to get the references (and them I would again loop to avoid opening too many tables)

 

 

Names Default To Here(1);

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

nw = New Window("Charts",
	For(i = 1, i <= N Row(dt), i++,
		name = dt:Name[i];
		obj = dt << Control Chart Builder(
			Variables(Y(:height, :weight)),
			Show Control Panel(0),
			SendToReport(
				Dispatch(
					{},
					"graph display 1 title",
					TextEditBox,
					{Set Text(name || " Individual & Moving Range chart of height")}
				)
			)
		);
	);
);

//((nw << XPath("//OutlineBox[text()='Control Chart Builder']")) << get scriptable object) << Save Summaries;

If the << save summaries does open more than one table, you might have to use something like Get Data Table List(); to see which are the new ones, handle them and then close them.