sql_query_main = " SELECT * FROM jmpTop30WideView WHERE Product LIKE '1/2 RS' AND TestType IN ('Retest', 'Hot')";
sql_query_limits = "SELECT Property AS Variable, LSL, Target, USL FROM ProductSpecsLongView WHERE [Product] LIKE '1/2 RS' ";
sql_query_Control = "SELECT Property AS Variable, Avg, LCL, UCL FROM ControlLimitsTable WHERE [Product] LIKE '1/2 RS' ";
principale = Apri database(
"DATABASE=XXXXXXXXXXXXXX;
DRIVER={SQL Server};
PWD=%_PWD_%;
SERVER=XXX-XXXXX;
TRUSTSERVERCERTIFICATE=Sì;
UID=%_UID_%;",
query sql_main
);
limiti = Apri database(
"DATABASE=XXXXXXXXXXXXXX;
DRIVER={SQL Server};
PWD=%_PWD_%;
SERVER=XXX-XXX-XXXXX;;
TRUSTSERVERCERTIFICATE=Sì;
UID=%_UID_%;",
limiti_query_sql
);
Controllo = Apri database(
"DATABASE=XXXXXXXXXXXXXX;
DRIVER={SQL Server};
PWD=%_PWD_%;
SERVER=XXX-XXXXXX;;
TRUSTSERVERCERTIFICATE=Sì;
UID=%_UID_%;",
sql_query_Control
);
Colonna( principale, "Data e ora univoca" ) << Imposta proprietà( "Etichetta", 1 );
principale << Imposta colonne di etichette( :DataOraStampaUnico );
// Riferimenti
dtMain = main;
dtLimits = limiti;
dtControl = Controllo;
Per ogni riga( dtLimits,
variabile = dtLimits:Variabile[];
lsl = dtLimits:LSL[];
target = dtLimits:Target[];
usl = dtLimits:USL[];
Eval( Eval Expr(
Colonna( dtMain, variabile ) <<
Imposta proprietà(
"Limiti di specifica",
{LSL( Expr( lsl ) ), Target( Expr( target ) ), USL( Expr( usl ) ), Mostra limiti( 1 )}
)
));
Se(
Contiene( dtMain << Ottieni nomi di colonna, variabile ),
Colonna( dtMain, variabile ) << Imposta proprietà(
"Limiti di specifica",
{LSL( lsl ), Target( target ), USL( usl )}
)
Per ogni riga( dtControl,
variabile = dtControl:Variabile[];
Media = dtControl:Media[];
LCL = dtControl:LCL[];
UCL = dtControl:UCL[];
Eval( Eval Expr(
Colonna( dtMain, variabile ) <<
Imposta proprietà(
"Limiti di controllo",
{Media(Expr(Media)), Limite inferiore (Expr(Limite inferiore)), Limite superiore (Expr(Limite superiore)), Mostra limiti (1)}
)
));
Se(
Contiene( dtMain << Ottieni nomi di colonna, variabile ),
Colonna( dtMain, variabile ) << Imposta proprietà(
"Limiti di controllo",
{AVG(), LCL(), UCL()}
)
);
);
dtMain;