You'd be correct in that a session script isn't what I want.  If I try that, all it does is open the data table I have open.  It doesn't even try to create a new window(). 
Also, I tried the eval(nw<<Get Script) as well and it makes sense why it doesn't work, I was just hoping that there would be an easy solution rather than me having to recreate everything if I don't know what everything will be. 
I'll keep hope alive a little while longer. 
Just to clarify what I'm asking for:
box1 = PanelBox("1", teb = Text Edit Box("This is a test"), ButtonBox("Print", print(teb<<Get Text)));
box2 = PanelBox("2", teb = Text Edit Box("This is a test"), ButtonBox("Print", print((teb<<Get Text)||" Charlie")));
box3 = PanelBox("3", teb = Text Edit Box("This is a test"), ButtonBox("Print", print((teb<<Get Text)||" Susie")));
nw = New Window("Example",
      tb = TabBox()
);
stuff = Evallist({box1, box3});
for(i=1, i<=nitems(stuff), i++,
      tb<<Append(char(i), stuff)
);
nw<<Get Script
/* returns
V List Box(
      V List Box(
              Tab Box(
                    Tab Page Box(
                          Title( "1" ),
                          Panel Box( Text Edit Box( "This is a test" ), ButtonBox )
                    ),
                    Tab Page Box(
                          Title( "2" ),
                          Panel Box( Text Edit Box( "This is a test" ), ButtonBox )
                    )
              )
      )
)
*/
It doesn't have window title, or the scripts for the buttonbox.  Also, just won't run.