// This will parse a selected column by user specified delimeter(s). // 2016-01-27. v1. robot. Initial release. // Add parse file name script. Names Default To Here( 1 ); dt = Current Data Table(); // Get selected column. selCol = dt << Get Selected Columns(); nSelCol = Length( selCol ); // Create run script. runScript = Expr( // Get column name. selCol1 = selCol[1]; selColName = selCol1 << Get Name; // Break file names by delimiters. New Window( "Delimiters", < 0, j = 0; col = dt << New Column(); col << Data Type( Character, Nominal ); col << Set Formula( Word( i, Char( selCol1 ), delim ) ); Wait( 0.01 ); Eval( Parse( Eval Insert( "For Each Row( If( Is Missing(^col^[]) == 0, j = j + 1 ) )" ) ) ); col << Delete Formula; i = i + 1; If( j == 0, dt << Delete Column( col ) ); ); // Done. New Window( "Done!", <