ILE COBOL Language Reference

INSPECT Statement Examples

The following examples illustrate some uses of the INSPECT statement. In all instances, the programmer has initialized the COUNTR field to zero before the INSPECT statement is executed.

INSPECT ID-1
      REPLACING CHARACTERS BY ZERO.

ID-1 Before COUNTR After ID-1 After
1234567 0 0000000
HIJKLMN 0 0000000
INSPECT ID-1
TALLYING COUNTR FOR CHARACTERS
REPLACING CHARACTERS BY SPACES.

ID-1 Before COUNTR After ID-1 After
1234567 7
HIJKLMN 7
INSPECT ID-1
      REPLACING CHARACTERS BY ZEROS
           BEFORE INITIAL QUOTE.

ID-1 Before COUNTR After ID-1 After
456"ABEL 0 000"ABEL
ANDES"12 0 00000"12
"TWAS BR 0 "TWAS BR
INSPECT ID-1
     TALLYING COUNTR FOR CHARACTERS AFTER INITIAL "S"
     REPLACING ALL "A" BY "O".

ID-1 Before COUNTR After ID-1 After
ANSELM 3 ONSELM
SACKET 5 SOCKET
PASSED 3 POSSED
INSPECT ID-1
     TALLYING COUNTR FOR LEADING "0"
     REPLACING FIRST "A" BY "2"
          AFTER INITIAL "C".

ID-1 Before COUNTR After ID-1 After
00ACADEMY00 2 00AC2DEMY00
0000ALABAMA 4 0000ALABAMA
CHATAM0000 0 CH2THAM0000
INSPECT ID-1
     CONVERTING "ABCD" TO "XYZX"
          AFTER QUOTE
          BEFORE "#".

ID-1 Before ID-1 After
AC"AEBDFBCD#AB"D AC"XEYXFYZX#AB"D


[ Top of Page | Previous Page | Next Page | Table of Contents | Index ]