Skip to Content
0
Former Member
Dec 01, 2006 at 08:10 AM

HOW TO TRUNCATE LEADING ZEROS [ URGENT ]

143 Views

A PROGRAM TO GET THE LENGTH OF THE SRVPOS [ SERVICE NUMBER]

BUT IN OUTPUT IT IS GIVING 12 LEADING ZEROS WHAT SHALL I DO TO REMOVE LEADING ZEROS AND TO GET THE LENGTH OF THE SRVPOS [ SERVICE NUMBER] AFTER REMOVING LEADING ZEROS

TABLES: ESLL.

DATA: BEGIN OF IT OCCURS 0,

SRVPOS LIKE ESLL-SRVPOS,

END OF IT.

DATA:LEN TYPE I VALUE 0,

IT1 TYPE I,

IT2 TYPE C VALUE 0,

N(15) VALUE'1000000000000'.

SELECT SRVPOS INTO IT FROM ESLL .

IT1 = IT MOD N.

IT2 = IT1.

LEN = STRLEN( IT2 ).

WRITE: / LEN,IT2.

ENDSELECT.