Im folgenden Skript möchte ich Folgendes tun:
Basierend auf der Auswahl von TestTech möchte ich, dass die entsprechende TestStage-Kontrollkästchenliste angezeigt wird ( erscheinen wird bevorzugt, wenn nicht aktiv werden wenn alle Optionen sichtbar sein müssen).Also,
- Wenn Tech1 ausgewählt ist, sollten alle TestSages mit _Tech1 für den Benutzer zur Auswahl verfügbar sein
- Wenn Tech2 ausgewählt ist, sollten alle TestSages mit _Tech2 für den Benutzer zur Auswahl verfügbar sein. Diese Liste wird unten kommentiert
- Wenn Tech3 ausgewählt ist, sollten alle TestSages mit _Tech3 für den Benutzer zur Auswahl verfügbar sein. Diese Liste wird unten kommentiert und so weiter.
Ich möchte auch, dass die Option „Alle auswählen“ unter jeder Liste verfügbar ist.
Wie macht man das?
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>
