Names Default To Here( 1 );
dt = Current Data Table();
colNames = dt << get column names( string, character );
// Just loop across the colNames list and remove the column
// names that you don't want
For( i = N Items( colNames ), i >= 1, i--,
If( Contains( colNames[i], "Sold or not?" ) == 0,
Remove From( colNames, i, 1 )
)
);
For( i = 1, i <= N Items( colNames ), i++,
Column( dt, colNames[i] )[dt << get rows where( As Column( dt, colNames[i] ) == "" )] =
"Sold"
);
Jim