My launchWin window consist of interactive button boxes. However when I press the button, the window will not close. Im not sure why. I thought the button is supposed to close automatically after being clicked on
I have the below Code:
//Set the working table as the current table, pay attention to which table is at the top
dt = currentdatatable();
//Create a summary of the total aliquots in each box by BOX ID
sumdt = dt << Summary(
Group( :BOX ID ),
Sum( :Name( "# of aliquots" ) ),
Freq( "None" ),
Weight( "None" )
);
//Calculate Free Space in each box and assign to new col
col5 = sumdt << New Column("FreeSpace", Data Type (Numeric),
Formula(
96 - :Name("Sum(# of aliquots)")
)
);
//sort new table by new col
sumdt << Sort(By(:FreeSpace), Order(Descending), Replace Table);
box10 = sumdt[index(1,10), 1];
row10 = sumdt[index(1,10), 4];
close(sumdt, nosave);
launchWin = New Window( "Launcher",
<<Modal,
V List Box(
Lineup Box( N Col( 4 ), Spacing( 20 ),
//Check for Free space
Button Box( "Check Space",
New Window ("Available Spaces",
Table Box(
Number Col Box("Box ID", box10),
Number Col Box("Available Slot", row10)
)
)
),
//Cancel
Button Box( "Cancel", Throw( 1 ) )
),
)
);