Thanks Jim. I adapted the example script in the Scripting Index for "Make Column Switch Handler" and this code seems to work for what I was looking for:
dt = Open( "$SAMPLE_DATA/Process Measurements.jmp" );
gb = Graph Builder( Variables( Y( :Process 1 ) ), Elements( Histogram( Y, Legend( 3 ) ) ) );
dt << Clear Column Selection();
columnSwitcher = gb << Column Switcher(
:Process 1,
{:Process 1, :Process 2, :Process 3, :Process 4, :Process 5, :Process 6, :Process 7}
);
dt << Set Label Columns();
dt << Set Label Columns( :Process 1 );
pre = Function( {currentColumn, nextColumn, switcher},
Print(
"Before switch: " || (currentColumn << get name) || " >> " || (nextColumn << get name) ||
" [Column Switcher] current: " || (columnSwitcher << Get Current)
);
currentColumn << Label( 1 );
);
post = Function( {previousColumn, currentColumn, switcher},
Print(
"After switch: " || (previousColumn << get name) || " >> " || (currentColumn << get name) ||
" [Column Switcher] current: " || (columnSwitcher << Get Current)
);
previousColumn << Label( 0 );
currentColumn << Label( 1 );
);
handler = columnSwitcher << Make Column Switch Handler( pre, post );