Dopo aver eseguito una query per creare una tabella di dati (denominata 'tbl'), ho tracciato un grafico di controllo e di Data1 vs. DATA DEL TEST. Ho esaminato le informazioni e i post dello script di guida alla guida allo script JMP: LINK1 & LINK2 , ma non riesco a capire come collegare i punti. 1) Mi piacerebbe che lo script mi inviasse una e-mail quando si verifica un test non riuscito con il nome del parametro col grafico e quale test non è riuscito per la data odierna (o solo il grafico .jpg che so già come fare) . Avrei eseguito questo script una o due volte al giorno. 2) Posso anche inviare questo test fallito # a una cella in una nuova colonna della riga di dati non riuscita della tabella corrente ('tbl')? Qualsiasi aiuto sarebbe molto apprezzato.
cc3 = tbl << Control Chart(
Sample Label( :TEST_DATE ),
Group Size( 1 ),
KSigma( 3 ),
Chart Col(
:Data1,
Individual Measurement(
Show Zones( 1 ),
Shade Zones( 1 ),
Test 1( 1 ),
Test 2( 1 ),
Test 3( 1 ),
Test 4( 1 ),
Test 5( 1 ),
Test 6( 1 ),
Test 7( 1 ),
Test 8( 1 ),
Sigma( 0.45 ),
Avg( 0.02296 ),
LCL( -1.347 ),
UCL( 1.39 )
)
),
//copied this section from another user's post & tried a few different variations
Alarm Script(
Write(
QC_Test,
",",
QC_Col,
",",
QC_Sample,
",",
QC_FirstRow,
",",
QC_LastRow,
",",
fldid,
",",
tmppartno,
",",
SessionID,
"\!N"
)
)
//end of copied section
,
SendToReport(
Dispatch(
{"Individual Measurement of Data1"},
"2",
ScaleBox,
{Format( "Fixed Dec", 10, 3 ), Min( -2 ), Max( 2 ), Inc( 0.5 ), Minor Ticks( 1 )}
),
Dispatch(
{"Individual Measurement of Data1"},
"1",
ScaleBox,
{Label Row( Label Orientation( "Angled" ) )}
),
Dispatch(
{"Individual Measurement of Data1"},
"IR Chart of IM",
FrameBox,
{Frame Size( 537, 431 ), Marker Size( 4 ), Grid Line Order( 7 ),
Reference Line Order( 8 ), Row Legend(
Sample_Name,
Color( 1 ),
Color Theme( "JMP Default" ),
Marker( 0 ),
Marker Theme( "" ),
Continuous Scale( 0 ),
Reverse Scale( 0 ),
Excluded Rows( 0 )
)}
)
)
);
Report( cc3 ) << save picture( "G:\My Drive\spc\picture.jpg" );
For Each Row(
Date = If( :TEST_Date = Today(),
If( :Name( "QC_Test" ) > 0,
Mail(
"bob@bob.com",
"SPC - Out Of Control",
"Chart has failed SPC test ",
"G:\My Drive\spc\picture.jpg"
)
)
)
);