안녕,
매개변수를 기반으로 하는 기능으로 제어 차트 블록을 생성하는 스크립트가 있으며 각 매개변수에 대한 각 보고서를 별도의 ppt 슬라이드에 저장하고 싶습니다. 도움을 주셔서 감사합니다.
차트는 다음과 같습니다.
각 매개변수 차트와 별도의 ppt 슬라이드에 대한 보고서를 갖고 싶습니다.
컨트롤 차트 스크립트가 있는 테이블이 첨부되어 있습니다.
감사해요,
토마스
추신. 그리고 Ppk가 1.33 이하인 차트만 저장할 수 있다면 정말 멋질 것 같습니다 
안녕 짐,
그것이 바로 내가 필요했던 것입니다. 감사합니다.
토마스
스크립트 맨 아래에 아래 JSL을 추가하면 원하는 것을 얻을 수 있습니다.
nw = New Window( "Control Charts",
V List Box(
obAge = Outline Box( "Control Chart for Age" ),
obWeight = Outline Box( "Control Chart for Weight" ),
obOxy = Outline Box( "Control Chart for Oxy" )
)
);
ob = Outline Box( "", hlb = H List Box() );
hlb << append( Report( gb )["Levey Jennings of Age"] );
ob2 = Outline Box( "Distributions" );
ob2 << append( Report( gb )["Age"] );
hlb << append( ob2 );
obAge << append( ob << get picture );
ob = Outline Box( "", hlb = H List Box() );
hlb << append( Report( gb )["Levey Jennings of Weight"] );
ob2 = Outline Box( "Distributions" );
ob2 << append( Report( gb )["Weight"] );
hlb << append( ob2 );
obWeight << append( ob << get picture );
ob = Outline Box( "", hlb = H List Box() );
hlb << append( Report( gb )["Levey Jennings of Oxy"] );
ob2 = Outline Box( "Distributions" );
ob2 << append( Report( gb )["Oxy"] );
hlb << append( ob2 );
obOxy << append( ob << get picture );
nw << Save Presentation( "$TEMP/jmp_example2.pptx" );
Open( "$TEMP/jmp_example2.pptx" );
nw << close window;
안녕 짐,
이것은 매우 잘 보이고 훌륭한 작업을 수행하지만 유사한 작업을 수행하면서 원래 컨트롤 차트 스크립트의 무결성을 변경하지 않고 유지하는 방법이 있습니까?
모든 차트에서 기능을 추출하고 있으므로 하나의 블록에 필요합니다.
나는 당신이 언급한 접근을 호수 JSL을 사용하여 저널을 PPT로 저장하는 방법(슬라이드당 그래프 2개) , 제어 차트 스크립트와 함께 작동하도록 해당 스크립트를 수정하는 방법이 있습니까?
감사해요,
토마스
이 질문은 이전에 요청되었습니다.다음은 내가 문제에 접근하는 방식에 대한 링크입니다.
JSL을 사용하여 저널을 PPT로 저장하는 방법(슬라이드당 그래프 2개)
다음은 원하는 출력을 생성하는 데이터를 사용하는 완전한 예입니다.
Names Default To Here( 1 );
nw = New Window( "Control Charts",
ob1 = Outline Box( "Levey Jennings of Age" ),
ob2 = Outline Box( "Levey Jennings of Weight" ),
ob3 = Outline Box( "Levey Jennings of Oxy" )
);
cc1 = Control Chart(
invisible,
Sample Label( :Name ),
KSigma( 3 ),
Chart Col(
:Age,
Levey Jennings(
Show Zones( 1 ),
Shade Zones( 1 ),
Test 1( 1 ),
Test 2( 1 ),
Test 5( 1 ),
Test 6( 1 ),
Test Beyond Limits( 1 )
),
Capability(
Distribution(
Continuous Distribution(
Column( :Age ),
Quantiles( 0 ),
Horizontal Layout( 1 ),
Vertical( 0 ),
Outlier Box Plot( 0 ),
Normal Quantile Plot( 1 ),
Process Capability(
Use Column Property Specs,
Process Capability Analysis(
Nonconformance( 0 ),
Histogram( 1, Show Within Sigma Density( 0 ) )
)
),
Customize Summary Statistics( Skewness( 1 ) )
)
)
)
)
);
cc2 = Control Chart(
invisible,
Sample Label( :Name ),
KSigma( 3 ),
Chart Col(
:Weight,
Levey Jennings(
Show Zones( 1 ),
Shade Zones( 1 ),
Test 1( 1 ),
Test 2( 1 ),
Test 5( 1 ),
Test 6( 1 ),
Test Beyond Limits( 1 )
),
Capability(
Distribution(
Continuous Distribution(
Column( :Weight ),
Quantiles( 0 ),
Horizontal Layout( 1 ),
Vertical( 0 ),
Outlier Box Plot( 0 ),
Normal Quantile Plot( 1 ),
Process Capability(
Use Column Property Specs,
Process Capability Analysis(
Nonconformance( 0 ),
Histogram( 1, Show Within Sigma Density( 0 ) )
)
),
Customize Summary Statistics( Skewness( 1 ) )
)
)
)
)
);
cc3 = Control Chart(
invisible,
Sample Label( :Name ),
KSigma( 3 ),
Chart Col(
:Oxy,
Levey Jennings(
Show Zones( 1 ),
Shade Zones( 1 ),
Test 1( 1 ),
Test 2( 1 ),
Test 5( 1 ),
Test 6( 1 ),
Test Beyond Limits( 1 )
),
Capability(
Distribution(
Continuous Distribution(
Column( :Oxy ),
Quantiles( 0 ),
Horizontal Layout( 1 ),
Vertical( 0 ),
Outlier Box Plot( 0 ),
Normal Quantile Plot( 1 ),
Process Capability(
Use Column Property Specs,
Process Capability Analysis(
Nonconformance( 0 ),
Histogram( 1, Show Within Sigma Density( 0 ) )
)
),
Customize Summary Statistics( Skewness( 1 ) )
)
)
)
)
);
ob1 << append( cc1 << get picture );
ob2 << append( cc2 << get picture );
ob3 << append( cc3 << get picture );
nw << Save Presentation( "$TEMP/jmp_example.pptx" );
Open( "$TEMP/jmp_example.pptx" );
