Re: RPG ILE or RPGIII in disguise?

Quick thoughts ...

On 12/03/2010, at 9:01 PM, David FOXWELL wrote:

Input parameter client, date
Read subscribed products
if the product read has expired at the date received, break and return no.
Read children,
if the child read has reached required age, break and return no.
return yes

All this is in one <function>.
No other procedure would have access to the products or children of the client.

I would rather :
Function getProducts (client : dateNow)
Function getProducts (client : dateThen)
Function getChildren (client : dateNow)
Function getChildren (client : dateThen)

This approach will likely perform 2 to 4 times as much I/O as the first one. How would the data for products and children be returned?

Then, (roughly speaking)
If ProductsNow <> ProductsThen or ChildrenNow <> ChildrenThen
NO
Else
YES

If you did adopt this approach then this test should be hidden away in another
hasExpired( client, date )
type function. This function would call the various getters, perform the test, and return the TRUE/FALSE state.

I have still not worked with service programs, but I'd like to think that there'd be one for getProducts and another for getChildren.

Wouldn't all these related functions be in the same service program?

Another procedure would be able to access any one of the children or products for the client at the date given. Would that be possible?

That depends on the data and how it is keyed but seems possible.

Regards,
Simon Coulter.
--------------------------------------------------------------------
FlyByNight Software OS/400, i5/OS Technical Specialists

http://www.flybynight.com.au/
Phone: +61 2 6657 8251 Mobile: +61 0411 091 400 /"\
Fax: +61 2 6657 8251 \ /
X
ASCII Ribbon campaign against HTML E-Mail / \
--------------------------------------------------------------------