RE: Main Proc for Subproc not compiling

["Joe Pluta" <joepluta@xxxxxxxxxxxxxxxxx>]

> From: Bartell, Aaron L. (TC)
>
> C            if     chainItemFile('HAT102') = found
> C            eval   item = getItem()
> C            eval   desc = get ItemDesc()
> C            eval   qoh = getQtyOnHand()
> C            endif

There's definitely something to be said for this approach, Aaron, with the
possible caveat that you do have to do a lot of calls.

One way around this would be to have the following:

D ItemDS      e ds               extname(ITEMDS01)

C            eval   ItemDS = getItemInfo(1)

In this case, you could have multiple ItemDS data structures, and the called
module would fill ein the fields based on the parameter.  If you added new
fields, you simply add another structure with those fields and add a new
option.  Old programs wouldn't change at all by the addition of an
attribute, and would still only need to do a single call.

It's very much an application design issue at this point.

Joe