function export(ViewerObj)
%EXPORT  Open system-export GUI for LTI Viewer

%   Author(s): A. DiVergilio
%   Copyright 1986-2000 The MathWorks, Inc. 
%   $Revision: 1.3 $  $Date: 2000/06/14 20:03:10 $

%---Watch on
set(ViewerObj.Handle,'Pointer','watch');

%---Make the ExportData
ExportData = exportlti('getdata');
ExportData.MatName = 'Viewerdata';

%---Add Models
ExportData.All = struct(...
    'Name',ViewerObj.SystemNames,...
    'Model',ViewerObj.Systems);

%---Update status bar and open GUI
status(ViewerObj,'Select the systems to export...');
exportlti('initialize',ViewerObj.Handle,ExportData,'LTI Viewer Export');

%---Watch off
set(ViewerObj.Handle,'Pointer','arrow');

%---Display default status string
status(ViewerObj);
