[aspid132]

Добрый день. Проблема такая: периодически с динамическими блоками, которые содержат атрибуты, происходят следующие две неприятные вещи:
1) Часть из этих блоков «теряют» слой, т.е. не принадлежат ни одному слою, и, как следствие, не выводятся на печать. При этом, при попытке редактирования этих блоков выводится сообщение AutoCad (см. вложение), после чего их можно отредактировать.
2) Часть этих блоков перекидывается на другие слои, которые создаются сами на основе существующих слоев, с добавлением к их названию символов: «@ 10 @ 10 @ 10 @ 10 @ 10». Например, на основе слоя «ШТРИХОВКА» создается слой «Штриховка @ 10 @ 10 @ 10 @ 10 @ 10». И на этот слой перекидывается часть блоков с атрибутами. Продублироваться может любой из слоев файла. Закономерности в их создании пока не обнаружил.
Возникает эта проблема, вроде, при работе в пространстве листа при выполнении каких-либо действий в видовых экранах.
Файл прилагается

[Кулик Алексей aka kpblc]

А нечего переоткрывать файл в 2005 и более ранних версиях ))). И аннотативность тоже с умом надо применять.

[aspid132]

Алексей, да вроде в 2005 не переоткрывали, или вы имеете в виду формат сохранения файла, поставить более позднюю? И вы не могли бы подробнее про аннотативность, в чем именно ошибка?

----- добавлено через ~16 мин. -----
По поводу 2005 версии ошибся, были пересохранения в 2004 версии)

[AlexCondor]

Сообщение от aspid132 были пересохранения в 2004 версии

Динамические блоки появились, насколько я помню, в AutoCAD 2006

[aspid132]

Поставил сохранение в 2010, проблема так и осталась

[Oleg T]

У меня BricsCAD 17 (Acada нет) при открытии выдал кучу сообщений типа

Недопустимый слой
AcDbBlockReference(541718)

и после аудита 111 ошибок:

Имя: AcDbBlockReference(648451)
Значение: Идентификатор слоя (78E980)
Проверка: Неверно
Заменить на: Установить слой по умолчанию "0"

Имя: AcDbBlockGripExpr(2A2E8E)
Значение: Double - 1.79769e+308
Проверка: Неверно
Заменить на: Установлено в 0

Может, он порушил что-нибудь, но на всякий случай файл приложу.

[maratovich]

aspid132
Файл - Утилиты - Проверить... нажать Да.

[Кулик Алексей aka kpblc]

Попробуй SAVEFIDELITY поменять. Заодно LARGEOBJECTSUPPORT.

----- добавлено через ~2 мин. -----
P.S. Мне было лень играться, поэтому я использовал код

Код:

[Выделить все]

 (mapcar '(lambda (x) (vla-put-layer (vlax-ename->vla-object (handent (cdr x))) "Штриховка"))
        ((lambda (/ adoc lst)
           (vlax-for blk_def (vla-get-blocks (vla-get-activedocument (vlax-get-acad-object)))
             (vlax-for ent blk_def
               (if (wcmatch (strcase (vla-get-layer ent)) "*`@*")
                 (setq lst (cons (cons (if (vlax-property-available-p blk_def 'effectivename)
                                         (vla-get-effectivename blk_def)
                                         (vla-get-name blk_def)
                                         ) ;_ end of if
                                       (vla-get-handle ent)
                                       ) ;_ end of cons
                                 lst
                                 ) ;_ end of cons
                       ) ;_ end of setq
                 ) ;_ end of if
               ) ;_ end of vlax-for
             ) ;_ end of vlax-for
           lst
           ) ;_ end of lambda
         )
        ) ;_ end of mapcar

[aspid132]

Проверку на ошибки делал несколько раз, не помогла. Алексей, спасибо за вариант, завтра на работе проверю

[Кулик Алексей aka kpblc]

Не увидел, что в коде крякозябры... Исправил