One option is to use <<Get Formula with Is Empty()
Names Default To Here(1);
dt = Open("$SAMPLE_DATA/Big Class.jmp");
col1 = dt << New Column("Ratio", Numeric, Continuous);
col1 << Formula(:height / :weight);
wait(1);
For Each({col_name}, dt << Get Column Names("String"),
col = Column(dt, col_name);
If(!Is Empty(col << get formula),
Column(dt, col_name) << Delete Formula
);
);
Scripting Index has a lot of information and you can find it directly from JMP's menu Help / Scripting Index
If you add those formulas yourself and don't really need them for formula usage, you can avoid adding them all together by using << Set Each Value()
-Jarmo