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*

Reply via email to