JMP コミュニティの皆様、こんにちは。
各表/図のテキスト編集ボックスを含む、選択した表および/または図を含むジャーナルの生成をスクリプト化できるかどうか疑問に思っていました。
私がやりたいことの一部を実行しているアドインに出くわしました: https://community.jmp.com/t5/JMP-Add-Ins/Run-All-Table-Scripts/ta-p/42863
タイル レポート オプションのみに関心がありますが、スクリプトにコメントを追加したいので、選択したすべてのスクリプトにテキスト編集ボックスを追加したいと考えています。 ジャーナルの最初と最後にテキスト編集ボックスを追加できましたが、スクリプトごとにそれらを追加する方法がわかりません。 選択されるスクリプトの量は、ジャーナルに必要なフィギュアの量に基づいて変化します。
私のニーズに合わせて、使用できる Run All Table Scripts Add-in の一部を取り、それを変更しようとしました。 これまでのところ成功していません。 ジャーナル内のすべてのスクリプトにテキスト編集ボックスを追加する方法を提案する人はいますか?
//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>上記のリンクで提供されているアドインを使用および変更できることを願っています (ロックされていませんでした)。 そうでない場合は、この投稿を削除します。 Run All Table Scripts のクレジット: nickholmes13。
ありがとう。
ありがとうjthi、これは私が探していたものです！
1 つのオプションは、onRun 関数の for ループ内の else ステートメントを編集することです。 else ステートメントがどのように構築/変更されたかを確認します。
If(i == 1,
window = New Window(dtTitle || " Reports",
<<JOURNAL></JOURNAL>
