Всем доброго дня!

1.Генерирую программы из кода, который пользователь заносит в описание показателя.
Хотелось бы при этом выдавать ошибки в этом коде.
Поскольку работаю через CacheActiveX.Factory, написал вспомогательный класс и метод Compile в нем.
Программы-то генерируются, но и $ZTRAP, и $ETRAP не ловят ошибки копмиляции.
Может программы сохраняются без компиляции?
Или обработку ошибки надо внутрь xecute засунуть?Class OM.Utils Extends %RegisteredObject
{

ClassMethod DeleteObject(DOId As %String, DOClassName As %String) As %String
{
  set $ztrap="onerror"
  s x="##class("_DOClassName_").%DeleteId("_DOId_")"
  d @x
  quit ""
  
onerror
  set $ztrap=""
  quit "Error :"_$zerror
}

ClassMethod Compile(psource As %String, pname As %String) As %String
{
 
    set Delim=$c(13,10) 
    set nStr=$LENGTH(psource,Delim)
    
    k ^||rtn
    ;формируем заголовок
    set iline=1
    s ^||rtn(iline)=pname_" ;"
    set iline=iline+1
    s ^||rtn(iline)=" ;;сгенерировано проектом OM "_$zdt($h,3)_" версия 1 "
    set iline=iline+1
    s ^||rtn(iline)="  set $ztrap=""onerror"""
  set iline=iline+1
    s ^||rtn(iline)="  do log^OMutil("""_pname_""")"
    
    ;формируем тело программы
  for i=1:1:nStr do  ;
  .set iline=iline+1
  .set ^||rtn(iline)=$p(psource,Delim,i)

    ;формируем завершение
    set iline=iline+1
    s ^||rtn(iline)="  quit" ;форм нормальный выход    
    set iline=iline+1
    s ^||rtn(iline)="onerror ;"
  set iline=iline+1
    s ^||rtn(iline)="  set $ztrap="""""
  set iline=iline+1
    s ^||rtn(iline)="  set CurrError="""_pname_":""_$zerror"
    set iline=iline+1
    s ^||rtn(iline)="  quit" ;форм аварийный выход
      
  set formula="(pname) zr  x ""f i=1:1:"_iline_" zi ^||rtn(i) "" zs @pname"

  ;new $etrap
  ;set $etrap="goto onerror"
  set $ztrap="onerror"  
  set $zerror=""
  
  xecute (formula,pname)
  
  if $zerror'="" quit ("Error :"_$zerror)
  
  Quit "^"_pname   ;;возвращаемое методом значение
  
onerror
  set $ztrap=""
  quit "Error :"_$zerror
}

}
2.Кстати, в этом же классе у меня сидит метод DeleteObject. Не нашел в CacheActiveX.Factory метода для удаления объекта.
Это мне как-то странно.
Здесь на форуме промелькнул способ вызова произвольных М-программ с клиента (в моем случае, VBA), искал - но не нашел.
Напомните, пожалуйста. А то писать новый метод каждый раз кажется мне неправильным.
Да,
Cache for Windows (x86-32) 2010.1.2 (Build 600.0_SU) Tue May 25 2010 20:27:57 EDT

krvsa,

Спасибо, попробую.

Прошу прощения за нахальство,:)
а на второй вопрос не подскажете?..

servit,
а я все думал, куда DeleteId пристегнуть, оказывается к Static.
Про Static в "Using ActiveX with Caché" крайне мало написано.
И если в этом руководстве написано про New, OpenID и Save, то как-то странно не привести пример Delete.
К документации всегда можно придраться

Вы, наверное, знаете как выполнить произвольный код через CacheActiveX.Factory, например, вызвать произвольную программу, а не только чей-то метод. Поделитесь, плиз.

krvsa,

Set status=routine.Compile() - рулит!
Нормальная диагностика при компиляции сгенерированной программы.

ну я,



Ладно, хоть на текущее устройство, хуже если бы вообще не выводился. Если приспичит, расковыряем. Спасибо, за ссылки.

servit,

VisM - хорошая штука, но говорят устарел. К тому же я худо-бедно научился работать через сокет.

Но там, где я работаю через CacheActiveX.Factory, не хотелось второй интерфейс и второй коннект открывать.
Пожалуй, использую обертки Каратаева Е.:


Спасибо всем за советы и обсуждение!