Please see my script so far. At the end of the script, I want to open another csv file into a jmp table and extract columns into the originally created jmp table from the first invocation.
Names Default To Here( 1 );
//dt = Open( "C:\Users\VISHAL.SANGHAI\OneDrive - MiniCircuits\Documents\Mini Circuits Work Folder\US-AMP\US-AMP-2\Pkg data V1 old epi June 2024 testing\Power with new epi boards - Jul 2024\USAMP2_newepi_U2_VG_np465_VD_15_ID_500mA_VC_9_P5dB_biasteeoutsideTC_postdecap.csv" );
//concatenate files
// Setup an empty table to start to concatenate other tables to
dtbase = New Table( "Base Table" );
// Have the user select the starting folder
dirpath = Pick Directory( "Pick the Top Level Directory" );
// Get all of the files in all of the folders that are under the picked folder
TheFileList = Files In Directory( dirpath, "recursive" );
// Go through all of the files and read in append those that meet your
// requirement. You will need to amend the IF statement to meet your criteria
For( i = 1, i <= N Items( TheFileList ), i++,
If( Uppercase( Word( -1, TheFileList[i], "." ) ) == "CSV" & Is File( dirpath || TheFileList[i] ) == 1,
dt = Open( dirpath || TheFileList[i] ); //to add filename as separate column in datatable
dtname = dt << get name(); //to add filename as separate column in datatable
dtname_list = Repeat( {dtname}, N Row( dt ) ); //to add filename as separate column in datatable
dt << New Column( "Filename", character, set values( dtname_list ) ); //to add filename as separate column in datatable
dtbase = dtbase << concatenate( dt, append to first table( 1 ) );
Close( dt, nosave );
);
);
// Add Global info as table variables
// Scan the data table based on column and assign the right row
theRow = 1;
While( Column( dtbase, 1 )[theRow] != "Freq(Hz)",
If( Column( dtbase, 2 )[theRow] != "",
dtbase << new table variable( Column( dtbase, 1 )[theRow],
Column( dtbase, 2 )[theRow]
)
);
theRow++;
);
// Get rid of unwanted rows (removal of blanks)
dtbase << select where( As Column( dtbase, 5 ) == "" & As Column( dtbase, 6 ) == "" );
dtbase << delete rows;
// Rename columns
theRow = (dtbase << get rows where( As Column( dtbase, 1 ) == "Freq(Hz)" ))[1];
For( i = 1, i <= N Cols( dtbase ), i++,
If( Column( dtbase, i )[theRow] == "USAMP2_newepi_U1_VG_np467_VD_15_ID_500mA_VC_9_P5dB_biasteeoutsideTC_postdecap",
"Filename",
Column( dtbase, i )[theRow] != "Filename",
Column( dtbase, i ) << set name( Column( dtbase, i )[theRow] )
)
);
dtbase << delete rows(theRow);
//Convert columns to numeric
Local( {old dt = Current Data Table()},
Current Data Table(
dtbase(
"base_table"
)
);
For Each( {col, index}, {:"Freq(Hz)"n, :"S21 Log Mag(dB)"n, :"S11 Log Mag(dB)"n, :"S12 Log Mag(dB)"n,
:"S22 Log Mag(dB)"n, :"CompIn21 Log Mag(dBm)"n, :"CompOut21 Log Mag(dBm)"n,
:"DeltaGain21 Log Mag(dB)"n, :"CompDMM VC Lin Mag(A)"n, :"CompDMM VD Lin Mag(A)"n},
col << Data Type( Numeric ) << Set Modeling Type( "Continuous" ) <<
Set Field Width( 12 )
);
Current Data Table( old dt );
);
// Add New column: Freq(GHz)
Data Table( "Base Table" ) << New Column( "Freq(GHz)", Numeric, "Continuous", Format( "Best", 12 ), Formula( :"Freq(Hz)"n / 1000000000 )) << Move Selected Columns( {:"Freq(GHz)"n}, after( :"Freq(Hz)"n ) );
Data Table( "Base Table" ) << Text to Columns(
columns(
:
Filename
),
Delimiters( "_" )
);
//Rename columns
:Filename1 << Set Name( " Product ID");
:Filename 2 << Set Name( " Variant*");
:Filename 3 << Set Name( " SN#");
:Filename 4 << Set Name( " VG ");
:Filename 5 << Set Name( " VG value ");
:Filename 6 << Set Name( " VD ");
:Filename 7 << Set Name( " VD value ");
:Filename 8 << Set Name( " ID ");
:Filename 9 << Set Name( " ID value ");
:Filename 10 << Set Name( " VC ");
:Filename 11 << Set Name( " VC value ");
:Filename 12 << Set Name( " Parameter ");
//Save JMP table
dtbase<<save("")
//thru_line_file = Pick File ("Pick a Data File");
//After this point, I need to allow user to pick a file. once he picks it, I would like to extract a column from that file by matching one column (common to both files) and get that column into the base table I created before.
Thanks,
Vishal
