How to get Flash Actionscript 3.0 to play in WebSpeed?

Can anyone help me in getting a Flash Actionscript 3.0 .swf file to play in WebSpeed? I am new to using WebSpeed so I may not explain in the correct terminology. Below is the code I have in Webspeed file flash2009.w that's being called in a <!--ProTag TYPE="Text" NAME="w_flash"--> located in a flash2009.htm file. When you view the flash2009.r in the browser, only the Flash object gray background appears. Right click Flash object and says "Movie not loaded" is grayed out.

&SCOPED-DEFINE SELF-NAME w_flash
&ANALYZE-SUSPEND _CODE-BLOCK _CONTROL w_flash web.output
PROCEDURE w_flash.output :
/*------------------------------------------------------------------------------
  Purpose:     Output the value of the field to the WEB stream
               in place of the HTML field definition.
  Parameters:  p-field-defn
  Notes:      
------------------------------------------------------------------------------*/
   DEFINE INPUT PARAMETER p-field-defn AS CHARACTER NO-UNDO.
  DO WITH FRAME {&FRAME-NAME}:

    assign l-res-file = "hant_cat01".
        l-res-file = l-base +   l-res-file + "?p-seq-no=" + h_seq_no + "&cat-name=news052709".
        ASSIGN REQUEST_METHOD = "GET":U.

{&out} "<object classid='clsid:d27cdb6e-ae6d-11cf-96b8-444553540000' codebase='http://fpdownload.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=8,0,0,0' width='632' height='200' id='twitterAMI2' align='middle'>~n".
{&out} "<param name='allowScriptAccess' value='sameDomain' />~n".
{&out} "<param name='movie' value='twitterAMI2.swf' />~n".
{&out} "<param name='loop' value='false' />~n".
{&out} "<param name='menu' value='false' />~n".
{&out} "<param name='quality' value='high' />~n".
{&out} "<param name='bgcolor' value='#333333' />~n".
{&out} "<embed src='twitterAMI2.swf' loop='false' menu='false' quality='high' bgcolor='#333333' width='632' height='200' name='twitterAMI2' align='middle' allowScriptAccess='sameDomain' type='application/x-shockwave-flash' pluginspage='http://www.macromedia.com/go/getflashplayer' />~n".
{&out} "</object>~n".
       
               
  END.
 
END PROCEDURE.
&ANALYZE-RESUME