Re: Web apps on the AS/400 (where's the Java?)

[Ken.Slaugh@xxxxxxxxxx]

Yes, Leif. For what started out as Nina's 'food fight' has actually been a
good set of posts.

I've been happy to see and consider all the code, concepts and information
so far. I am hoping however, this thread continues until someone shows all
of us a better 'hook' into existing RPG programs.

But, before someone can create a Java hook... maybe MI code can show a more
practical side then just changing test_some_string to
test_some_other-string. How about a new situation, one that MI would be
great at. Can you follow this enough to code it or discuss it?

d Field_ID        s             15 varying
d Field_Values    s          32000 varying    (a User space? or Pointer?
Discuss.)
d Field_Value     s          32000 varying    (a User space? or Pointer?
Discuss.)
d $Delim          c                   const('=')
d $Tab            c                   const(x'05')

Field_ID, Field_Values are to be assigned and initialized by an RPG
program. This solution is, to calculate the value of Field_Value. Field_ID
will not contain a $Delim and is not case sensitive. This solution may not
change the contents of either Field_ID or Field_Values.

Here's the simplest example of what Field_Values may look like...
Field_Values = 'Field1=' + 'value1' + $Tab + 'Field2=' + $Tab + 'Field3=' +
'Value3'

Simply find the Field_ID within the Field_Values and return Field_Value.
Field_Value may be zero length or Null.

Field_ID values of "field1", "fIELD2" and "Field3" would result in a
Field_Value of "value1", Null and "Value3" respectfully.

It doesn't really matter how fast it can be coded and it will run fast
enough. It will be faster or slower on someone's machine or in some other
language. Speed is always an issue though and invoking the routine must be
quick.

BTW, I have RPG and a Visual Basic code for this solution (in case you're
interested),

Ken Slaugh  (707) 795-1512 x118
Chouinard & Myhre, Inc.
AS/400 Professional Administrator/MSE
Client Access Specialist
http://www.cm-inc.com/


                                                                                
                 
                    "Leif Svalgaard"                                            
                 
                    <leif@leif.org>            To:     
<MIDRANGE-L@midrange.com>                 
                    Sent by:                   cc:                              
                 
                    owner-midrange-l@mi        Subject:     Re: Web apps on the 
AS/400           
                    drange.com                                                  
                 
                                                                                
                 
                                                                                
                 
                    03/19/01 04:19 PM                                           
                 
                    Please respond to                                           
                 
                    MIDRANGE-L                                                  
                 
                                                                                
                 
                                                                                
                 



From: John Taylor <john.taylor@telusplanet.net>

> Is it just me, or does anyone else wonder these tests are supposed to
prove?
> You're comparing 150's to 170's to 270's etc, all with various (unnamed)
> processors and active workloads. One guy does the RPG version on "System
A",
> another does the C version on "System B", and so forth. What use could
such
> results possibly have?

good point, of course, but what the tests show so far is that most of them
are in the same general ballpark. Once we a say a Java solution, it's time
to run them all on the same system. I'll be happy to do so. But let's get
the code snippets first. This whole thing started because it was stated
without any substantiation that "Java was much better than RPG for string
manipulation". Soon we can compare code and maybe even do a
timing test.

+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to
MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator:
david@midrange.com
+---




+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---