Seriously, Mike?!? Haven't you learned not to discuss theology on a technical forum? ;-)
Marty > -----Original Message----- > From: CMSTSO Pipelines Discussion List [mailto:CMS-PIPELINES@VM.MARIST.EDU] > On Behalf Of Mike Walter > Sent: Tuesday, August 12, 2014 16:15 PM > To: CMS-PIPELINES@VM.MARIST.EDU > Subject: Re: [CMS-PIPELINES] Extract part of record > > Nice job, Jim! Except that you have the stage separator on the WRONG SIDE! > > <Mike quietly and quickly slides behind the nearest pillar> > > Mike Walter > > -----Original Message----- > From: CMSTSO Pipelines Discussion List [mailto:CMS-PIPELINES@VM.MARIST.EDU] > On Behalf Of James Vincent > Sent: Tuesday, August 12, 2014 14:18 > To: CMS-PIPELINES@VM.MARIST.EDU > Subject: Re: Extract part of record > > 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*