Pass Column Properties on to Summary Table

[#1]

I have a complicated way to do this, wondering if something better exists?  Is it possible to have the column properties from a parent table pass forward to a summary table?

[#2]

Which column properties? To which columns? Some do get copied over just fine. 

If you are willing to utilize clipboard scripting index does provide quite simple example of copying column properties using JSL

Names Default To Here(1);
dt = Open("$SAMPLE_DATA/Tiretread.jmp");
dt << Copy Column Properties({:MODULUS, :ELONG});
dt2 = New Table("test it",
	New Column("T1", numeric, continuous),
	New Column("T2", numeric, continuous),
	New Column("T3", numeric, continuous),
	Add Rows(10)
);
dt2 << Paste Column Properties({:T1, :T3});

[#3 · Accepted solution]

Jarmo

Based on your suggestion and some information I found here

Solved: Copying column properties from one data table to another - JMP User Community

I came up with this.

Names Default To Here( 1 );
dt = Current Data Table();
Summarize( unique_values = by( :LOT ) );
colList = dt << get column names( numeric, string );
SpecCols = {};
For Each( {colnames, index}, colList,
spec = Column( dt, colnames ) << get property( "Spec Limits" );
If( !Is Empty( spec ),
Insert Into( SpecCols, colnames )
);
);

Try(For( i = 1, i <= N Cols( dt ), i++,
  colProps = Column( dt, SpecCols[i] ) << Get Column Properties;
  Column( Data Table( "Yield By Wafer" ), SpecCols[i] ) << Add Column Properties( colProps );
));

dt is the parent table, SpecCols are a list of columns with specs and Yield By Wafer is the summary.  This works but only for some of the columns, I'm trying to figure out the pattern.

[#4]

I think I figured it out.  I had an unusual data column where all the entries were missing value codes.  The iteration appears to stop at that point and fails to add column properties thereafter.  Other than that, it appears to work well.

[#5]

For moving over spec limits you could also just use Manage Spec Limits