Suprimir Eval todas las fórmulas de columnaEstaba tratando de usar el siguiente script para suprimir eval o permitir eval para todas las fórmulas de columna en la tabla. Por alguna razón, seguí recibiendo un error (ver instantánea) la tercera vez que ejecuté el script, pero no puedo encontrar el error en particular. Agradezco la ayuda de la comunidad para depurar esto.
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>
Tabla de datossecuencias de comandosRe: Suprimir la fórmula Eval de todas las columnasEl error de sintaxis que estaba causando la falla se debió a que el
formula_suppress = dt:Formula_Suppress,
no estaba devolviendo lo que esperabas.A continuación se muestra una revisión del código que se devuelve correctamente cuando la variable de tabla no existe
names default to here(1);
dt = current data table();
if(try(isempty(dt:Formula_Suppress),1) == 1,
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>