J>if Trim(FName)='Пустой идентификатор' then Result := aNone
J> else if Trim(FName)='Учитываемая позиция' then Result := aActivePos
J> else if Trim(FName)='Номер позиции по смете' then Result := aNpp
J> else if Trim(FName)='Номер позиции по порядку (в актах выполненных работ)' then Result := aNppImp
J>  // далее 900 таких же строк
J>