53355_en-US

liliconcom

Ho do I create a unique format for different NP charts with one script?

Hi to all,

 

I'm a rookie in JSL and need your help.

 

I created a code, that easily create an control chart and formats it in the right way. But by using more than just one processes by sample lable, the format will be changed only on the first chart. I need a code that formats all charts. I guess using eval/parse could help, but I'm not familiar with this syntax. Can anybody please explain how to use it with my code?

 

Here the code:

 

dt = Current Data Table()<<
Control Chart(NP, 
 show control limits(0),
  Dispatch(,
   "2",
   ScaleBox,
   {Min( 0 ), Max( 5.5 ), Inc( 1 ), Minor Ticks( 0 ),
   Rotated Labels( "Horizontal" )}
  ),  
  Dispatch(,
   "1",
   ScaleBox,
   {Rotated Labels( "Angled" )}
  ),
  dispatch(,
   Attributes Chart,
   FrameBox,
   {DispatchSeg( CustomStreamSeg( 2 ), {Line Color( {0, 175, 208} )} )}
  )
);

 

 

 

Thanks

Mirko

 

Re: Ho do I create a unique format for different NP charts with one script?

Did the code I included work on your system?

 

If so, can you provide a sample of your data, and the actual code you are getting an error with?

Re: Ho do I create a unique format for different NP charts with one script?Hi Jim, thanks got your reply and sorry for my late answer. Unfortunately it doesn‘t work. Now the charts will not formatted as NP charts. Also the Report(cc)[AxisBox(1)] expression creates Errors.Re: Ho do I create a unique format for different NP charts with one script?

Here is a script that I believe that if you change the values in it to your specifications, that it will give you what you want for a script that can be run against multiple columns.

Names Default To Here( 1 );
dt = Open( "$SAMPLE_DATA\Big Class.jmp" );

col = "height";
theMin = 45;
theMax = 90;
theInc = 5;
cc = dt << Control Chart(
 Sample Size( 100 ),
 KSigma( 3 ),
 Chart Col( Column( dt, col ), NP( Show Control Limits( 0 ) ) )
);
 
Report( cc )[AxisBox( 1 )] << Min( theMin ) << Max( theMax ) << inc( theInc ) << Minor Ticks( 0 ) <<
Rotated Labels( "Horizontal" );
Report( cc )[AxisBox( 2 )] << Rotated Labels( "Angled" );
Report( cc )[framebox( 1 )] << DispatchSeg( CustomStreamSeg( 2 ), {Line Color( {0, 175, 208} )} );