In addition to @txnelson ,
when having so many tables, you may need to organize and change them in lists, see example.
Names Default To Here( 1 );
cdt = Open( "$SAMPLE_DATA\Big Class.jmp" );
tables = cdt << Subset(
By( :age ),
All rows,
Selected columns only( 0 ),
columns( :name, :age, :height, :weight )
);
Wait( 3 );
For( i = 1, i <= N Items( tables ), i++,
write( "closing: ", tables[i] << get name , "\!n");
wait(1);
Close( tables[i], NoSave );
);
Georg