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-
==>pipeli...@vm.marist.edu] On Behalf Of Bob Cronin
==>Sent: Friday, July 31, 2009 4:03 PM
==>To: CMS-PIPELINES@VM.MARIST.EDU
==>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 <jim.hug...@doit.nh.gov>
==>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."
==>>
==>>
==>>

Reply via email to