function peigui_abstimegui()

% This funtion open a window with a menu with the necesary 
% elemnts to change the absolute time for labelling pruposes.

global peigui_obj

a = figure('Units','normalized', ...
	'Color',[0.8 0.8 0.8], ...
	'InvertHardcopy','off', ...
	'MenuBar','none', ...
	'Name','Time', ...	
	'PaperType','a4letter', ...
	'NumberTitle','off',....
	'Position',[0.05 0.85 .123438 0.239258]);
	
b = uicontrol('Parent',a, ...
	'Units','normalized', ...
	'BackgroundColor',[0.701961 0.701961 0.701961], ...
	'FontName','times', ...
	'FontSize',12, ...
	'Position',[0.0949367 0.689796 0.386076 0.102041], ...
	'String','Year', ...
	'Style','text', ...
	'Tag','StaticText1');
b = uicontrol('Parent',a, ...
	'Units','normalized', ...
	'BackgroundColor',[1 1 1], ...
	'FontName','times', ...
	'FontSize',12, ...
	'Position',[0.588608 0.693878 0.310127 0.102041], ...
	'Style','edit', ...
	'String',num2str(peigui_obj{1}.absyear), ...	
	'Callback','peigui_menu_command getabsyear', ...	
	'Tag','EditText1');
	
b = uicontrol('Parent',a, ...
	'Units','normalized', ...
	'BackgroundColor',[1 1 1], ...
	'FontName','times', ...
	'FontSize',12, ...
	'Position',[0.588608 0.55102 0.310127 0.102041], ...
	'Callback',' peigui_menu_command getabsmonth', ...		
	'String',num2str(peigui_obj{1}.absmonth), ...		
	'Style','edit', ...
	'Tag','EditText1');
b = uicontrol('Parent',a, ...
	'Units','normalized', ...
	'BackgroundColor',[0.701961 0.701961 0.701961], ...
	'FontName','times', ...
	'FontSize',12, ...
	'Position',[0.101266 0.542857 0.386076 0.106122], ...
	'String','Month', ...
	'Style','text', ...
	'Tag','StaticText1');
b = uicontrol('Parent',a, ...
	'Units','normalized', ...
	'BackgroundColor',[1 1 1], ...
	'FontName','times', ...
	'FontSize',12, ...
	'Position',[0.588608 0.408163 0.310127 0.102041], ...
	'Style','edit', ...
	'String',num2str(peigui_obj{1}.absday), ...		
	'Callback',' peigui_menu_command getabsday', ...			
	'Tag','EditText1');
b = uicontrol('Parent',a, ...
	'Units','normalized', ...
	'BackgroundColor',[0.701961 0.701961 0.701961], ...
	'FontName','times', ...
	'FontSize',12, ...
	'Position',[0.101266 0.395918 0.386076 0.102041], ...
	'String','Day', ...
	'Style','text', ...
	'Tag','StaticText1');
b = uicontrol('Parent',a, ...
	'Units','normalized', ...
	'BackgroundColor',[1 1 1], ...
	'FontName','times', ...
	'FontSize',12, ...
	'Position',[0.588608 0.261224 0.310127 0.106122], ...
	'String',num2str(peigui_obj{1}.abshour), ...			
	'Callback',' peigui_menu_command getabshour', ...				
	'Style','edit', ...
	'Tag','EditText1');
b = uicontrol('Parent',a, ...
	'Units','normalized', ...
	'BackgroundColor',[0.701961 0.701961 0.701961], ...
	'FontName','times', ...
	'FontSize',12, ...
	'Position',[0.0949367 0.253061 0.386076 0.106122], ...
	'String','Hour', ...
	'Style','text', ...
	'Tag','StaticText1');
