The main part of the JSL below, was obtained by running the Concatenate platform interactively to get what was desired, and then taking the JSL from the Source of the new table and pasting it into the script.
Names Default To Here( 1 );
dtMain = Data Table( "MainFile" );
dtNew = Data Table( "NewFile" );
dtConcat = dtMain << Concatenate( dtNew, Keep Formulas );
concatName = dtMain << get name;
Close( dtMain, nosave );
Close( dtNew, nosave );
dtConcat << set name( concatName );
Jim