That is darn close to what I did - thanks! FWIW, this is how I managed it. There was a hex 0 after the data so I chopped it there. I needed to preserve the rest of the data in the record and simply put the data after the key (happens to be a date) in the front to select on it.
Probably not super elegant, but it works! ...lots'o'data... 'A: FANOUT |', 'NOT CHOP AFTER STRING "$KEY$" |', 'CHOP X00 |', 'DATECONV W1 USA RS |', 'SPECS RECNO 1 1-* 12 |', 'APP: FANIN |', 'SORT 1.10 |', 'SPECS W2-* 1 |', 'JOIN 1 / / |', 'SPECS W1.3 1 |', 'STEM DATA.', '? A: |', 'BUFFER |', 'SPECS RECNO 1 1-* 12 |', 'APP:' -- *James Vincent*