AcDbHardPointerId

Помогите разобраться
class DLLIMPEXP MyLeader : public AcDbEntity
{
     MyLeader() {}
    ~MyLeader() {}
    void setDimensionStyle(AcDbHardPointerId newStyleId);
private:
    AcDbHardPointerId    m_dimStyleId; // Размерный стиль
}
void setDimensionStyle(AcDbHardPointerId newStyleId)
{
    m_dimStyleId = newStyleId;
}
Функция создания объекта
create()
{
    AcDbDatabase *pDb = acdbHostApplicationServices()->workingDatabase();
    MyLeader *leader = new MyLeader;
    AcDbBlockTableRecordPointer pMS(ACDB_MODEL_SPACE, pDb, AcDb::kForWrite);
        pMS->appendAcDbEntity(leader);
    leader->setDimensionStyle(pDb->dimstyle());
    pMS->close(); leader->close();
}
Что нужно ещё чтобы защитить этот размерный стиль от PURGE