Agregar una etiqueta a una columna (pero sin eliminar las etiquetas existentes)Normalmente, cuando uso etiquetas, solo quiero agregarlas a una columna. Sin embargo, agregar una de esta manera...
dtTag:my_column << Set Property( Tags, {"New Tag"} );
... sobrescribirá cualquier etiqueta existente en la columna. ¿Existe alguna forma sencilla de agregar una etiqueta en JSL sin eliminar ninguna etiqueta existente? Podría obtener primero las etiquetas de la columna y luego modificar la lista de etiquetas que asigno, pero quiero saber si hay una forma más simple.
Automatización y secuencias de comandosRe: Agregar una etiqueta a una columna (pero sin eliminar las etiquetas existentes)No encuentro ninguna forma integrada de añadir una etiqueta fácilmente. Tendría que definir una función para ello.
Names Default To Here( 1 );
add_tag = Function( {col, tag_name, this_dt = Current Data Table()},
og_tags = Column( this_dt, col ) << Get Property( "Tags" );
Column( this_dt, col ) << Set Property( "Tags", Eval( If( Is Empty( og_tags ), {}, og_tags ) || Eval List( {tag_name} ) ) );
);
//demo
dt = Open( "$SAMPLE_DATA/Big Class.jmp" );
add_tag( "name", "cheeses", dt );
Wait( 1 );
add_tag( "name", "weirdness" );
Show( dt:name << Get Property( "Tags" ) ); //dt:name << Get Property("Tags") = {"cheeses", "weirdness"};
<BR />
