刪除數據前的運行日期框在下面的腳本中，我可以刪除表中的所有數據，然後才能運行數據框。
我正在嘗試刪除日期範圍以外的任何數據。
我可以以某種方式使用模式嗎？
Thx-馬特
_____________________________________________________________
//打開並重置所有名稱，詢問日期
名稱默認為Here（1）;
dt_run = Open（“ data.jmp”）;
//等待打開
等待（0）;
dt_run <<清除行狀態；
dt_run <<清除列選擇（）;
startNW =新窗口（“開始”，
/// << Modal，////不允許腳本或用戶繼續操作，直到回答了文本框
StartDate << Max Date（Col Max（：name（“ Date”）））<< Min Date（Col Min（：Name（“ Date”）））;
StartDate =日曆框（），
按鈕盒（“確定”，
startNW <<關閉窗口；
StartDate <<設置函數（Function（{this，date}，theStartDate = StartDate << Get Date））;
）
）;
runEndDate = Expr（
endNW =新窗口（“結束”，
EndDate =日曆框（），
按鈕盒（“確定”，
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 <<選擇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>回复：刪除數據之前的運行日期框得到了刪除，如下所示。
儘管腳本會起飛並在我完成日曆框（）之前完成圖表，但仍存在相同的問題
//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>
如何保持腳本直到日曆框完成？
謝謝
