468046_es-ES

liliconcom

¿Es posible agregar cuadros de edición de texto a todos los scripts en un diario usando JSL?

Hola comunidad JMP,

 

Me preguntaba si sería posible programar la generación de un diario que contenga tablas y/o figuras seleccionadas, incluido un cuadro de edición de texto para cada tabla/figura.

 

Encontré un complemento que está haciendo parte de lo que me gustaría hacer: https://community.jmp.com/t5/JMP-Add-Ins/Run-All-Table-Scripts/ta-p/42863

 

Solo estoy interesado en la opción Informe en mosaico, pero me gustaría agregar un cuadro de edición de texto para todos los scripts seleccionados porque me gustaría agregarles comentarios. Pude agregar un cuadro de edición de texto al principio y al final del diario, pero parece que no puedo averiguar (si y) cómo agregarlos para cada script. La cantidad de guiones seleccionados cambiará según la cantidad de cifras necesarias para la revista.

 

Para mis necesidades, tomé partes del complemento Run All Table Scripts que podía usar e intenté cambiarlo. Hasta ahora sin éxito. ¿Alguien tiene sugerencias sobre cómo agregar cuadros de edición de texto a todos los guiones en un diario?

 

//This script is part of the Run All Table Scripts Add-in written by nickholmes13: https://community.jmp.com/t5/JMP-Add-Ins/Run-All-Table-Scripts/ta-p/42863.

Names Default To Here( 1 );
dt = Current Data Table();
appName = "Run All Table Scripts";

If (IsEmpty(dt),
 Try(dt=Open(), Show("No data table is open so the Data Table Script Runner tool could not execute."));
);
If(IsEmpty(dt),
 Stop();
);

Wait(.5);

dtTitle = dt << Get Window Title();//Get title of data table
allScripts = dt <<GET table="" script="" names="">"||dtTitle||". Be aware that all table scripts will be run, even if they do not create reports. Also note that applications created in table scripts will always appear in a separate window. \!n",
     << Markup),
     
     Panel Box ("Which table scripts would you like to run?",
      V List Box(
       scriptsTR = Check Box(allScripts, << Set All(1)),
      ),
      H List Box(
       Button Box("Check All", scriptsTR << Set All(1)),
       Button Box ("Check None", scriptsTR << Set All(0))
      ),
      Spacer Box(Size(0,10)),
      Text Box("Report View"),
      rType = Radio Box({"Detailed", "Summary"})
     ),
     H List Box(
      Button Box ("Cancel", popup << Close Window()),
      Spacer Box(),
      Button Box ("Run",  reportView = rType << Get();
            scriptsTR = scriptsTR << Get Selected();
            onRun(reportView, scriptsTR);
            popup << Close Window())
     )
    )
   ) 
   );
 
 popup<<SET auto="" stretching=""></SET></GET>

Espero que se permita usar y cambiar el complemento provisto en el enlace anterior (no estaba bloqueado). Si no, borraré esta publicación. Créditos por ejecutar todos los scripts de tabla para: nickholmes13.

 

Gracias.

Otrosecuencias de comandosRe: ¿Es posible agregar cuadros de edición de texto a todos los scripts en un diario usando JSL?

Una opción sería editar la sentencia else dentro del bucle for en la función onRun. Vea cómo se ha construido/modificado la declaración else:

 

    If(i == 1,
     window = New Window(dtTitle || " Reports",
      <<JOURNAL></JOURNAL>

Re: ¿Es posible agregar cuadros de edición de texto a todos los scripts en un diario usando JSL?

Gracias jthi, esto es lo que estaba buscando!