topic Re: Dynamically adding a Table Box to an Outline Box in Discussions

Dynamically adding a Table Box to an Outline Box

waltp — Mon, 10 Jul 2017 15:08:04 GMT

Hi,

I would like to add Table Boxes to an Outline box, but do this dynamically as the number and content of the Table Box contents change. I tried the following script as a example but Table Boxes don't even appear plus there is an error message about the hb reference in the For loop that I don't understand. Any sugestions?

Thanks,

Walt Paczkowski

================================================================

Names Default To Here( 1 );
tbLst = { Index( 1, 5 ), Index( 6, 10) };
//
dt = Open( "$SAMPLE_DATA/Big Class.jmp" );
dtM = dt << Subset( Output Table( "x" ), Columns( :sex, :height ) );
//
for( i = 1, i <= 2, i++,
	dtM << Clear Select;
	dtM << Select Rows( Eval( tbLst[ i ] ) );
	//
	hb << Append( ( dtM << Get As Report ) );
);
//
New Window( "test", Outline Box( "X", hb = H List Box( ) ) );

Re: Dynamically adding a Table Box to an Outline Box

ian_jmp — Mon, 10 Jul 2017 16:09:40 GMT

I think you are close. Is that what you want?

Names Default To Here( 1 );
tbLst = { Index( 1, 5 ), Index( 6, 10) };
//
dt = Open( "$SAMPLE_DATA/Big Class.jmp" );
dtM = dt << Subset( Output Table( "x" ), Columns( :sex, :height ) );
//
hb = H List Box( );
for( i = 1, i <= 2, i++,
	dtM << Clear Select;
	dtM << Select Rows( Eval( tbLst[ i ] ) );
	//
	hb << Append( ( dtM << Get As Report ) );
);
//
New Window( "test", Outline Box( "X", hb ) );

Re: Dynamically adding a Table Box to an Outline Box

waltp — Mon, 10 Jul 2017 16:18:05 GMT

That's exactly it!! Thanks for the help.

Walt