DO CASE
	CASE this.Value = 1
		GO TOP
	CASE this.Value = 2
		IF BOF()
			GO TOP
		ELSE
			SKIP -1
		ENDIF
	CASE this.Value = 3
		IF EOF()
			GO BOTTOM
		ELSE
			SKIP 1
			IF EOF()
				GO BOTTOM
			ENDIF
		ENDIF
	CASE this.Value = 4
		GO BOTTOM
ENDCASE

thisform.yearsIDEdit.value = years.year_id
thisform.yearsBeginEdit.value = years.ed_begin
thisform.yearsEndEdit.value = years.ed_end