pro qView_SetBase, state

@compile_opt.pro		; On error, return to caller

;+
; NAME:
;	qView_SetBase
; PURPOSE:
; CATEGORY:
; CALLING SEQUENCE:
; INPUTS:
; OPTIONAL INPUT PARAMETERS:
; OUTPUTS:
; OPTIONAL OUTPUT PARAMETERS:
; INCLUDE:
; EXTERNAL:
; CALLS:
; SEE ALSO:
; COMMON BLOCKS:
; SIDE EFFECTS:
; RESTRICTIONS:
; EXAMPLE:
; PROCEDURE:
; MODIFICATION HISTORY:
;	OCT-2002, Paul Hick (UCSD/CASS; pphick@ucsd.edu)
;-

widget_control, state.box[0,0], get_uvalue=box
for i=0,3 do begin
	widget_control, state.box[i,0], get_value=inbox
	box[i,3] = inbox
endfor

qView_XYZ_Update, state, id=3, /put
widget_control, state.setbase, set_uvalue=1B

return  &  end