Figure 2. Example data structure definition

D totals          ds       2000000
D   numParts                    10i 0 inz
D   info                              dim(100000)
D   part                              like(partsDs_in.part_id)
D                                     overlay(info:*next)
D   quantity                    10i 0 overlay(info:*next)