Web.Varios - Embeber editor HTML en WebObjects Entrega 2

Se desea abrir un reporte PDF o un WebPanel en una nueva ventana del explorador con la posibilidad de pasarle parámetros.

Para ello:

1) En el webpanel llamador

Event Txt_Btn_Confirmar.Click
   &url = link(RReportePdf1)
   call(HOpen,&url)
EndEvent

2) En un nuevo Web Panel

Crear un web panel de nombre Open que reciba por parámetro una &url, tenga un text block de nombre AAAA con la propiedad format = HTML y en el evento start programe lo siguiente:

Event Start
  WindowsId = Random() * 100000
  AAAA.caption = '<script language="JavaScript">window.open("' + trim(&url) +
    '","' + Trim(Str(&WindowsId)) +
  '","target=_top,top=10,left=10,width=400,height=300    ,scrollbars=yes,menubar=no,toolbar=no,resizable=yes,directories=no");'
    + 'history.back();</script>
  '
EndEvent // Start