2 my $jobnum = $cgi->param('jobnum');
3 my $url = $cgi->param('url');
4 my $message = $cgi->param('message');
5 my $formname = scalar($cgi->param('formname'));
11 <BODY BGCOLOR="#ccccff" onLoad="refreshStatus()">
13 <%= include('/elements/xmlhttp.html',
14 'url' => $p.'elements/jsrsServer.html',
15 'subs' => [ 'job_status' ],
18 <SCRIPT TYPE="text/javascript" src="../elements/qlib/control.js"></SCRIPT>
19 <SCRIPT TYPE="text/javascript" src="../elements/qlib/imagelist.js"></SCRIPT>
20 <SCRIPT TYPE="text/javascript" src="../elements/qlib/progress.js"></SCRIPT>
21 <SCRIPT TYPE="text/javascript">
22 function refreshStatus () {
23 //jsrsExecute( '<%=$p%>elements/jsrsServer.html', updateStatus, 'job_status', '<%= $jobnum %>' );
25 job_status( '<%= $jobnum %>', updateStatus );
27 function updateStatus( status_statustext ) {
29 //var Array = status_statustext.split("\n");
30 var statusArray = eval('(' + status_statustext + ')');
31 var status = statusArray[0];
32 var statustext = statusArray[1];
34 //if ( status == 'progress' ) {
35 //IE workaround, no i have no idea why
36 if ( status.indexOf('progress') > -1 ) {
37 document.getElementById("progress_percent").innerHTML = statustext + '%';
40 //jsrsExecute( '<%=$p%>elements/jsrsServer.html', updateStatus, 'job_status', '<%= $jobnum %>' );
41 job_status( '<%= $jobnum %>', updateStatus );
42 } else if ( status.indexOf('complete') > -1 ) {
43 <% if ( $message ) { %>
44 document.getElementById("progress_message").innerHTML = "<%= $message %>";
45 document.getElementById("progress_bar").innerHTML = '';
46 document.getElementById("progress_percent").innerHTML = '<INPUT TYPE="button" VALUE="OK" onClick="parent.nd(1);">';
47 document.getElementById("progress_jobnum").innerHTML = '';
48 parent.document.<%=$formname%>.submit.disabled=false;
49 <% } elsif ( $url ) { %>
50 window.top.location.href = '<%= $url %>';
52 alert('job done but no url or message specified');
54 } else if ( status.indexOf('error') > -1 ) {
55 document.getElementById("progress_message").innerHTML = '<FONT SIZE="+1" COLOR="#FF0000">Error: ' + statustext + '</FONT>';
56 document.getElementById("progress_bar").innerHTML = '';
57 document.getElementById("progress_percent").innerHTML = '<INPUT TYPE="button" VALUE="OK" onClick="parent.nd(1);">';
58 document.getElementById("progress_jobnum").innerHTML = '';
59 parent.document.<%=$formname%>.submit.disabled=false;
61 alert('XXX unknown status returned from server: ' + status);
69 <TD ALIGN="center" ID="progress_message">
70 Server processing job...
73 <TD ALIGN="center" ID="progress_bar">
74 <SCRIPT TYPE="text/javascript">
76 SEGS = new QImageList(4, 23, "../images/progressbar-empty.png", "../images/progressbar-full.png");
78 bar1 = new QProgress(null, "bar1", SEGS, 100);
85 <DIV ID="progress_percent">%</DIV>
88 <TD ALIGN="center" ID="progress_jobnum">
89 (progress of job #<%= $jobnum %>)