415358_it-IT

liliconcom

Come aggiungere un report dalla tabella dati A seguito da un altro report dalla tabella dati B tramite ciclo For

Ho due tabelle di dati diverse, A e B. C'è una colonna in ogni tabella di dati che ha una variabile simile.

Creo un sottoinsieme da ogni tabella dati A e B per colonna che ha una variabile simile utilizzando un ciclo For separato per creare un report della tabella e aggiungerlo in una nuova finestra.

Ho notato che tutti i report delle tabelle creati dalla tabella dei sottoinsiemi di dati A vengono aggiunti in una nuova finestra e seguiti da tutti i report delle tabelle dalla tabella dei sottoinsiemi di dati B.

Ciò che voglio è aggiungere un report tabellare dalla tabella dei dati del sottoinsieme A seguito dal report tabellare dalla tabella dei dati del sottoinsieme B per ogni livello di variabile.

Come dovrei scrivere il codice?

Per illustrare questo concetto, utilizzo come esempio il set di dati Big Class e Big Class Families.

dt1 = Open( "$SAMPLE_DATA/Big Class.jmp" );
dt2 = Open( "$SAMPLE_DATA/Big Class Families.jmp" );

vb = V List Box();
listdt1 = {};
listdt2 = {};
coldt1 = Column (dt1, "age");
coldt2 = Column (dt2, "age");
colleveldt1 = Associative Array(coldt1) << Get Keys;
colleveldt2 = Associative Array(coldt1) << Get Keys;

For (i=1, i <=N Items(colleveldt1), i++,
	dt1row = dt1 << Get Rows Where(:age == colleveldt1[i]);
	listdt1[i] = dt1 << Subset(Rows(dt1row));
	tb = listdt1[i]<< Get As Report;
	vb << Append (Table Box(tb));

);
	
For (i=1, i <=N Items(colleveldt2), i++,
	dt2row = dt2 << Get Rows Where(:age == colleveldt2[i]);
	listdt2[i] = dt2 << Subset(Rows(dt2row));
	tb = listdt2[i]<< Get As Report;
	vb << Append (Table Box(tb));
	
	
);

New Window("Report", vb);

Personalizzazione di massaRe: Come aggiungere un report dalla tabella dati A seguito da un altro report dalla tabella dati B fino al ciclo For

Un semplice spostamento della JSL ti dà quello che vuoi

Names Default To Here( 1 );

dt1 = Open( "$SAMPLE_DATA/Big Class.jmp" );
dt2 = Open( "$SAMPLE_DATA/Big Class Families.jmp" );

vb = V List Box();
listdt1 = {};
listdt2 = {};
coldt1 = Column (dt1, "age");
coldt2 = Column (dt2, "age");
colleveldt1 = Associative Array(coldt1) << Get Keys;
colleveldt2 = Associative Array(coldt1) << Get Keys;

For (i=1, i <=N Items(colleveldt1), i++,
 dt1row = dt1 << Get Rows Where(:age == colleveldt1[i]);
 listdt1[i] = dt1 << Subset(Rows(dt1row),invisible);
 tb = listdt1[i]<< Get As Report;
 vb << Append (Table Box(tb));
dt2row = dt2 << Get Rows Where(:age == colleveldt2[i]);
 listdt2[i] = dt2 << Subset(Rows(dt2row),invisible);
 tb = listdt2[i]<< Get As Report;
 vb << Append (Table Box(tb));
);

New Window("Report", vb);

Re: Come aggiungere un report dalla tabella dati A seguito da un altro report dalla tabella dati B tramite il ciclo ForGrazie.