データを削除する前に日付ボックスを実行する以下のスクリプトでは、データボックスを実行する前に、テーブルのすべてのデータが削除されます。
日付範囲外のデータを削除しようとしています。
どういうわけかモーダルを使用できますか？
Thx-マット
_____________________________________________________________
//すべての名前を開いてリセットし、日付を尋ねる
デフォルトの名前はHere（1）;
dt_run = Open（ "data.jmp"）;
//オープンを待つ
wait（0）;
dt_run <<行の状態をクリア。
dt_run << Clear Column Selection（）;
startNW =新しいウィンドウ（「開始」、
/// <<モーダル、///テキストボックスが応答するまでスクリプトまたはユーザーの続行を許可しない
StartDate << Max Date（Col Max（：name（ "Date"））））<< Min Date（Col Min（：Name（ "Date"）））;
StartDate = Calendar Box（）、
ボタンボックス（「OK」、
startNW <<ウィンドウを閉じます。
StartDate << Set Function（Function（{this、date}、theStartDate = StartDate << Get Date））;
）
）;
runEndDate = Expr（
endNW =新しいウィンドウ（「終了」、
EndDate = Calendar Box（）、
ボタンボックス（「OK」、
endNW <<ウィンドウを閉じます。
runSelect;
）
）;
endDate << Max Date（Col Max（：name（ "Date"））））<< Min Date（Col Min（：Name（ "Date"）））;
EndDate << Set Function（Function（{this、date}、theEndDate = endDate << Get Date））;
）;
runSelect = Expr（
dt_run << select where（：Name（ "Date"）> theStartDate＆：Name（ "Date"） ）;
dt_run <<行選択の反転（）;
dt_run << Delete Rows（）;
再：データを削除する前に日付ボックスを実行するウィンドウコンポーネントが定義された後にStartDate行を移動すると、必要なものが得られると思います
//Open and reset all names, ask for date
Names Default To Here( 1 );
dt_run = Open( "data.jmp" );
//wait for open
Wait( 0 );
dt_run << clear row states;
dt_run << Clear Column Selection();
startNW = New Window( "Start",
<<MODAL> theStartDate & :Name( "Date" ) < theEndDate )
);
dt_run << Invert Row Selection();
dt_run << Delete Rows();</MODAL>
再：データを削除する前に日付ボックスを実行する条件付きフローを許可するようにスクリプトを修正しました。
//Open and reset all names, ask for date
Names Default To Here( 1 );
dt_run = Open( "Data_date.jmp" );
//wait for open
Wait( 0 );
dt_run << clear row states;
dt_run << Clear Column Selection();
startNW = New Window( "Start Day (note: day after date)",
<<MODAL> theStartDate & :Name( "Date" ) < theEndDate );
dt_run << Invert Row Selection();
dt_run << Delete Rows();
dt_run << Save( "date_selection.jmp" );
Close All( Data Tables, No Save );
dt_run = Open( "date_selection.jmp" );
///Graphs
New Window( "ProtoCP_Monitor - Variability Chart",
V List Box(
Variability Chart(
Y( :PV waves ),
X( :Date, :Time ),
Std Dev Chart( 0 ),
SendToReport(
Dispatch( {"Variability Chart for PV"}, "2", ScaleBox, {Min( 0 ), Max( 2 ), Inc( 0.02 ), Minor Ticks( 0 )} )
)
),
//more charts but deleted script to shorten post
)
) << Journal();
// Save and Close The Journal
Current Journal() << save Journal( "stuff.jrn" );
);
</MODAL>再：データを削除する前に日付ボックスを実行する以下に示すように、削除を実行します。
カレンダーbox（）を完了する前に、スクリプトが起動してチャートを実行するのと同じ問題
//Open and reset all names, ask for date
Names Default To Here( 1 );
dt_run = Open( "Data_date.jmp");
//wait for open
wait(0);
dt_run << clear row states;
dt_run << Clear Column Selection();
startNW = New Window( "Start Day (note: day after date)",
<<MODAL> theStartDate & :Name( "Date" ) < theEndDate );
dt_run << Invert Row Selection();
dt_run << Delete Rows();
dt_run << Save( "date_selection.jmp");
Close All( Data Tables, No Save );
);
Names Default To Here( 1 );
dt_run = Open( "date_selection.jmp");
///Graphs
New Window( "ProtoCP_Monitor - Variability Chart",
V List Box(
Variability Chart(
Y( :PV waves),
X( :Date, :Time ),
Std Dev Chart( 0 ),
SendToReport(
Dispatch(
{"Variability Chart for PV"},
"2",
ScaleBox,
{Min( 0 ), Max( 2 ), Inc( 0.02 ), Minor Ticks( 0 )}
)
)
),
//more charts but deleted script to shorten post
)<< Journal();
// Save and Close The Journal
Current Journal() << save Journal("stuff.jrn");</MODAL>
カレンダーボックスが完了するまでスクリプトを保持する方法
ありがとう
