function plot_complete_record(fign,vos)

figure(fign);
	clf;
% disp('after figure')

xax=[min(vos.yday)-1./24  max(vos.yday)+1./24];

plt=1;
plts=10;


	subplot(plts,1,plt);
	plot(vos.yday,vos.bpr,'.'); hold on;
	ax=axis; axis([xax ax(3:4)]);
	ylabel('BPR');
	set(gca,'xticklabel',[]);
	title(['Complete Cruise Record ' datestr(now,31)]); 

plt=plt+1;
	subplot(plts,1,plt);
	plot(vos.yday,vos.hrh,'.'); hold on;
	ax=axis; axis([xax ax(3:4)]);
	ylabel('HRH');
	set(gca,'xticklabel',[]);

plt=plt+1;
	subplot(plts,1,plt);
	plot(vos.yday,vos.precip,'.'); hold on;
	ax=axis; axis([xax ax(3:4)]);
	ylabel('PRC');
	set(gca,'xticklabel',[]);

plt=plt+1;
	subplot(plts,1,plt);
	plot(vos.yday,vos.atmp,'.'); hold on;
	ax=axis; axis([xax ax(3:4)]);
	ylabel('ATMP');
	set(gca,'xticklabel',[]);

plt=plt+1;
	subplot(plts,1,plt);
	plot(vos.yday,vos.lwr,'b.'); hold on;
	plot(vos.yday,vos.swr,'r.'); hold on;
	axis([xax,0,1400]);
	ylabel('S/LWR');
	set(gca,'xticklabel',[]);
% disp('swr');

plt=plt+1;
	subplot(plts,1,plt);
	plot(vos.yday,vos.wndu,'.'); hold on;
	ax=axis; axis([xax ax(3:4)]);
	ylabel('WNDU');
	set(gca,'xticklabel',[]);

plt=plt+1;
	subplot(plts,1,plt);
	plot(vos.yday,vos.wndv,'.'); hold on;
	ax=axis; axis([xax ax(3:4)]);
	ylabel('WNDV');
	set(gca,'xticklabel',[]);

plt=plt+1;
	subplot(plts,1,plt);
	plot(vos.yday,vos.shspd,'.'); hold on;
	ax=axis; axis([xax ax(3:4)]);
	ylabel('SPD');
	set(gca,'xticklabel',[]);

plt=plt+1;
	subplot(plts,1,plt);
	plot(vos.yday,vos.hdg,'.'); hold on;
	ax=axis; axis([xax ax(3:4)]);
	ylabel('HDG');
	set(gca,'xticklabel',[]);

plt=plt+1;
	subplot(plts,1,plt);
	plot(vos.yday,vos.vane,'.'); hold on;
	ax=axis; axis([xax ax(3:4)]);
	ylabel('VANE');
	xlabel('Day of Year');

return;
