How about this? I didn't test it...
"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:"
On Tue, Jan 11, 2011 at 3:55 PM, Frank M. Ramaekers
<[email protected]>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
> [email protected].
>
