217828_fr-FR

liliconcom

Ajouter plusieurs colonnes par scripts

Bonjour,

Je me demande d'ajouter plusieurs colonnes sur la table de données définie. Si la colonne a déjà existé, le script pourrait ignorer la colonne et continuer à ajouter les autres si elles n'existaient pas jusqu'à l'implémentation.

J'ai écrit un script ici. Mais le problème est que même la colonne existait, le script ajoute toujours une colonne dupliquée dans la table de données. Pourriez-vous aider à résoudre ce problème ? Appréciez-le !

Names Default To Here( 1 );
dt0 = Current Data Table();


tnames = dt0 << Get Column Names;
n = N Items( tnames );


For( i = 1, i <= n, i++,
 If( (tnames[i] ==  Char("CpK<1.0") ),
  judA = 0,
  judA=1
 );
 If( (tnames[i] == Char("1.0<=CpK <1.33") ),
  judB = 0,
  judA=1
 );
 If( (tnames[i] == Char("1.33<=CpK<1.67") ),
  judC = 0,
  judC=1
 );
 If( (tnames[i] ==  Char("1.67<=CpK<2.0") ),
  judD = 0,
  judD=1
 );
 If( (tnames[i] == Char("CpK>=2.0") ),
  judE = 0,
  judE=1
 );
);

If( judA == 1,
 dt0 << New Column( "CpK<1.0", numeric, formula( If( :Cpk < 1, 1, 0 ) ), EvalFormula ),
);
If( judB == 1,
 dt0 << New Column( "1.0<=CpK <1.33", numeric, formula( If( 1 <= :Cpk < 1.33, 1, 0 ) ), EvalFormula ),
);
If( judC == 1,
 dt0 << New Column( "1.33<=CpK<1.67", numeric, formula( If( 1.33 <= :Cpk < 1.67, 1, 0 ) ), EvalFormula ),
);
If( judD == 1,
 dt0 << New Column( "1.67<=CpK<2.0", numeric, formula( If( 1.67 <= :Cpk < 2, 1, 0 ) ), EvalFormula ),
);
If( judE == 1,
 dt0 << New Column( "CpK>=2.0", numeric, formula( If( :Cpk >= 2, 1, 0 ) ), EvalFormula ),
);

Re : Ajouter plusieurs colonnes par scripts

Merci beaucoup Vince !Ça marche.

Re : Ajouter plusieurs colonnes par scripts

Vous pourriez faire quelque chose comme ça.

 

Names default to here(1);
dt = open("$SAMPLE_DATA\Big Class.jmp");
dt << New Column("Cpk", Set Each Value(random normal(1, 1)));
dt << New Column("1.0<=CpK <1.33", Set Each Value(0));

col_names = dt << Get column names(string); // this is your existing columns

//I would just do a not contains which checks where an item is in a list, returning 0 if it doesn't
if(!Contains(col_names, "CpK<1.0"), 
 dt << New Column( "CpK<1.0", numeric, 
  formula( 
   // you also don't have to do the if(thing, 1, 0) :Cpk < 1 will resolve to 1 and 0 anyway
   :Cpk < 1
  )
 )
);
// this one shouldn't get remade
if(!Contains(col_names, "1.0<=CpK <1.33"), 
 dt << New Column( "1.0<=CpK <1.33", numeric, formula( 1.0<=:Cpk <1.33 ))
);

if(!Contains(col_names, "1.33<=CpK<1.67"), 
 dt << New Column( "1.33<=CpK<1.67", numeric, formula( 1.33<=:Cpk <1.67 ))
);

if(!Contains(col_names, "1.67<=CpK<2.0"), 
 dt << New Column( "1.67<=CpK<2.0", numeric, formula( 1.67<=:Cpk <2 ))
);

if(!Contains(col_names, "CpK>=2.0"), 
 dt << New Column( "CpK>=2.0", numeric, formula( 2.0<=:Cpk ))
);

Vous pouvez également l'abstraire un peu afin de ne pouvoir modifier qu'une seule structure de données et cela modifierait vos champs.  

//But I would probably do it another way
Names default to here(1);
dt = open("$SAMPLE_DATA\Big Class.jmp");
dt << New Column("Cpk", Set Each Value(random normal(1, 1)));
dt << New Column("1<=Cpk<1.33", Set Each Value(0));
col_names = dt << Get column names(string); // this is your existing columns

//I'd make a 2 col matrix with low and high check then make the columns dynamically
cpk_check = [. 1, 1 1.33, 1.33 1.67, 1.67 2, 2 .];
for(i=1, i<=nrows(cpk_check), i++, 
 low = cpk_check[i, 1];
 high = cpk_check[i, 2];

 if(!ismissing(low), 
  if(!ismissing(high), 
   col_name = char(low) || "<=Cpk<" ||char(high);
   f = EvalExpr(Expr(low)<=:Cpk<EXPR></EXPR>

 

Re : Ajouter plusieurs colonnes par scriptsMerci Thierry! Alors comment régler ce problème ?Re : Ajouter plusieurs colonnes par scriptsSalut,
Le problème est dans la boucle où vos 5 interrupteurs judA - judE sont réévalués pour chaque colonne. Ainsi, lorsque vous avez parcouru les n colonnes existantes, l'état de tous vos commutateurs est défini sur la dernière colonne.