OK, now I did, and found the missing comma.

"PIPE (endchar ?)",
    "|  LITERAL 0001 0021 0000",
    "|  SPLIT AT BLANK",
    "| A: CHOP 3",
    "|  STRIP LEADING 0",
    "| B: FANINANY",
    "| JOIN 1",
"|  SPEC />/ 1 1-* N /</ N",
    "|  CONSOLE",
"?  A: |",
    "B:"

>1<
>21<
>0<
Ready; T=0.01/0.01 16:15:18





> On Tue, Jan 11, 2011 at 3:55 PM, Frank M. Ramaekers <framaek...@ailife.com
> > wrote:
>
>> Okay, this failed because ZONE is used for SEARCHING only.   Somebody
>> else got a simple solution?
>>
>>
>>
>>
>>
>> This works...almost:
>>
>>
>>
>>  "PIPE (endchar ?)",
>>
>>      "|  LITERAL 0001 0021 0000",
>>
>>      "|  SPLIT AT BLANK",
>>
>>      "|  STRIP LEADING 0",
>>
>>  "|  SPEC />/ 1 1-* N /</ N",
>>
>>      "|  CONSOLE"
>>
>>
>>
>> >1<
>>
>> >21<
>>
>> ><
>>
>>
>>
>> Well I want 0 (zero) for 0000 (like normal leading zero suppression), so
>> I thought about restricting the STRIP to the first 3 digits:
>>
>>
>>
>> "PIPE (endchar ?)",
>>
>>     "|  LITERAL 0001 0021 0000",
>>
>>     "|  SPLIT AT BLANK",
>>
>>     "|  ZONE 1.3 STRIP LEADING 0",
>>
>> "|  SPEC />/ 1 1-* N /</ N",
>>
>>     "|  CONSOLE"
>>
>>
>>
>> >0001<
>>
>> >0021<
>>
>> >0000<
>>
>>
>>
>> Hmmm....well that didn't work very well!    Why?
>>
>>
>>
>>  Frank M. Ramaekers Jr.
>>
>>
>>
>>
>>
>> Systems Programmer
>>
>> MCP, MCP+I, MCSE & RHCE
>>
>>
>>
>> American Income Life Insurance Co.
>>
>> Phone: (254)761-6649
>>
>>
>>
>> 1200 Wooded Acres Dr.
>>
>> Fax: (254)741-5777
>>
>>
>>
>> Waco, Texas  76701
>>
>>
>>
>>
>>
>>
>>
>>
>> _____________________________________________________
>> This message contains information which is privileged and confidential and
>> is solely for the use of the
>> intended recipient. If you are not the intended recipient, be aware that
>> any review, disclosure,
>> copying, distribution, or use of the contents of this message is strictly
>> prohibited. If you have
>> received this in error, please destroy it immediately and notify us at
>> privacy...@ailife.com.
>>
>
>

Reply via email to