cancel
Showing results for 
Show  only  | Search instead for 
Did you mean: 
Try the Materials Informatics Toolkit, which is designed to easily handle SMILES data. This and other helpful add-ins are available in the JMP® Marketplace
Choose Language Hide Translation Bar
LiPav
Level II

Close All Like This

Hi,

 

In JSL, I create a Control Chart Builder, which consists of couple of charts and limit summaries. I would like to close all Limit summaries (Outline Boxes) automatically in JSL in the same fashion as when using "Close All Like This" (the option available with the right click on the Outline Box). Is there a way for it in JSL? 

 

I have found Show Limit Summaries (0), but it unable to open Limit Summaries on the Chart.

 

I use JMP 16.2 on Windows.

 

Thanks!

Li

Li Pavlov
1 ACCEPTED SOLUTION

Accepted Solutions
jthi
Super User

Re: Close All Like This

One way of doing this might be going with example found from scripting index. Searching for close all like this gives this example:

Names Default To Here(1);
dt = Open("$SAMPLE_DATA/Big Class.jmp");
fm = dt << Run Script("Fit Model");
r = fm << Report;
Wait(2);
r["Least Squares Means Table"] << Close All Like This;

Then a bit tinkering around with control chart builder script:

Names Default To Here(1);
dt = Open("$SAMPLE_DATA/Quality Control/Coating.jmp");
cc = dt << Control Chart Builder(Variables(Subgroup(:Sample), Y(:Weight)), By(:Pin));
rep = cc << Report;
wait(1);
rep[1]["Weight Limit Summaries"] << Close All Like This;

Using rep[1] because in the example I'm using By and it creates multiple control charts. Also do note that the name of outline box will change depending on the column used.

-Jarmo

View solution in original post

1 REPLY 1
jthi
Super User

Re: Close All Like This

One way of doing this might be going with example found from scripting index. Searching for close all like this gives this example:

Names Default To Here(1);
dt = Open("$SAMPLE_DATA/Big Class.jmp");
fm = dt << Run Script("Fit Model");
r = fm << Report;
Wait(2);
r["Least Squares Means Table"] << Close All Like This;

Then a bit tinkering around with control chart builder script:

Names Default To Here(1);
dt = Open("$SAMPLE_DATA/Quality Control/Coating.jmp");
cc = dt << Control Chart Builder(Variables(Subgroup(:Sample), Y(:Weight)), By(:Pin));
rep = cc << Report;
wait(1);
rep[1]["Weight Limit Summaries"] << Close All Like This;

Using rep[1] because in the example I'm using By and it creates multiple control charts. Also do note that the name of outline box will change depending on the column used.

-Jarmo