PBDJ Vol. 8 Issue 4

DataWindows, by Larry Cermak

Listing 1

<!--SCRIPT
  function GetParam( envparam ) {
    for (el in document.value) {
      if (el == envparam) {
        return document.value[envparam];
      }
    }
      return "undefined";
};
dwServer = java.CreateComponent("DataWindow/HTMLGenerator","iiop:
//localhost:9000", "jagadmin", "");
dwServer.SetDWObject ("c:\\ctp\\articles\\sybase\\source\\articles.pbl", "d_department_pbdj")
dwServer.SetHTMLObjectName ("dwClient");
dwServer.SetTrans("ODBC","Disablebind=1,ConnectString=
 'DSN=EAS Demo DB V3;UID=dba;PWD=sql'", "", "", "", "", "")
   dwServer.Retrieve()
// Check if we need to perform the action
var dwClient_action = GetParam("dwClient_action");
var dwClient_context = GetParam("dwClient_context");
if ("undefined" != "" + dwClient_action)
{
    document.write("action=" + dwClient_action + "<BR>");
    document.write("context=" + dwClient_context +
     "<BR>");
    retVal = dwServer.SetAction (dwClient_action, dwClient_context);
    if (retVal < 0 )
    {
        document.write("Setaction error=" + retVal +
         "<BR>");
    }
}
dwServer.SetSelfLink (document.name, "");
dwServer.SetWeight (true, true, true, true, true)
document.Write( dwServer.Generate() );
-->