Re: RNF5029 with multiple qualified DS

[Jon Paris <Jon.Paris@xxxxxxxxxxxxxx>]

On 15-Nov-07, at 5:21 PM, rpg400-l-request@xxxxxxxxxxxx wrote:

> I'll alter the copybook for the
> called programs so that the DS are not initialized at compile time.
> I'll let you know how I fair.

The only thing you need to remove is the INZ on the ProdCount field  
in the Services and Events DSs.  All of the other initializations  
have no impact on these DSs since you did not code INZ(*LIKEDS) and  
as a result no other initializations were used - Just those directly  
coded.

Jon Paris

www.Partner400.com
www.SystemiDeveloper.com