You don't do something for a few months, and it's like you never did. I have
some data:

101 ABC
102 400~455~456\400~475~476\400~480~481\400~577~578

I need to make a listing from keys like:

ABC*400
ABC*455
ABC*456
ABC*400
ABC*475
ABC*476
ABC*400
ABC*480
ABC*481
ABC*400
ABC*577
ABC*578

The tildes are @TM (CHAR(251)). My PR.DESC I-Descriptor look like this:

@RECORD(102);TRANS(TRFILE,(@:REUSE('*':@RECORD(101 ))),1,'C')

and the statement: LIST PRODUCTS '12345' 101 PR.DESC produces this:

PRODUCTS...................... 101.. 102 PR.DESC..................

123456 ABC 400 8.000*3.0
455
456
400
475
476
400
480
481
400
577
578

So, something is clearly wrong. I know I should probably go to the U2 list,
but I always come here first. Thanks for giving it a look.

Ed

Hi Ed,

Try something like:

TRANS('TRFILE', CATS(REUSE(@RECORD(102):'*', @RECORD(101), 1, 'C')

Like you, I haven't looked this up either, so I've probably got some
syntax wrong. <g>

Brian

On 1/07/2010 2:44 p.m., Ed Sheehan wrote:

I found one bonehead error. @RECORD(101) should be @RECORD<101>. But I had
to go A-correletive because the I-Descriptor engine lost track of its place
in the vm/svm/tm jungle. I build a big ol' IF/THEN/ELSE string and got it
working. WAY too much time on I-types; Pick came through again.

BTW, I have never used CATS before. Looks useful - I'll have to give it a go
sometime.

Thanks Brian,

Ed


"Brian Speirs" <bss59 (AT) btinternet (DOT) com> wrote