Hola, estaba intentando automatizar el paso de exportación usando JSL, estoy usando la función Guardar presentación pero no pude hacerlo funcionar. El archivo .png se crea en mi computadora pero no se puede abrir debido a un "tipo de archivo no compatible". Tengo entendido que la función Guardar presentación no convirtió el archivo Graph Builder a un archivo PNG antes de guardarlo como un archivo .jpg. ¿Hay alguna manera de solucionar esto? ¡Gracias!
Names Default To Here(1);
MyGraph = Function({yCol}, {default local},
vars = Eval Expr(Variables(
X(:Test Stage),
Group X(:Temperature)
));
pts = Expr(Box Plot(X));
For(j = 1, j <= Min(8, N Items(yCol)), j++,
Insert Into(vars, Eval Expr(Y(Expr(yCol[j]),Position( 1 ))));
);
gb = Expr(
Graph Builder(
Size(1255, 981),
Show Control Panel(0),
// Variables section will be inserted here
Elements(Box Plot(X, Y(1), Y(2), Y(3), Y(4), Y(5), Y(6), Y(7), Y(8))),
Local Data Filter(
Add Filter(
columns(:Test Stage, :Sublot, :Temperature, :Soft Bin),
Display(:Test Stage, N Items(4)),
Display(:Soft Bin, N Items(15))
)
)
)
);
Insert Into(gb, Name Expr(vars));
// Save graph to a PNG file
png_path = "box_plots.png";
gb << Save Presentation("boxplot.png");
Return(gb);
);
dt = Current Data Table();
graph = MyGraph(::yColName);
New Window("My report",
VListBox(
graph,
HCenter Box(
btn = Button Box("show distribution")
)
)
);
btn << setScript(
My Histograms()
);
Descubrí que debería usar la función "guardar imagen", ya está resuelto.
