Subscribe Bookmark RSS Feed

JSL - Adding a Table to a Journal

drblove

Contributor

Joined:

Nov 2, 2016

Another JSL question, I'm trying to put a table in Journal using JSL.  Here is what I am trying to do:

 

current_data_table << New Data View;

// Creating the Journal

nw = New Window("Journal Right Here", <<Journal,
	ob = Outline Box("Section 1",
        Text Box("Some description that we need here.", << Markup),
        Current Journal()[TableBox(current_data_table)]
    )
);

Everything seems to be working but the TableBox code... I am sure it is something easy but it is stumping me.

 

Thank you in advance.

1 ACCEPTED SOLUTION

Accepted Solutions
txnelson

Super User

Joined:

Jun 22, 2012

Solution

Here is a very simple script that does what you want:

Names Default To Here( 1 );
dt = Open( "$SAMPLE_DATA/big class.jmp" );

nw = New Window( "sample journal",
	<<journal, 

	ob = Outline Box( "Selection 1",
		Text Box( "this is some description", Markup( 1 ) ),
		dt << New Data Box()
	)
);
Jim
4 REPLIES
txnelson

Super User

Joined:

Jun 22, 2012

Solution

Here is a very simple script that does what you want:

Names Default To Here( 1 );
dt = Open( "$SAMPLE_DATA/big class.jmp" );

nw = New Window( "sample journal",
	<<journal, 

	ob = Outline Box( "Selection 1",
		Text Box( "this is some description", Markup( 1 ) ),
		dt << New Data Box()
	)
);
Jim
drblove

Contributor

Joined:

Nov 2, 2016

Hi Jim,

 

Thank you for your response. It works great.  Quick question through, when I go to the Journal is shows the table with rows and columns  that are completely empty (like an Excel spreadhseet) versus just the rows and column with headers.  Any solutions?

 

Thank you in advance,

Brad

txnelson

Super User

Joined:

Jun 22, 2012

The reason it displays empty cells, is because it is a view into an existing data table.  Here is another script that just adds a visual copy.  The script has to be a little tricky in it's method to place the data table view under the outline box.

Names Default To Here( 1 );
dt = Open( "$SAMPLE_DATA/big class.jmp" );

nw = New Window( "sample journal",
	<<journal, 

	ob = Outline Box( "Selection 1", 
		Text Box( "this is some description", Markup( 1 ) ), 
		hlb = H List Box() 
	)
);
xx = New Window( "xxx", <<journal );
dt << journal;
hlb << append( xx );
xx << close window;
Jim
drblove

Contributor

Joined:

Nov 2, 2016

Awesome!  Thank you so much for taking the time to reply, completely works.

 

Brad