Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- 15 EXTR-SITE PIC X.
- 05 EXTR-DBA PIC X.
- TE0305* 05 EXTR-BRANCH PIC X(05).
- TE0305* 05 EXTR-NUMBER PIC X(06).
- TE0305 05 FILLER PIC X(11).
- CW0104 10 EXTR-TEXT6 PIC X(67).
- CW0104 10 EXTR-TEXT7 PIC X(67).
- CW0104* 05 FILLER PIC X(567).
- EXTR-SITE
- EXTR-DBA
- EXTR-NUMBER
- -------
- FILLER
- int wordStartIndex = line.indexOf("PIC");
- int wordEndIndex = line.indexOf(".");
- if ((wordStartIndex > -1) && (wordEndIndex >= wordStartIndex)) {
- System.out.println(line); }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement