|
Background-метод при создании страницы ZEN
#38667594
Ссылка:
Ссылка на сообщение:
Ссылка с названием темы:
Ссылка на профиль пользователя:
|
Участник
Откуда: г. Кишинёв, Республика Молдова
Сообщения: 3 167
|
|
feanorcheg ,
- 7345089
Вариант №1Class demo.test Extends %ZEN.Component.page
- {
/// Этот XML блок описывает содержимое этой страницы.
XData Contents [ XMLNamespace = " http://www.intersystems.com/zen" ]
- {
<page xmlns=" http://www.intersystems.com/zen" title="">
<text id="txt" value="" size="30"/>
<button caption="Отчёт" onclick="zenSetProp('txt','value','Идёт генерация отчёта...');zenPage.BigWork(10);"/>
</page>
}
Method BigWork(time) [ ZenMethod ]
- {
h time
s txt="Отчёт успешно сгенерирован"
d ..%SetValueById("txt",txt)
&js<zenAlert('#(txt)#');>
}
/// This client event, if present, is fired when the page is loaded.
ClientMethod onloadHandler() [ Language = javascript ]
- {
zenAlert('Страница успешно загружена');
zenPage.BigWork(10);
}
} Вариант №2Class demo.test Extends %ZEN.Component.page
- {
/// Этот XML блок описывает содержимое этой страницы.
XData Contents [ XMLNamespace = " http://www.intersystems.com/zen" ]
- {
<page xmlns=" http://www.intersystems.com/zen" title="">
<text id="txt" value="" size="30"/>
</page>
}
/// This client event, if present, is fired when the page is loaded.
ClientMethod onloadHandler() [ Language = javascript ]
- {
zenPage.RunBackgroundTask();
}
/// Run a method in the background.
ClassMethod RunBackgroundTask() [ ZenMethod ]
- {
#; Run method BackgroundTask in a background job.
Do ..%RunBackgroundMethod("BigWork",10)
}
/// This is an example of a task that is run in the background.
ClassMethod BigWork(N = 10)
- {
Do ..%SetBackgroundMethodStatus("Started",0)
Hang 2
#; simulated background task
For n = 1:1:N - {
Do ..%SetBackgroundMethodStatus("Running",n*10)
Hang 1
}
Do ..%EndBackgroundMethod()
}
/// This server-side callback method is called whenever the client
/// calls to monitor the current background task.
/// Typically a subclass uses this to send back JavaScript to update
/// a progress bar.
ClassMethod %OnMonitorBackgroundTask(
pTaskID As %String,
pStatus As %String,
pPercentComplete As %Float)
- {
#; write status into HTML component
&js<zenSetProp('txt','value','#(pStatus _ ": " _ +pPercentComplete _ "%")#');>
}
/// This server-side callback method is called whenever the client
/// calls to monitor the current background task and the task is complete.
/// Typically a subclass uses this to send back JavaScript to update
/// the page.
ClassMethod %OnFinishBackgroundTask(pTaskID As %String)
- {
&js<zenSetProp('txt','value','');>
}
} Вариант №3Class demo.test Extends %ZEN.Component.page
- {
XData Contents [ XMLNamespace = " http://www.intersystems.com/zen" ]
- {
<page xmlns=" http://www.intersystems.com/zen" title="">
<text id="txt" value="" size="30"/>
</page>
}
ClientMethod onloadHandler() [ Language = javascript ]
- {
zenPage.RunBackgroundTask();
}
Method %OnAfterCreatePage() As %Status
- {
Do ..%RunBackgroundMethod("BigWork",10)
Quit $$$OK
}
ClassMethod RunBackgroundTask() [ ZenMethod ]
- {
&js<if(zenPage.setBackgroundTask) {zenPage.setBackgroundTask('#($ZCHILD)#');}>
}
ClassMethod BigWork(N = 10)
- {
Do ..%SetBackgroundMethodStatus("Started",0)
Hang 2
For n = 1:1:N - {
Do ..%SetBackgroundMethodStatus("Running",n*10)
Hang 1
}
Do ..%EndBackgroundMethod()
}
ClassMethod %OnMonitorBackgroundTask(
pTaskID As %String,
pStatus As %String,
pPercentComplete As %Float)
- {
&js<zenSetProp('txt','value','#(pStatus _ ": " _ +pPercentComplete _ "%")#');>
}
ClassMethod %OnFinishBackgroundTask(pTaskID As %String)
- {
&js<zenSetProp('txt','value','');>
}
}
|
|
|
