Я знаю, что у меня, начиная с 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;