0001 function ltpdv_server_getLatest(varargin)
0002
0003
0004 myh = varargin{1};
0005 mainfig = varargin{end};
0006
0007
0008 [dtype, server, port, rds, cal, stat] = ltpdv_server_get_server(mainfig);
0009
0010 switch dtype
0011 case 'frame data'
0012 latest = m2fserv(server, port, 'MIN');
0013 case 'raw data'
0014 latest = m2dserv(server);
0015 case 'h(t) frames'
0016 latest = m2fserv(server, port, 'HMIN');
0017 case 'hour trends'
0018 latest = m2fserv(server, port, 'HOUR');
0019 case 'day trends'
0020 latest = m2fserv(server, port, 'DAY');
0021 otherwise
0022 error('### Unknown data type');
0023 end
0024
0025
0026 sh = findobj(mainfig, 'Tag', 'LTPDVserverStartEdit');
0027 set(sh, 'String', GPS2UTC(latest));
0028 sh = findobj(mainfig, 'Tag', 'LTPDVserverStopEdit');
0029 set(sh, 'String', GPS2UTC(latest));
0030 ltpdv_server_set_duration(mainfig, latest, latest)