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].

Reply via email to