There is Reorder Segs which might work
Names Default To Here(1);
dt = Open("$SAMPLE_DATA\Big Class.jmp");
gb = Graph Builder(
Size(534, 456),
Show Control Panel(0),
Variables(X(:height), Y(:weight)),
Elements(Points(X, Y, Legend(6)), Bar(X, Y, Legend(7))),
SendToReport(
Dispatch({}, "weight", ScaleBox,
{Label Row({Show Major Grid(1), Show Minor Grid(1)})}
)
)
);
For(blink = 1, blink < 4, blink++,
Wait(.5);
(gb << report)[FrameBox(1)] << reorder segs({4, 3, 2, 1});
);
Depending on elements you wish to move there might also be other options
-Jarmo