2 my $jobnum = $cgi->param('jobnum');
3 my $url = $cgi->param('url');
4 my $formname = scalar($cgi->param('formname'));
10 <BODY BGCOLOR="#ccccff" onLoad="refreshStatus()">
12 <SCRIPT TYPE="text/javascript" SRC="../elements/jsrsClient.js"></SCRIPT>
13 <SCRIPT TYPE="text/javascript" src="../elements/qlib/control.js"></SCRIPT>
14 <SCRIPT TYPE="text/javascript" src="../elements/qlib/imagelist.js"></SCRIPT>
15 <SCRIPT TYPE="text/javascript" src="../elements/qlib/progress.js"></SCRIPT>
16 <SCRIPT TYPE="text/javascript">
17 function refreshStatus () {
18 jsrsExecute( '<%=$p%>elements/jsrsServer.html', updateStatus, 'job_status', '<%= $jobnum %>' );
20 function updateStatus( status_statustext ) {
21 var Array = status_statustext.split("\n");
22 var status = Array[0];
23 var statustext = Array[1];
24 //if ( status == 'progress' ) {
25 //IE workaround, no i have no idea why
26 if ( status.indexOf('progress') > -1 ) {
27 document.getElementById("progress_percent").innerHTML = statustext + '%';
30 jsrsExecute( '<%=$p%>elements/jsrsServer.html', updateStatus, 'job_status', '<%= $jobnum %>' );
31 } else if ( status.indexOf('complete') > -1 ) {
32 window.top.location.href = '<%= $url %>';
33 } else if ( status.indexOf('error') > -1 ) {
34 document.getElementById("progress_message").innerHTML = '<FONT SIZE="+1" COLOR="#FF0000">Error: ' + statustext + '</FONT>';
35 document.getElementById("progress_bar").innerHTML = '';
36 document.getElementById("progress_percent").innerHTML = '<INPUT TYPE="button" VALUE="OK" onClick="parent.nd(1);">';
37 document.getElementById("progress_jobnum").innerHTML = '';
38 parent.document.<%=$formname%>.submit.disabled=false;
40 alert('XXX unknown status returned from server: ' + status);
48 <TD ALIGN="center" ID="progress_message">
49 Server processing job...
52 <TD ALIGN="center" ID="progress_bar">
53 <SCRIPT TYPE="text/javascript">
55 SEGS = new QImageList(4, 23, "../images/progressbar-empty.png", "../images/progressbar-full.png");
57 bar1 = new QProgress(null, "bar1", SEGS, 100);
64 <DIV ID="progress_percent">%</DIV>
67 <TD ALIGN="center" ID="progress_jobnum">
68 (progress of job #<%= $jobnum %>)