Hi @GregP ,
I think I understand what you want: you want a script that will delete all the columns where "Tout" is =0, is this correct? If so, this script should do it for you.
Names default to Here(1);
dt = current data table();
colnames = dt<<get column names;
delcolnames={};
For (i=1, i<=Nitems(colnames), i++,
If(Column(i)[NRows(dt)]==0,
Insert into(delcolnames, Column(i)))
);
dt<<Select Columns(delcolnames)<<Delete Columns;
Hope this helps!,
DS