I think this will do what you want
Names Default To Here( 1 );
dt = Current Data Table();
colList = dt << get column names( character, string );
For( i = 1, i <= N Items( colList ), i++,
For Each Row(
as Column( dt, colList[i] ) = Try(
Word( 1, As Column( dt, colList[i] ), ":" )
,
As Column( dt, colList[i] )
)
)
);
If you are going to be continuing with scripting, you need to take the time to read the Scripting Guide in the JMP Documentation Library, available under the Help pull down menu.
The Discussion Group is not here to write code for the users, it is here to help users with issue they are finding when using JMP or in writing scripts. The community will always be here to assist JMP users with getting through the problems they run into.
Jim