Stavo cercando di utilizzare lo script seguente per sopprimere eval o consentire eval per tutte le formule di colonna nella tabella. Per qualche motivo, continuavo a ricevere un errore (vedi snapshot) la terza volta eseguendo lo script ma non riesco a trovare il bug in particolare. Apprezzare l'aiuto della comunità nel debug di questo.
names default to here(1);
dt = current data table();
try(formula_suppress = dt:Formula_Suppress,
dt << set table variable("Formula_Suppress",1);
formula_suppress = 1;
);
wait(0.5);
formula_suppress = abs(formula_suppress - 1);
dt << set table variable("Formula_Suppress",formula_suppress);
//show(formula_suppres);
for(i=1,i<=ncol(dt),i++,
as column(dt,i) << suppress eval(formula_suppress)
);
if(formula_suppress == 1,
status = "Suppressed",
status = "Evaluated"
);
NewWindow("Alert",
showToolbars(0),showMenu(0),BorderBox(top(15),bottom(15),left(15),right(15),
VListBox(
TextBox("Formulas in the table are " || char(status),<<SETFONTSTYLE></SETFONTSTYLE>