I'm not sure how to do that, but you could evaluate the formula, then delete it then lock the column.
Names Default To Here( 1 );
dt = Open( "$SAMPLE_DATA/Big Class.jmp" );
dt << new column("Ratio", formula(:height/:weight));
:Ratio<<delete formula;
:Ratio << Lock( 1 );
...then in the SOP that governs data analysis say, if(caught editing formulas | caught editing data=1,"Fired")
JMP Systems Engineer, Health and Life Sciences (Pharma)