84977_es-ES

liliconcom

Crear variables locales que contienen listas de nombres de columna

Hola a todos, 

Necesita su ayuda para crear múltiples variables locales que contengan nombres de columnas dentro de var name.

He intentado esto pero olvídate un error.

¿Alguna sugerencia?

para (j = 1, j <= ncol (dt), j ++,
local (parse (char (nombre de columna (j)) || "clave") = Matriz asociativa (columna (j) << Obtener valores) << obtener claves));

Re: Crea variables locales que contienen listas de nombres de columnasian thx. esto es genial, luché por 2 días para resolverlo, aprecio que Re: Crea variables locales que contienen listas de nombres de columnas

DE ACUERDO. Aquí hay una forma, y estoy seguro de que habrá otras:

dt = Open( "$SAMPLE_DATA/Big Class.jmp" );

varList = {};
For( j = 1, j <= N Col( dt ), j++,
 varName = (Column(dt, j ) << getName)||"_keys";
 keys = Associative Array( Column(dt, j ) << Get Values ) << get keys;
 makeVar = Expr(LHS = RHS);
 SubstituteInto(makeVar, Expr(LHS), Parse(varName), Expr(RHS), Eval(keys));
 makeVar;
 InsertInto(varList, Parse(varName));
);
Print(varList);
Print(EvalList(varList));

Re: Crea variables locales que contienen listas de nombres de columnas

ian thx,

Mi intención es que para cada lista que fue creada por la función asociativa aray también tendrá un nombre de variable único que contenga el nombre de la columna coincidente. 

Por ejemplo: si tengo dos columnas: Entidad y Lote, obtendré dos variables locales:

 

Entitykey = {entidad1, entidad2}

Lotkey = {Lot1, Lot2} ....

Y así sucesivamente para todas las columnas de la tabla.

Re: Crea variables locales que contienen listas de nombres de columnas

No estoy seguro de que entienda su uso de 'Local ()', pero ¿está esto cerca de lo que quiere?

dt = Open( "$SAMPLE_DATA/Big Class.jmp" );

keyVarList = {};
For( j = 1, j <= N Col( dt ), j++,
 keys = Associative Array( Column( j ) << Get Values ) << get keys;
 InsertInto(keyVarList, EvalList(List(keys)));
);

for(j = 1, j <= NItems(keyVarList), j++,
 Print(keyVarList[j]);
);