job hha 2 1 time 5 8 perm disc 500 10 size 200000
outasn1gram = set 1 disc
lookup asn1gram
if ok.no
  lib temp.libbobs asn1gram
lookup asn1bobs
if ok.no
  lib temp.libbobs asn1bobs
o outasn1gram
asn1tab= set 42 disc
bobstables= assign asn1tab
(i asn1gram
asn1bobs)
o c
lib on.libbobs asn1tab outasn1gram
end