Il numero di colonne per le schede di indentazione nelle voci JSL è molto più grande di quanto sia necessario. Possono essere facilmente ridotti a circa 1 terzo della dimensione che sono
Eval(
Substitute(
Expr(
// Make a list of the data tables this execution of the code
// will make, so they can be closed when the output window is
// closed
__DataTableList__ = {};
// Create the initial window
__nw__ = New Window( "Product Sample", TheVLB = V List Box() );
// This is the code that will be run when the above window is closed
__nw__ << on close(
For( i = 1, i <= N Items( __DataTableList__ ), i++,
Try( Close( Data Table( __DataTableList__[i]), nosave ) )
)