다음 스크립트에서는 다음을 수행하고 싶습니다.
TestTech 선택에 따라 적절한 TestStage 확인란 목록이 나타나기를 원합니다( 나타나다 바람직하지 않다면 활발해지다 모든 옵션을 표시해야 하는 경우).그래서,
- Tech1을 선택한 경우 _Tech1이 포함된 모든 TestSage를 사용자가 선택할 수 있어야 합니다.
- Tech2를 선택한 경우 _Tech2가 포함된 모든 TestSage를 사용자가 선택할 수 있어야 합니다. 이 목록은 아래에 설명되어 있습니다.
- Tech3을 선택한 경우 _Tech3이 포함된 모든 TestSages를 사용자가 선택할 수 있어야 합니다. 이 목록은 아래에 설명되어 있습니다.
또한 각 목록 아래에서 "모두 선택" 옵션을 사용할 수 있기를 바랍니다.
어떻게 해야 하나요?
Names Default To Here( 1 );
Clear Log ();
listInd = {};
returned2 = {};
win = New Window( "Select Tech & TestStage", << modal,
V List Box (
tb1=Text Box("Select Tech", << set font style("bold")),
cb1 = List Box(
{"Tech1", "Tech2", "Tech3"},
returned1 = (cb1 << Get Selected());
listInd= cb1 << Get Selected Indices;
),
tb1=Text Box("Select one or more TestStage", << set font style("bold")),
cb2 = Check Box(
{"Sage1_Tech1", "Sage2_Tech1", "Sage3_Tech1", "Sage4_Tech1", "Sage5_Tech1", "Sage6_Tech1"},
//{"Sage1_Tech2", "Sage2_Tech2", "Sage3_Tech2", "Sage4_Tech2", "Sage5_Tech2", "Sage6_Tech2"},
//{"Sage1_Tech3", "Sage2_Tech3", "Sage3_Tech3", "Sage4_Tech3", "Sage5_Tech3", "Sage6_Tech3"},
returned2 = (cb2 << Get Selected());
),
tb3=Text Box("Query TestDate (last 6 months selected by default)", << set font style("bold")),
end_date = Today();
start_date = Date Increment(end_date, "month", -6, "actual");
cb3 = H List Box(
Text Box("From:"),
scal = Number Edit Box(
start_date,
<<SET format=""></SET>