view m-toolbox/m/gui/ltpdv/callbacks/ltpdv_server_getLatest.m @ 0:f0afece42f48

Import.
author Daniele Nicolodi <nicolodi@science.unitn.it>
date Wed, 23 Nov 2011 19:22:13 +0100
parents
children
line wrap: on
line source

function ltpdv_server_getLatest(varargin)

% Handles
myh     = varargin{1};
mainfig = varargin{end};

% Get server details
[dtype, server, port, rds, cal, stat] = ltpdv_server_get_server(mainfig);

switch dtype
   case 'frame data'
      latest = m2fserv(server, port, 'MIN');
   case 'raw data'     
      latest = m2dserv(server);
   case 'h(t) frames'     
      latest = m2fserv(server, port, 'HMIN');
   case 'hour trends'     
      latest = m2fserv(server, port, 'HOUR');      
   case 'day trends'     
      latest = m2fserv(server, port, 'DAY');
   otherwise
      error('### Unknown data type');
end

% Set start and stop times
sh = findobj(mainfig, 'Tag', 'LTPDVserverStartEdit');
set(sh, 'String', GPS2UTC(latest));
sh = findobj(mainfig, 'Tag', 'LTPDVserverStopEdit');
set(sh, 'String', GPS2UTC(latest));
ltpdv_server_set_duration(mainfig, latest, latest)