Import Excel Buffer

[randrews]

Я знаю, что у меня, начиная с 3 строки есть код и описание страны. Пример упрощен (считаю, что там только новые кода и т.п.)
ПРИМЕР НЕ ПРОВЕРЯЛ, но примерно так.

// простой пример - без validate.
FromLine := 3;
TempExcelBuffer.SETCURRENTKEY("Row No.","Column No.");
TempExcelBuffer.SETFILTER("Row No.",'>=%1',FromLine);
IF TempExcelBuffer.FIND('-') THEN
	REPEAT
		TempExcelBuffer.SETRANGE("Column No.",1);
		IF NOT TempExcelBuffer.FIND('-') THEN ERROR('не заполнен код страны');
		Country.SETFILTER(Code,'=%1',TempExcelBuffer."Cell Value as Text");
		IF Country.FIND('-') THEN ERROR('страна уже есть в базе');
		Country.INIT;
		EVALUATE(Country.Code,TempExcelBuffer."Cell Value as Text");
		TempExcelBuffer.SETRANGE("Column No.",2);
		IF TempExcelBuffer.FIND('-') THEN
			EVALUATE(Country.Name,TempExcelBuffer."Cell Value as Text");
		Country.INSERT;
		// ставим на последнюю строку, чтоб цикл продолжить
		TempExcelBuffer.SETRANGE("Column No.");
		TempExcelBuffer.FIND('+')
	UNTIL TempExcelBuffer.NEXT = 0;