Here is a sample script that might be close to what you want. I had to guess a bit at what matching you were going to do. But, it creates a table of output for all 127 columns in the data table.
Names Default To Here( 1 );
// Create a data table somewhat similar to your description
dtorig = Open( "$SAMPLE_DATA\semiconductor capability.jmp" );
dt = dtorig << Subset( Sample Size( 10 ), Selected columns only( 0 ), Stratify( :SITE ) );
Close( dtorig, nosave );
// Get all of the tests
colNamesList = dt << get column names( continuous );
// In my example, I am using the first column as the matching column
// so remove it from the list
colNamesList = Remove( colNamesList, 1, 1 );
// Run the Fit Y by X(Oneway)
fg = Fit Group(
Oneway(
Y( Eval( colNamesList ) ),
X( :SITE ),
Matching Column( :NPN1 ),
X Axis Proportional( 0 ),
Matching Lines( 1 ),
SendToReport(
Dispatch( {}, "Oneway Plot", FrameBox, {Grid Line Order( 2 ), Reference Line Order( 3 )} ),
Dispatch( {}, "Matching Fit", OutlineBox, {Close( 0 )} )
)
)
);
// Create the output table
Report( fg )[Table Box( 3 )] << make combined data table;
// Close the report output
Report( fg ) << close window;
Jim