Resizing Data Box

[#1]

Is there a way to fix/resize by user the size of the data box?
Currently the size of the box is set automatically due to the objects in the window.

dt = Open("$SAMPLE_DATA/Big Class.jmp");
New Window("A",
	H List Box(
		V List Box(dt << New Data Box(), obj = dt << Bivariate(Y(:Weight), X(:Height))),
		Spacer Box(<<size(30, 0))
	)
);

[#2]

The window size can be changed by passing the Set Window Size message to the New Window

Names Default to Here( 1 );
dt = Open( "$SAMPLE_DATA/Big Class.jmp" );
nw = New Window( "A",
	H List Box(
		V List Box(
			dt << New Data Box(),
			obj = dt <<
			Bivariate( Y( :Weight ), X( :Height ) )
		),
		Spacer Box( <<size( 30, 0 ) )
	)
);

nw << set window size( 600, 800 );

P.S.  Please use the JSL icon at the top of the Preview Window to enter JSL.  It provides the user with an easier form of the code to read and understand.

[#3]

Thank you,

I am aware of this solution.

However, I have a full-screen dashboard with a data box inside, meaning the main window is fixed in size (full-screen). I would like to adjust the size of the data box independently of the parent window.

[#4]

I am not aware of a reliable way to do that.  Others more experienced in creating Dashboards may have an answer.

[#5]

You can for example place the data box inside Scroll Box

Names Default To Here(1);
dt = Open("$SAMPLE_DATA/Big Class.jmp");
nw = New Window("A",
	H List Box(
		V List Box(
			Scroll Box(size(100, 100), dt << New Data Box()),
			obj = dt << Bivariate(Y(:Weight), X(:Height))
		),
		Spacer Box(<<size(30, 0))
	)
);

nw << set window size(600, 800);

[#6]

makes the data view smaller, but definitely no fun to work with 2 stacked scroll bars ...

[#7]

Thank  you,

Tried this solution as well

Resizing scroll box does not resize the data box.

[#8 · Accepted solution]

If that scroll box option isn't what you want, then you can try directly resizing the DataBrowserBox (disable auto stretching)

Names Default To Here(1);

dt = Open("$SAMPLE_DATA/Big Class.jmp");
nw = New Window("A",
	H List Box(
		V List Box(
			db = dt << New Data Box(), 
			obj = dt << Bivariate(Y(:Weight), X(:Height))),
			Spacer Box(<<size(30, 0))
	)
);
wait(2); // demo purposes
db << Set Auto Stretching({0, 0});
db << Set Width(300);
db << Set Height(200);

[#9]

the minimum height is given by the side panel, so maybe close it?

- and reduce the size of the header:

db << close side panels( 1 ) << close summary panels( 1 ) << Set Header Height( 20 );

[#10]

Thanks! Was looking for "close side panels". Very helpful.