doGraphPlot = Expr( /*****************************************************************************/ /* */ /* GRAPH PLOTS Output_1 vs Input */ /* */ /*****************************************************************************/ dt = current data table(); jjrn2 = New Window( "Data Plot - Output_1 vs Input", << Journal); dtsum = dt << Summary( Group ( :Channel ), invisible); // For( i = 1, i <= NRow ( dtsum ), i++, chnl = dtsum :Channel[i]; gb =dt << Graph Builder( where( dt :Channel == chnl ), invisible, Size( 600, 400 ), Show Control Panel( 0 ), Variables( X( Input), Y( :Output_1 ), Group X( :wafer_number), Overlay( :RowCol ) ), Elements( Smoother( X, Y, ,Lambda( 0.0001 ), Legend( 19 ) ) ) ); (gb << top Report)[TextBox(1)] << delete; //delete the where statement (gb << top Report)[LegendBox(1)] << delete; //delete the where statement report(gb)[OutlineBox(1)] << set title( EvalInsert( "Output_1 @ Channel = ^chnl^" ) ); _xx = gb << Xpath("//ScaleBox[@charID='Y']"); _xx << message; report(gb)[ScaleBox(1)] << message; _xx << Axis Settings({Min( -7 ), Max( 8 ), Inc( 1 ), Minor Ticks( 1 ), Label Row( {Show Major Grid( 1 ), Show Minor Grid( 1 )} )}); gb << Journal Window(); wait(0); gb << close window(); ); close(dtsum, NoSave); /*****************************************************************************/ /* */ /* GRAPH PLOTS Output_2 vs Input */ /* */ /*****************************************************************************/ current data table(dt ); jjrn2 = New Window( "Data Plot - Output_1 vs Input", << Journal); dtsum =dt << Summary( Group ( :Channel ), invisible); For( i = 1, i <= NRow ( dtsum ), i++, chnl = dtsum :Channel[i]; gb =dt << Graph Builder( where(::dt_testdata_ss_tx :Channel == chnl ), invisible, Size( 600, 400 ), Show Control Panel( 0 ), Variables( X( :Input ), Y( :Output_1 ), Group X( :wafer_number), Overlay( :RowCol ) ), Elements( Smoother( X, Y, ,Lambda( 0.0001 ), Legend( 19 ) ) ) ); (gb << top Report)[TextBox(1)] << delete; //delete the where statement (gb << top Report)[LegendBox(1)] << delete; //delete the where statement report(gb)[OutlineBox(1)] << set title( EvalInsert(" Output_1 @ Channel = ^chnl^" ) ); _xx = gb << Xpath("//ScaleBox[@charID='Y']"); _xx << message; report(gb)[ScaleBox(1)] << message; _xx << Axis Settings({Min( -7 ), Max( 8 ), Inc( 1 ), Minor Ticks( 1 ), Label Row( {Show Major Grid( 1 ), Show Minor Grid( 1 )} )}); gb << Journal Window(); wait(0); gb << close window(); ); close(dtsum, NoSave); /*****************************************************************************/ /* */ /* GRAPH PLOTS Output_3 vs Input */ /* */ /*****************************************************************************/ dt = current data table(); jjrn3 = New Window( "Data Plot - Output_3 vs Input", << Journal); dtsum = dt << Summary( Group ( :Channel ), invisible); For( i = 1, i <= NRow ( dtsum ), i++, chnl = dtsum :Channel[i]; gb = dt << Graph Builder( where( dt :Channel == chnl ), invisible, Size( 600, 400 ), Show Control Panel( 0 ), Variables( X( Input), Y( :Output_3 ), Group X( :wafer_number), Overlay( :RowCol ) ), Elements( Smoother( X, Y, ,Lambda( 0.0001 ), Legend( 19 ) ) ) ); (gb << top Report)[TextBox(1)] << delete; //delete the where statement (gb << top Report)[LegendBox(1)] << delete; //delete the where statement report(gb)[OutlineBox(1)] << set title( EvalInsert( "Output_3 @ Channel = ^chnl^" ) ); _xx = gb << Xpath("//ScaleBox[@charID='Y']"); _xx << message; report(gb)[ScaleBox(1)] << message; _xx << Axis Settings({Min( -7 ), Max( 8 ), Inc( 1 ), Minor Ticks( 1 ), Label Row( {Show Major Grid( 1 ), Show Minor Grid( 1 )} )}); gb << Journal Window(); wait(0); gb << close window(); ); close(dtsum, NoSave); ); doGraphPlot;