451933_fr-FR

liliconcom

Supprimer Eval toutes les formules de colonne

J'essayais d'utiliser le script ci-dessous pour supprimer eval ou autoriser eval pour toutes les formules de colonne du tableau. Pour une raison quelconque, j'ai continué à recevoir une erreur (voir instantané) lors de la troisième exécution du script, mais je ne trouve pas particulièrement le bogue. Appréciez l'aide de la communauté pour le débogage.

 

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>

 

 

 

Tableau de donnéesScriptRe : Supprimer Eval toutes les formules de colonne

L'erreur de syntaxe à l'origine de l'échec était due au fait que

formula_suppress = dt:Formula_Suppress,

ne renvoyait pas ce que vous attendiez.Vous trouverez ci-dessous une refonte du code qui revient correctement lorsque la variable de table n'existe pas

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>