Hola a todos,
Estoy intentando recorrer un script de Proces Screener que crea el elemento de informe "Gráficos seleccionados".Necesito que sea flexible ya que la cantidad de respuestas en el evaluador puede cambiar con el tiempo.Así que intenté poner este bucle para cambiar el formato de eje de los gráficos, pero lamentablemente no funciona.
SendToReport(
Dispatch( {}, "", TableBox, {Sort By Column( 2, 1 )} ),
Dispatch( {}, "Charts as Selected", OutlineBox, {Close( 1 )} ),
For( i = 1, i <= 422, i++,
Dispatch(
{"Charts as Selected"},
"1",
ScaleBox(i),
{Format( "m/d/y", 10 ), Min( 3784397666.7875 ), Max( 3787415686.74375 ), Interval( "Week" ), Inc( 1 ), Minor Ticks( 6 ),
Label Row( {Label Orientation( "Perpendicular" ), Show Major Grid( 1 )} )}
),
Dispatch( {"Charts as Selected"}, "ProcessScreening Graph As Selected", FrameBox( i ), {Frame Size( 602, 255 )} ),
)
)esta es una sección de código que muestra la repetición que estoy intentando recorrer
SendToReport(
Dispatch( {}, "", TableBox, {Sort By Column( 2, 1 )} ),
<STRONG>Dispatch({"Charts as Selected"},
"1",
ScaleBox,
{Min( 3784397666.7875 ), Max( 3787415686.74375 ), Interval( "Week" ), Inc( 1 ), Minor Ticks( 6 ),
Label Row( {Label Orientation( "Perpendicular" ), Show Major Grid( 1 )} )}
),
Dispatch( {"Charts as Selected"}, "ProcessScreening Graph As Selected", FrameBox, {Frame Size( 602, 255 )} ),
Dispatch(
{"Charts as Selected"},
"1",
ScaleBox( 2 ),
{Min( 3784397666.7875 ), Max( 3787415686.74375 ), Interval( "Week" ), Inc( 1 ), Minor Ticks( 6 ),
Label Row( {Label Orientation( "Perpendicular" ), Show Major Grid( 1 )} )}
),</STRONG><BR /><STRONG> Dispatch( {"Charts as Selected"}, "ProcessScreening Graph As Selected", FrameBox( 2 ), {Frame Size( 602, 255 )} ),</STRONG>¡Cualquier orientación sería apreciada!
esteban
Sin saber lo que realmente está intentando hacer, le sugeriría que los modifique después de realizar las selecciones obteniendo referencias a esos ejes (cuadros de escala) usando << XPath y luego modificando esa lista enviando mensajes a esa lista.
Names Default To Here(1);
dt = Open("$SAMPLE_DATA/Semiconductor Capability.jmp");
obj = dt << Process Screening(
Process Variables(Column Group("Processes")),
Grouping(:SITE),
Control Chart Type("Indiv and MR"),
Show Charts as Selected(1),
RowStates([0 1, 171 1, 245 1])
);
scs = Report(obj) << XPath("//ScaleBox");
xaxis_idx = 2::N Items(scs)::3;
scs[xaxis_idx] << Min(-100) << Max(400) << Inc(100) << Inc(100) << Minor Tics(2);
Gracias @jthi !!
Eso funcionó muy bien.Terminé agregando mis cosas así:
scs = Report(psobj) << XPath("//ScaleBox");
xaxis_idx = 2::N Items(cnames)::3;
scs[xaxis_idx] << Min(3784397666.7875) << Max(3787415686.74375) << Interval( "Week" ) << Inc( 1 ) << Minor Ticks( 6 )<
