Функция OpenAsClone вызывает ошибку в Delphi XE4

У меня есть 2 набора данных, например, в моем приложении Delphi XE4:

object dsDestination: TpFIBDataSet

    object Field1: TFIBStringField
      FieldName = 'MYSTRING'
      Size = 1
      Transliterate = False
    ene

    object Field2: TFIBIntegerField
      FieldName = 'MYINT'
    end

  end

object dsSource: TpFIBDataSet

    object dsSourceMYSTRING: TFIBStringField
      FieldName = 'MYSTRING'
      Size = 1
      Transliterate = False
    end

    object dsSourceMYINT: TFIBIntegerField
      FieldName = 'MYINT'
    end

  end

Когда я пытаюсь выполнить следующее утверждение:

dsSource.Open;
dsDestination.OpenAsClone(dsSource);

Я получаю следующую ошибку в последней строке

dsDestination: Field MYSTRING not found

Все отлично работает в Delphi 7. Мое приложение Delphi 7 использует Firebird 2.5.1, а Delphi XE4 использует 2.5.2. Я использую FIBPlus 7.5.