Thanks guys.
The substr of substr of etc... was the ticket.
Here is what I have and it works like a charm.
" xlate ",
" ( ",
" substr 2-* of ",
" substr fs - f 2 of ",
" substr w 2 of ",
" fs $ f1 ",
" substr 2-* of ",
" substr fs - f 3 of ",
" substr w 2 of ",
" fs $ f1 ",
" substr 2-* of ",
" substr fs - f 4 of ",
" substr w 2 of ",
" fs $ f1 ",
" substr 2-* of ",
" substr fs - f 5 of ",
" substr w 2 of ",
" fs $ f1 ",
" substr 2-* of ",
" substr fs - f 6 of ",
" substr w 2 of ",
" fs $ f1 ",
" substr 2-* of ",
" substr fs - f 7 of ",
" substr w 2 of ",
" fs $ f1 ",
" ) ",
" lower ",
==>-----Original Message-----
==>From: CMSTSO Pipelines Discussion List [mailto:CMS-
==>[email protected]] On Behalf Of Bob Cronin
==>Sent: Friday, July 31, 2009 4:03 PM
==>To: [email protected]
==>Subject: Re: XLATE a string
==>
==>pipe strliteral /15 crcs001-REG-WORKER-ID$PIC X(00023)./ | xlate substr
==>fs -
==>f2
==>of substr w2 of substr fs $ f1 of 1-* lower | console
==>15 crcs001-reg-WORKER-ID$PIC X(00023).
==>
==>On Fri, Jul 31, 2009 at 3:50 PM, Hughes, Jim <[email protected]>
==>wrote:
==>
==>> I have a record with field separators of $.
==>>
==>>
==>>
==>> Within those fields I may have field separators of -.
==>>
==>>
==>>
==>>
==>>
==>> Here is a sample of my input record:
==>>
==>> 15 crcs001-REG-WORKER-ID$PIC X(00023).
==>>
==>>
==>>
==>> How would I write the xlate statement to only deal with the second
==>field
==>> delimited by - of second word of first field delimited by $?
==>>
==>>
==>>
==>> 15 crcs001-REG-WORKER-ID$PIC X(00023).
==>>
==>> ^^
==>>
==>>
==>>
==>> The ^^ point to what I would want to lowercase.
==>>
==>>
==>>
==>> Thanks.
==>>
==>>
==>>
==>>
==>>
==>> ____________________
==>>
==>> Jim Hughes
==>>
==>> 603-271-5586
==>>
==>> "It is fun to do the impossible."
==>>
==>>
==>>
