topic How script save picture of each graph with CpK report that contains many graphs in Discussions

How script save picture of each graph with CpK report that contains many graphs

Chris21740 — Fri, 09 Jun 2023 16:59:12 GMT

Report( pc ) << save picture(
	"C:\Users\cschleigh\Desktop\EOM OQC 5-9-22\JMP\Output Images\test.jpg"
);

Hi,

JMP15, I would like to <<save picture for each graphs from a Process Capability report with multiple Process Variables, one .jpg per graph.

PC = Process Capability(
Process Variables(
:Name( "BS-Blue FWHM, Median (Pixels)" ),
:Name( "BS-Green FWHM, Median (Pixels)" ),
:Name( "BS-Blue uDOF (nm)" ),
:Name( "BS-Green uDOF (nm)" ),

...

This creates one large image with all graphs in one jpg:

Report( pc ) << save picture(
"C:\Users\cschleigh\Desktop\EOM OQC 5-9-22\JMP\Output Images\test.jpg"
);

I need separate jpgs for each.

Re: How script save picture of each graph with CpK report that contains many graphs

Georg — Fri, 13 May 2022 22:46:47 GMT

Welcome to the community!

Here is an example how this could be done.

It looks for the outline boxes that contain "Plot" in title, and save that as a picture.

Best regards

Names Default To Here( 1 );

dt = Open( "$SAMPLE_DATA/Semiconductor Capability.jmp" );
obj = dt << Process Capability(
	Process Variables( :NPN1[:lot_id, :wafer], :PNP1[:lot_id, :wafer], :PNP2[:lot_id, :wafer], :NPN2[:lot_id, :wafer], :PNP3[:lot_id, :wafer] )
);

oboxes = Report( obj ) << XPATH( "//OutlineBox" );
For Each( {obox, index}, oboxes,
	If( Contains( (obox << get title), "Plot" ),
		obox << save picture( Eval Insert( "$TEMP\^char(index)^_test.jpg" ) )
	)
);

Open( "$TEMP" );