topic Re: How to save data table(colored cells) to Interactive HTML? in Discussions

How to save data table(colored cells) to Interactive HTML?

Botzal — Sun, 10 May 2020 15:15:07 GMT

Hi,

When I saved 'dt_newin' as Interactive HTML and try to open the file (in chrome\explorer) the color in the columns disappeared.

Is there a solution to this?

Thanks

dt_newin = New Window( "Data Tool", db);

dt_newin() << journal;
Current Journal() << Save INTERACTIVE HTML( "C:\Desktop\Report\Summary Data.html" );
Current Journal() << Close window( nosave );

Re: How to save data table(colored cells) to Interactive HTML?

txnelson — Sun, 10 May 2020 17:19:17 GMT

Save the data table first to a journal and then save the journal to html

Re: How to save data table(colored cells) to Interactive HTML?

Botzal — Mon, 18 May 2020 17:25:18 GMT

I have tried several options, without success. - see below.

Can you give me more details please?

charts = {};

db = Outline Box( "Cdata Tool", Outline Box( "Summary", myTab = Tab Box() ) );

For( i = 1, i <= N Items( Dis1 ), i++,
myTab << Insert(
Dis[i],
Eval(
Parse(
"charts[" || Char( i ) ||
"] = Charts_1 = V List Box(
V List Box( dt_dtarray1[i] << get as report() ),
ob1=Outline Box( \!"Drill Down Analysis
--> Click Here\!", 
V List Box( dt_dtarray2[i] << get as report() ),));"))));

ob1<<close;

dt_newin = New Window( "Cdata Tool",db,<<Journal);
dt_newin << Save interactive HTML( "\\Desktop\Report\Summary .html" );

Re: How to save data table(colored cells) to Interactive HTML?

txnelson — Mon, 11 May 2020 04:01:55 GMT

Here is how I typically do it

names default to here(1);
dt=Open("$SAMPLE_DATA/big class.jmp");

dt:sex << color Cells("green",dt<<get rows where(:sex=="F"));
dt:sex << color Cells("Orange",dt<<get rows where(:sex=="M"));

interium=new window("interium",<<journal);
dt<<journal;



nw=new window("The Test",<<journal,
	Outline box("Here are the data",
		interium << get picture
	)
);

interium<<close window;

nw << save interactive html ("$TEMP\data table.html");

open("$TEMP/data table.html");

Re: How to save data table(colored cells) to Interactive HTML?

Craige_Hales — Mon, 11 May 2020 12:18:22 GMT

Jim's approach captures a picture. Try this to have an HTML table with selectable data:

dt=Open("$SAMPLE_DATA/big class.jmp");
dt:sex << color Cells("green",dt<<get rows where(:sex=="F"));
dt:sex << color Cells("Orange",dt<<get rows where(:sex=="M"));
temp=new window("temp",<<journal);
dt<<journal;
temp<<saveHTML("$desktop/bigclass.html");
temp<<closewindow;

big class in browser

Re: How to save data table(colored cells) to Interactive HTML?

Botzal — Mon, 18 May 2020 17:24:22 GMT

Thank you very much, it works great!