Re: Progress Bar Conundrum

Well, it's just plain bad luck I guess. I copied everything in the code block into a new file and saved it and ran it. Sadly, all 8 iterations printed at the same time once the page loaded. Thinking my workstation was infested, I tried running the same script in three browsers on four different workstations, PC and Mac. Each had the same result. I am thinking now it's something on the server.

Which "incomplete web services code" was removed?

Joe

Sent by FoxWeb Support on 02/20/2013 05:03:49 PM:

The script you provided to us in your email worked fine once we removed the incomplete web services code. I don't know why it's not working on your own server.

Please try the following script. It should display the numbers 1 through 8, in half second intervals (as opposed to displaying all the numbers at once after 4 seconds).

<%Response.ContentType = 'text/html;charset=utf-8'%>

<!DOCTYPE html>

<html>

<head><title>Buffer Test</title>

</head>

<body>

response.buffer = .F.

for i = 1 to 8

response.write(str(i) + CRLF)

response.flush

wait '' timeout .5

</body>

</html>

The Response.ContentType call is required.

FoxWeb Support Team
support@foxweb.com email

Sent by Joe Goldsmiith on 02/19/2013 11:10:37 PM:

Thanks for the response. Here is a link to the live test script in question. I have run this script in FireFox, Chrome, and Safari each with the same results. Again, I only want the progress bar to show after the form is submitted going to the request.formcount line in the same script and between the for-next loop.

Script Testing Progress Bar

Thanks for any comments.

Joe

Sent by FoxWeb Support on 02/19/2013 07:03:36 PM:

It would be helpful if you provided a runnable sample program, illustrating the problem. You should replace database and web services operations with simple pause calls (WAIT WINDOW "" TIMEOUT x).

FoxWeb Support Team
support@foxweb.com email

Sent by Joe Goldsmiith on 02/19/2013 04:21:27 PM:

Sorry, that's just pseudocode to show I had used <link> and <script> to bring in the css and js code. I tried to reduce the amount of general script for brevity opting to focus on more important code from the progressbar example.

Joe

Sent by FoxWeb Support on 02/19/2013 02:40:45 PM:

I don't understand what the "import" statements are doing in your HTML HEAD section. You need to place the css and js files in your web tree and reference them with <link> and <script> elements, respectively (or incorporate them in your output after reading their contents with FILETOSTR, like in ProgressBarDemo.fwx).

Also, I don't see a BODY element in your HTML. It is recommended that you validate your HTML and JS code with one of the many available validators.

FoxWeb Support Team
support@foxweb.com email

Sent by Joe Goldsmiith on 02/17/2013 10:17:15 PM:

I incorporated the FoxWeb progress bar into a slow running script that fetches FedEx XML rates. The script runs slowly because FedEx requires a separate call for each service. So far I have 7 services requiring a call each. All the programming is on one page (fedex.fwx) with a form on top with action="fedex.fwx" to re-call the page. Once the script gets to Request.FormCount lower down the page, the progress bar code needs to run but it doesn't until the script reaches the bottom of the page. Needless to say, this is not the intended behavior.

What I need to know is how to have code below FormCount execute and show to screen while the loop for each service runs. I understand that how it would work for whole page loading but wish to start and stop it below Request.FormCount and within a loop. Here is some sample code for consideration.

*** Script File FedEx.fwx

<head>

import progress.css

import progress.js

</head>

<head>

Get information to calculate rate...

</form>

IF Request.FormCount("Submit") > 0
   ***PROGRSS BAR
   M.StartTime = SECONDS()
   response.write("<div id='progressOuterDiv'></div>")
   ***Initialize and show the toolbar
   response.write("<script language='JavaScript'>")
   response.write("var progressBar = new cProgressBar();")
   response.write("progressBar.init();")
   response.write("progressBar.show(true);")
   response.write("</script>")

for x = 1 to m.nRowTotal
M.TotalSteps = m.nRowTotal

XML To Send FedEx Rate Request...

XML Fetch Rate Response

Send Rates To Screen

response.write("<script language='JavaScript'>UpdateProgressBar(x / M.TotalSteps * 100, 'Completed step ' + Server.ToString(x) + ' of ' + Server.ToString(M.TotalSteps))</script>")
WAIT '' TIMEOUT .5

endfor && loop through all services

endif

<script language="JavaScript">progressBar.show(false);</script>
</body>
</html>

<%
**************************************************************************************************
PROCEDURE UpdateProgressBar
* Generates JavaScript code, which calls progressBar.update() method to update
* the progress bar, for example:
* <script language="JavaScript">progressBar.update(47, 'Completed 47% of the process');</script>
**************************************************************************************************
    LPARAMETERS PercentComplete, StatusText
    * First of all extend the script timeout by 10 seconds if it will expire in less than 5 seconds
    IF (SECONDS() - StartTime) + 5 >= Server.ScriptTimeout
        Server.AddScriptTimeout(10)
    ENDIF
    IF TYPE('M.StatusText') <> 'C'
        * No status text was specified -- Let ProgressBar code generate the status text
        Response.Write([<script language="JavaScript">progressBar.update(] + Server.ToString(M.PercentComplete) + [);</script>] + CRLF)
    ELSE
        Response.Write([<script language="JavaScript">progressBar.update(] + Server.ToString(M.PercentComplete) + [, '] + M.StatusText + [');</script>] + CRLF)
    ENDIF
    * Force output to be sent to browser
    Response.Flush
ENDPROC
%>

Any thoughts from anyone as to how to make the progress bar show up after Request.FormCount and update within the For Next loop?

Thanks much!!!

Joe