Namen standardmäßig hierher (1); dt = Open("$SAMPLE_DATA/Probe.jmp"); // Verwende XPatH() und Picture Box mit Legende gb = dt << Graph Builder( Show Control Panel(0), Size(500, 9760), Variables(X(:DELW_NEMIT), Y(:DELL_RPNBR), Page(: Wafernummer), Farbe(:Prozess)), Elemente(Punkte(X, Y, Legende(5))) ); lg = (gb << XPath("//LegendBox"))[1]; lg_pic = lg << Bild abrufen; fbs = (gb << XPath("//FrameBox")) << parent; Entfernen aus (fbs, 1); // die erste hat bereits eine "echte" Legende // die Ränder müssen je nach GB-Größe angepasst werden fbs << append(Picture Box(lg_pic, << Margin(Left((gb << get size))[1]-130 ), Oben (-15), Rechts (0), Unten (0)))); // Gruppen einzeln durchlaufen, während Where() verwendet wird nw = New Window("GBs", lub = Lineup Box(N Col(1)); ); Summarize(dt, pages = by(:Wafer Number)); For Each({page}, pages, gb_page_expr = Expr( Eval(EvalExpr(gb = dt << Graph Builder( Show Control Panel(0), Size(500, 500), Variables(X(:DELW_NEMIT), Y(: DELL_RPNBR), Color(:Process), Group X(:Wafer Number)), Elements(Points(X, Y, Legend(5))), Where(:Wafer Number == Expr(page)) ))); ) ; lub << Append(gb_page_expr); // gb << Title(""); ); ((lub << Top Parent) << XPath("//TextBox[contains(text(), 'Where(:')]")) << Visibility("Collapse"); // höchstwahrscheinlich beste Idee, verwenden By() gbs = Graph Builder(Size(534, 456), Show Control Panel(0), Variables(X(:DELW_NEMIT), Y(:DELL_RPNBR), Color(:Process)), Elements(Points(X, Y , Legende(1))), By(:Wafernummer) );Write();