RE: Java and CPU

["Joe Pluta" <joepluta@xxxxxxxxxxxxxxxxx>]

Oh yeah, one more thing...

The second version is obviously designed for a web browser.  The first
version, though, is kinda special - it's designed for a Palm Pilot.  Works
quite well.  And the cool thing is that both versions use exactly the same
RPG program and exactly the same servlet.  The only difference is the JSP.

This is what you can do with a well-designed component-based widget
architecture that you can't do in CGI without a whole lot of work.

Joe

And if you're wondering, here's the JSP for the Palm version (replace the
square brackets with angles):

[BEAN name="jdspf" type="Schedule_DisplayFile" introspect="no" create="no"
scope="session"]
[/BEAN]

[form method="post" action="/servlet/Schedule_Servlet_Palm"]

  [% jdspf.setCurrentRecord("STPCTL01"); %]

[TABLE BORDER="1" BORDERCOLOR="black"]
[TR]
        [TD][H3][%= jdspf.getFormattedField("SCHDSC") %][/H3][/TD]
[/TR]
[tr]
        [td]Train #[%= jdspf.getFormattedField("TRNID") %][/td]
[/tr]
[/table]

  [input name="button" type="submit" value="Back"] &nbsp
  [input name="button" type="submit" value="[["] &nbsp
  [input name="button" type="submit" value="]]"]

  [% jdspf.setCurrentRecord("STPSFL01"); %]

  [table border="0"]
    [tr]
        [th]Station[/th]
        [th]Time[/th]
    [/tr]

    [%
      com.pbd.pub.jdspf.JdspfSubfile subfile =
        (com.pbd.pub.jdspf.JdspfSubfile) jdspf.getCurrentRecord();
      while (subfile.getNextRow()) {
    %]

    [tr]
        [td][%= jdspf.getFormattedField("XXSTN") %][/td]
        [td][%= jdspf.getFormattedField("XXTIM") %][/td]
    [/tr]

    [%
      }
    %]

  [/table]

  [% jdspf.setCurrentRecord("STPCTL01"); %]

  [input name="button" type="submit" value="Back"] &nbsp
  [input name="button" type="submit" value="[["] &nbsp
  [input name="button" type="submit" value="]]"]

[/form]

+---
| This is the JAVA/400 Mailing List!
| To submit a new message, send your mail to JAVA400-L@midrange.com.
| To subscribe to this list send email to JAVA400-L-SUB@midrange.com.
| To unsubscribe from this list send email to JAVA400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner: joe@zappie.net
+---