首先從文件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 上拋出您的圖形腳本和自定義報告。