首先从文件dt8设置文件dt7的规格限制
dt7 = Open(path ||“ 29C.jmp”);
dt8 = Open(path ||“ 29C_Test_Limits.jmp”);
当前数据表(dt8);
对于每一行(
尝试(
评估
替代(
Expr(
列(dt7,:Test)<<设置属性(
“规格限制”,
{LSL(l),USL(u)}
)
),
Expr(l),:极限最小值,
Expr(u),:最大极限
)
)
);
);
分配规格后,我想对连续且具有规格限制的列进行功能分析。
大约有300个(测试已经完成,我不想手动选择列)
ColName1 = dt7 << GetColumnNames(数字,连续);
repWin =新窗口(“功能”,容器= V List Box());
N = N个项目(ColName1);
对于(k = 1,k <= N,k ++,
Q = dt7 << ColName1 << Get Property(“规格限制”);
usl = Q [“ USL”];
lsl = Q [“ LSL”];
如果(lsl == Empty(),k ++,
内容= V列表框(
dt7 <<处理能力(
过程变量({ColName1}),
个人详细报告(1),
能力箱图(1),
目标图(1),
目标图(0,在Sigma点内显示(1),显示Sigma整体点(0)),
{ColName1 <<过程能力分析(
整体Sigma能力(0),
不合格(0),
直方图(0))}
)
);
容器<< Append(content);
)
);
<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />阿古杜里
我认为第 8 行代码应为:
IF ( IsEmpty( lsl ), continue(),
你关心片面的限制吗?
<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />使用流程能力平台可能会更容易。 这个例子主要来自脚本索引,有一些额外的位。
它打开规格表,打开数据表,将规格保存到数据表(不必要但有用),然后将汇总报告作为数据表拉出。 不久前我写了一个脚本来使用分发平台来做到这一点,它很慢,脚本长了十倍。
名称默认为此处( 1 ) ;
dt =打开( “$SAMPLE_DATA/Cities.jmp” ) ;
dty = dt <<获取列名(数字,连续) ;
n = N 项( dty ) ;
是=表达式(过程变量() ) ; //这构造了过程能力函数内部的“过程变量”参数。
为了(一世= 1 ,一世<= n ,一世++,
插入(是, dty [一世] ) //列名,而不是名称字符串,被插入并用逗号分隔
) ;
对象=表达式( //这是一个表达式,因此它不会被评估,我们可以稍后对其进行处理
制程能力(
规格限制(进口规格限制( “$SAMPLE_DATA/CitySpecLimits.jmp” ) ) ,
规格限制对话框( “否(跳过没有规格限制的列)” ) , // 知道很方便的事情,谢谢兰开斯特博士!!
总体西格玛总结报告( 1 )
)
) ;
插入(对象,名称表达式(是) ) ; // 这是稍后,我们插入“y”,即“过程变量(列名)” show(name expr(y)) 来查看它
公关=对象<<报告; // pr 成为报告的句柄,并评估 obj
结核病=公关[表盒( 2 )] ; // 这是总结报告在能力报告中的位置
dt2=tb <<制作成数据表;
// 现在您可以开始在 dt2 上抛出您的图形脚本和自定义报告。