creating formula using existing column names
Names Default To Here( 1 );
dt = Current Data Table();
numcol=dt << Get Column Names(Numeric);
charcol=dt << Get Column Names( Character);
For( k = 1, k <= N Items( numcol ), k++,
colname=column(numcol[k]) <<Get Name;
dt << New Column( "site"||numcol[k],
formula(If(
:ID == "item5", (:Column( dt, colname)* 0.5) / 20,
:ID == "item8", (:Column( dt, colname) * 0.8) / 20,
:Column( dt, colname)
)
...