I think these lines will do it.
You also could have done this interactively as @KarenC mentioned, and than have a look to the result table script, it tells you how it works.
Names Default To Here( 1 );
dt = Open( "$SAMPLE_DATA/Quality Control/Flight Delays.jmp" );
obj = dt <<
Model Driven Multivariate Control Chart(
Process( :AA, :CO, :DL, :F9, :FL, :NW, :UA, :US, :WN ),
T Square Plot(
Contribution Proportion Plot for Selected Samples( {24} )
)
);
// get reference to the 4th table box (with limit summaries)
// perhaps you have to try which is the right one, xpath can help
tb = (obj << Xpath("//TableBox"))[4];
// and save it
tb << Make Into Data Table;
Georg