删除数据前的运行日期框在下面的脚本中，我可以删除表中的所有数据，然后才能运行数据框。
我正在尝试删除日期范围以外的任何数据。
我可以以某种方式使用模式吗？
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>
如何保持脚本直到日历框完成？
谢谢
