import ws.*;

public class HelloWorld
{
  public WTableList Request(WServer oServer, WParamList oParamList)
  { 
    int rc;
    WTableList oTableList, oTableListRun;
    WTable     oTable, oTableRun;
    WParamList oParamListRun;
    String     szFileName, param1, param2, szMsgDB, szMsgServlet, szMsgFile;

    oTableList    = new WTableList(oServer);
    oTable        = new WTable(oServer);
    oTableRun     = new WTable(oServer);
    oTableListRun = new WTableList(oServer);
    oParamListRun = new WParamList(oServer);

    // Parameters are used for demo purpose only!
    param1 = oParamList.GetParam(0);   
    param2 = oParamList.GetParam(1);

    // Run SQL request
    oParamListRun.Clean();
    rc = oServer.Request("HelloWorldSql", oParamListRun, oTableListRun);
    if (rc != 0)
      return oTableListRun;      
    oTableListRun.GetTable(0, oTableRun);
    szMsgDB = oTableRun.GetField(0,0);

    // Get text from file
    szFileName = "msg.txt";
    szMsgFile = oServer.ReadFile("HelloWorld",szFileName);

    szMsgServlet = "Hello World! [from servlet]";

    // Create output table
    oTable.CreateCol(100);   // 0 database
    oTable.CreateCol(100);   // 1 servlet
    oTable.CreateCol(100);   // 2 text file
    oTable.CreateRow();

    // Put data in output table
    oTable.SetField(0,0,szMsgDB);
    oTable.SetField(0,1,szMsgServlet);
    oTable.SetField(0,2,szMsgFile);

    oTableList.AddTable(oTable);            
    
    oServer.SetOutputPage("HelloWorld");

    return oTableList; 
  }
}