title: How to remove leading zeroes & trailing spaces in COBOL
body: <p>Hi I have requirement to read a input file, each record contains certain record</p>
  <pre><code>01 FILE-DATA.
     05 FILE-FIELD-A     PIC 9(18).
     05 FILLER           PIC X(01) VALUE '*'.
     05 FILE-FILED-B     PIC X(30).
     05 FILLER           PIC X(01) VALUE '*'.
  </code></pre>
  <p>input data: 12345*ACBDE12345</p>
  <p>when I unstring the file record, each file is getting 000000012345 (leading zeroes) &amp; 'ABCDE12345          ' (trailing spaces).</p>
  <p>Strangely the file data is send with such variable length into to fixed data structure, to tackle this how can I go about removing the leading zeroes and Trailing spaces.</p>