3907_es-ES

liliconcom

Copiar scripts de una tabla de datos a otra<meta http-equiv="Content-Type" content="text/html; charset=UTF-8" />

Me gustaría poder tomar scripts almacenados en una tabla (A) y usarlos en otra tabla (B). ¿Cómo puedo hacer esto? Tendré que poder codificar esto en JSL.

Alternativamente, ¿cómo podría agregar un script que está almacenado en mi computadora (un archivo JSL) a una tabla de datos?

Esto es similar a la pregunta de otro usuario que se respondió sobre cómo agregar un script de un gráfico a una tabla. Desafortunadamente, no creo que pueda usar el comando Get Script en mi situación porque no quiero el script que hizo la tabla, quiero un script almacenado en la tabla.

¡Gracias!

katie

Re: Copiar scripts de una tabla de datos a otra

@David_Burnham A la secuencia de comandos para obtener todas las secuencias de comandos de una tabla de datos parecía faltarle una [i] en la línea 9:

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

dt2 = new table("little class");

lstScriptNames = dt << Get Table Script Names();

For (i=1,i<=NItems(lstScriptNames),i++,

    scriptName = lstScriptNames[i];

    scriptDef = dt << get table variable(scriptName);

    Eval(Parse(Eval Insert( "\[

          dt2 << New Script( "^scriptName^", ^scriptDef^ )

    ]\")));

)

Copiar scripts de una tabla de datos a otra

¡Muchos gracias!Esto funcionó.

Creo que una buena característica para agregar a JMP sería permitir que se agreguen scripts a las tablas de JMP como archivos o referencias, eliminando la necesidad de la declaración eval.

Copiar scripts de una tabla de datos a otra

Si desea copiar un script específico, puede usar el siguiente código:

 

    

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

     scriptName = "Oneway";
&nbsp;&nbsp;&nbsp;&nbsp; scriptDef = dt << get table variable(scriptName);

&nbsp;&nbsp;&nbsp;&nbsp; dt2 = new table("little class");

&nbsp;&nbsp;&nbsp;&nbsp; Eval(Parse(Eval Insert( "\[

&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; dt2 << New Script( "^scriptName^", ^scriptDef^ )

&nbsp;&nbsp;&nbsp;&nbsp; ]\")));

If you want to copy all of the scripts then you can do this:

dt = Open("$SAMPLE_DATA/Big Class.jmp");
dt2 = new table("little class");
lstScriptNames = dt << Get Table Script Names;
For (i=1,i<=NItems(lstScriptNames),i++,
&nbsp;&nbsp;&nbsp; scriptName = lstScriptNames;
&nbsp;&nbsp;&nbsp; scriptDef = dt << get table variable(scriptName);
&nbsp;&nbsp;&nbsp; Eval(Parse(Eval Insert( "\[
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; dt2 << New Script( "^scriptName^", ^scriptDef^ )
&nbsp;&nbsp;&nbsp; ]\")));
)

-David