Here's a DFSORT/ICETOOL job that will do what I think you asked for. I'm assuming that you don't have any duplicates in input file1 and you don't have any duplicates in input file2. I'm also assuming that when you say position 51-60 in the VB file, you're not counting the RDW in positions 1-4 and that the field is really at positions 55-64. If you are counting the RDW, let me know and I'll tell you what to change.
If you're not familiar with DFSORT and DFSORT's ICETOOL, I'd suggest reading through "z/OS DFSORT: Getting Started". It's an excellent tutorial, with lots of examples, that will show you how to use DFSORT, DFSORT's ICETOOL and DFSORT Symbols. You can access it online, along with all of the other DFSORT books, from: