I believe the following script will do what you are asking. Full script with sample data table attached.
cdg = Column Dialog ("Input Columns", cols = Col List ("Columns", Min Col (1), Data Type ("Numeric")); ); for each ({i}, cdg["cols"], dt << select where (i == 0) << Hide and Exclude; );
Is the Data Filter what you're looking for (Rows...Data Filter)? Selecting the "show" and "include" checkboxes makes the hide and exclude interactive. If not, can you clarify what you need a bit more, please?