Example 10
OPTION COPY
INREC FINDREP=(IN=(X'00',X'FF'),OUT=C'')
This example illustrates how you can remove characters from FB or VB records.
The VB input records might look like this in hexadecimal:
RDW----|Data
000F0000D1E4D5C500C1D7D9C9D3FF
00100000C2C5E3E3E800C4C1C9E2E8FF
We want to remove each X'00' and X'FF' character. We use IN=(X'00',X'FF') to indicate we want to find each X'00' and X'FF' character, and OUT=C'' (null) to indicate we want to remove it.
The output records look like this:
RDW----|Data
000D0000D1E4D5C5C1D7D9C9D3
000E0000C2C5E3E3E8C4C1C9E2E8
Note that the X'00' and X'FF' characters have been removed and the RDW length decreased accordingly. For VB input records, FINDREP processing automatically starts at position 5 after the RDW so the X'00' characters in the RDW are not affected.