Class test.test Extends %ZEN.Component.page
{

/// Этот блок Style содержит определение CSS-стиля страницы.
XData Style
{
<style type="text/css">
</style>
}

XData Contents [ XMLNamespace = " http://www.intersystems.com/zen"  ]
{
<page xmlns=" http://www.intersystems.com/zen"  title="">
<label id="lblExcelReportInformer" label="Подождите, идет выгрузка в Excel" hidden="true"/>
<button caption="Экспорт" onclick="zenPage.start();"/>
</page>
}

ClientMethod start() [ Language = javascript ]
{
  zenSetProp('lblExcelReportInformer','hidden',false); //злосчастная метка
  zenSetDeferredAction(new Function("zenPage.exportToExcel();"),200);
}

ClientMethod exportToExcel() [ Language = javascript ]
{
  var tmp=zenPage.sExportToExcel(1);
  if (tmp!="") {
    zenAlert(tmp);
  }
  
  zenSetProp('lblExcelReportInformer','hidden',true);
}

ClassMethod sExportToExcel(sec) As %String [ ZenMethod ]
{
  hang sec
  q "excel"
}

}