cancel
Showing results for 
Show  only  | Search instead for 
Did you mean: 
JMP is taking Discovery online, April 16 and 18. Register today and join us for interactive sessions featuring popular presentation topics, networking, and discussions with the experts.
Choose Language Hide Translation Bar
Botzal
Level III

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

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 );

 

1 ACCEPTED SOLUTION

Accepted Solutions
txnelson
Super User

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

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");
Jim

View solution in original post

5 REPLIES 5
txnelson
Super User

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

Save the data table first to a journal and then save the journal to html
Jim
Botzal
Level III

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

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" );

 

 

 

 

txnelson
Super User

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

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");
Jim
Craige_Hales
Super User

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

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  browserbig class in browser 

Craige
Botzal
Level III

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

Thank you very much, it works great!