How could I acheive a column scroll lock in a table box created by dt

Question

I use "<< get as report" to insert tabular content into my custom reports. Sometimes, this content is scrollable in the report. I'm curious how I might achieve a "scroll lock" behavior in the report. It isn't preserved when I do "<< lock(1)" to a column in the original table.

jthi · Accepted Answer

Something like this might get you going:

Names Default To Here(1);
dt = Open("$SAMPLE_DATA/Big Class.jmp");

new = new window("",
	rep = dt << get as report;
);
tb = rep[TableBox(1)];

tb << Set Scrollable(30, 4);
show(tb << Get Locked Columns);
tb << Set Locked Columns(2);
show(tb << Get Locked Columns);

<< get as report creates table box of datatable, get reference to that and then do modifications you want.