     A*
     A                                      UNIQUE
     A          R AVKEYWORDS
     A*
     A            VNUM           7  0       TEXT('Vendor Number')
     A            VKEYWORD      40          TEXT('Keyword')
     A*
     A          K VKEYWORD
     A          K VNUM
     A* 