You might have to bite the bullet and write out a text file of the column headers. Not too hard:
dt = New Table( "Example Table", Add Rows( 0 ),
New Column( "aaaaa", Numeric, Continuous, Format( "Best", 12 ), Set Values( [] ) ),
New Column( "bbbbb", Numeric, Continuous, Format( "Best", 12 ), Set Values( [] ) ),
New Column( "ccccc", Numeric, Continuous, Format( "Best", 12 ), Set Values( [] ) ),
New Column( "ddddd", Numeric, Continuous, Format( "Best", 12 ), Set Values( [] ) )
);
col_names = dt << get column names(string);
text2save = concat items(col_names, ",");
csvfile = "c:\temp\csv_example.csv";
save text file(csvfile, text2save);