topic Re: JSL Column Name Search and Replace in Discussions

JSL Column Name Search and Replace

sam_t — Sun, 21 Jan 2018 23:39:04 GMT

I have lot of column name and I want to rename my column name as below. How can I use Set name to replace all my columns in the table?

NAME [US] 1999 AMERICA POP US123 -> AMERICA US123
NAME [US] 1999 AMERICA POP US456 -> AMERICA US456
NAME [US] 1999 AMERICA POP US145 -> AMERICA US145

dt = Open( "$SAMPLE_DATA/Big Class.jmp" );
:Age << Set Name( "Time" );

Thanks.

Re: JSL Column Name Search and Replace

txnelson — Mon, 22 Jan 2018 00:26:01 GMT

I think this should work, or at least it is close to it.

Names Default To Here( 1 );
dt = Current Data Table();

colList = dt << get column names( string );

For( i = 1, i <= N Items( colList ), i++,
	If( Left( colList[i], 14 ) == "NAME [US] 1999",
		Column( dt, colList[i] ) << set name( "AMERICA " || 
			Word( -1, colList[i], " " ) )
	)
);

Re: JSL Column Name Search and Replace

sam_t — Mon, 22 Jan 2018 00:50:14 GMT

Works like a charm. Thank you!