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.