INSPECT TALLYING FOR CHARACTER BEFORE INITIAL SPACES

INSPECT TALLYING FOR CHARACTER BEFORE INITIAL SPACES The following COBOL program depicts the use of  INSPECT TALLYING FOR CHARACTER BEFORE INITIAL SPACES        01 TEST-STRING   PIC X(40) VALUE SPACES.        01 WS-COUNTER    PIC 9(9)  VALUE ZEROES.        01 SEARCH-STRING PIC X(2)  VALUE SPACES.              MOVE ‘THIS IS TEST STRING TO TEST LEADING SPACES’              INSPECT TEST-STRING TALLYING WS-COUNTER FOR              CHARACTERS BEFORE INITIAL SPACES              DISPLAY ‘CHARACTERS BEFORE INITIAL SPACES = ‘ The output of the program is  CHARACTERS BEFORE INITIAL SPACES = 000000004