You can consolidate
FIND and ADD methods into a single REF method. You can change the
following code:
rc = h.find();
if (rc ne = 0) then
rc = h.add();
to
rc = h.ref();
The REF method is useful
for counting the number of occurrences of each key in a hash object.
The REF method initializes the key summary for each key on the first
ADD, and then changes the ADD for each subsequent FIND.
Note: The REF method sets the data
variable to the value of the data item so that it is available for
use after the method call.