Масштаб документа

Что вы имеете в виду под текущим масштабом документа?
В AutoCAD такого понятия нет, есть прием используемый некоторыми САПР - вычерчивание в определенном назначаемом масштабе. В "чистом" ACAD'е можно получить масштаб  только как свойство видового окна, и то косвенным образом(Autodesk'и то ли по пьянке, то ли по лени не включили важнейшее свойство в состав интерфейса).Кроме того, "масштаб" немасштабируемых размерных элементов
можно получить как значение системной переменной DIMSCALE.
Предлагаю небольшой примерчик на VBA, т.к. в ObjectARX, к сожалению, не силен:

Dim DimensionScale As Single
     DimensionScale = ThisDrawing.GetVariable("DIMSCALE")
     Dim Viewport As AcadViewport
     Dim View As AcadView
     Set Viewport = ThisDrawing.ActiveViewport
     ThisDrawing.Views.Add ("MyView")
     Set View = ThisDrawing.Views.Item(0)
     Dim ViewportScale As Single
     ViewportScale = Viewport.Height / View.Height
     MsgBox "DimensionScale = " & DimensionScale & vbCrLf & _
            "ViewportScale = " & ViewportScale

> Starter
В динамике?

Не знаю...возможно, надо бы повозиться, но извини, руки не доходят. М\б кто-то решал подобную задачу?