Yep, you could do this:
Names Default To Here( 1 );
//Add a spec limit to some sample data:
dt = Open( "$Sample_data/Quality Control/Coating.jmp" );
dt:Weight << Set Property(
"Spec Limits",
{LSL( 18 ), USL( 23 ), Show Limits( 0 )}
);
//Open the control chart builder - the process capability will be opened
ccb = dt << Control Chart Builder(
Variables( Subgroup( :Sample ), Y( :Weight ) ),
Chart( Position( 1 ) ),
Show Control Panel( 0 )
);
//Find all process capability outline boxes and close them
(ccb << XPath("//OutlineBox[@helpKey='Capability Analysis']")) << Close(1)