To find all occurrences of "MIMIC" in a member such as the
one shown in Figure 1, type FIND ALL
MIMIC on the command line.
Figure 1. Before FIND command (ISREDDE2) File Edit Edit_Settings Menu Utilities Compilers Test Help
───────────────────────────────────────────────────────────────────────────────
EDIT SBURNF.PRIVATE.EXEC(FCEXMP) - 01.00 Columns 00001 00072
Command ===> find all mimic Scroll ===> CSR
****** ***************************** Top of Data ******************************
000001 /* REXX */
000002 /* REXX */
000003 ADDRESS TSO
000004 /* */
000005 /* RECREATE THE OLD BACKUP DATA SETS */
000006 /* */
000007 CALL MIMIC "ALLOC DA('PDFTDEV.SVT2.ARCHDEF')"
000008 CALL MIMIC "ALLOC DA('PDFTDEV.SVT2.CLIST')"
000009 CALL MIMIC "ALLOC DA('PDFTDEV.SVT2.CPP')"
000010 CALL MIMIC "ALLOC DA('PDFTDEV.SVT2.EXEC')"
000011 CALL MIMIC "ALLOC DA('PDFTDEV.SVT2.GIF')"
000012 CALL MIMIC "ALLOC DA('PDFTDEV.SVT2.GMLINC')"
000013 CALL MIMIC "ALLOC DA('PDFTDEV.SVT2.HPP')"
000014 CALL MIMIC "ALLOC DA('PDFTDEV.SVT2.HSAS65')"
000015 CALL MIMIC "ALLOC DA('PDFTDEV.SVT2.LEL')"
000016 CALL MIMIC "ALLOC DA('PDFTDEV.SVT2LMAP')"
000017 CALL MIMIC "ALLOC DA('PDFTDEV.SVT2.LOAD')"
F1=Help F2=Split F3=Exit F5=Rfind F6=Rchange F7=Up
F8=Down F9=Swap F10=Left F11=Right F12=Cancel
After you press Enter, the editor searches for the string starting
at the top of the data, places the cursor at the beginning of the
first occurrence ( 1 ), and displays the
number of occurrences ( 2 ) as shown in Figure 2.
Figure 2. After FIND command File Edit Edit_Settings Menu Utilities Compilers Test Help
───────────────────────────────────────────────────────────────────────────────
EDIT SBURNF.PRIVATE.EXEC(FCEXMP) - 01.00 2 21 CHARS 'MIMIC'
Command ===> Scroll ===> CSR
****** ***************************** Top of Data ******************************
000001 /* REXX */
000002 /* REXX */
000003 ADDRESS TSO
000004 /* */
000005 /* RECREATE THE OLD BACKUP DATA SETS */
000006 /* */
000007 CALL 1 MIMIC "ALLOC DA('PDFTDEV.SVT2.ARCHDEF')"
⋮