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