topic Re: substitute() for each row() for each column erroring out of bounds in Discussions

substitute() for each row() for each column erroring out of bounds

tsandidge — Fri, 09 Jun 2023 18:12:05 GMT

I need to search and replace strings across an entire data table. I referenced this solution, hoping for something elegant, but it's complaining about row 11 in my 10-row table.

Code running on JMP Pro 16.1

allCols = file << get column names(string);
file << group columns("col group", myCols);
myCols = file << get column group("col group");
for(cols = 1, cols <= n items(myCols), cols++,
	file << begin data update;
	for each row(file,
		file:myCols[cols] = substitute(file:myCols[cols],
			"X", "0"
		)
	);
	file << end data update;
);

Error:

Cannot set value for the column 'dot' because the row number (11) is not valid. 
at row 1 in access or evaluation of 'Assign' , file:myCols[cols] =  /*###*/Substitute( file:myCols[cols], "X", "0" ) /*###*/

Forgot to add a sample column:

64.0
47.0
2.0
106.0
174.0
12.0
X
2.0
X
14.0

Re: substitute() for each row() for each column erroring out of bounds

txnelson — Wed, 02 Mar 2022 21:57:23 GMT

The below slight modification of your code appears to work OK

Names Default To Here( 1 );
file = Current Data Table();
allCols = file << get column names( string );
file << group columns( "col group", allCols );
myCols = file << get column group( "col group" );
For( cols = 1, cols <= N Items( myCols ), cols++,
	file << begin data update;
	For Each Row(
		file,
		As Column( file, myCols[cols] ) = Substitute( As Column( file, myCols[cols] ),
			"X", "0"
		)
	);
	file << end data update;
);

Re: substitute() for each row() for each column erroring out of bounds

tsandidge — Thu, 03 Mar 2022 16:43:44 GMT

@txnelson , the As Column() did the trick, thank you!