How to: |
In recent releases, some FOCUS syntax may have become obsolete. Therefore, you may need to scan files and find obsolete values. Once you have found them, you can either delete them or replace them with supported syntax.
The FOCUS Scanning Utility - Find/change Value screen opens, as shown in the following image.
The string will automatically be placed within quotation marks, so you do not need to type the quotation marks as part of the search string. Note that initial spaces that are entered in the search string are captured and affect the results.
For example, in the following image, the search string FULLSCR has been entered:
The FOCUS Scanning Utility - Target Files screen opens, as shown in the following image.
Currently, an LRECL of 80 and 160 are supported. If the value is different, contact Information Builders Customer Support Services for a Master File to use to read the scanned file.
If your allocations concatenate multiple PDSs, you must search these one at a time.
A report is issued for each member that was selected. If the search string was found, the report identifies the line number. If the search string was not found, the report is empty and a message is displayed indicating that the string was not found. Press Enter when asked to issue a carriage return and after viewing each report. When all selected members have been searched, a FINISHED message is displayed. For example:
(FOC488) THE DATASET IS IN THE CATALOG: 'USER1.FOCEXEC.DATA' PERFORMING OPERATION ON ABS1 PAUSE.. PLEASE ISSUE CARRIAGE RETURN WHEN READY PAGE 1 SEARCH FOR FULLSCR FILENAME/MEMBER LINENO --------------- ------ THELINE ------- ABS1 9 -FULLSCR ON PERFORMING OPERATION ON ABY1 PAUSE.. PLEASE ISSUE CARRIAGE RETURN WHEN READY PAGE 1 SEARCH FOR FULLSCR FILENAME/MEMBER LINENO --------------- ------ THELINE ------- "VALUE NOT FOUND IN FILE ABY1 " PERFORMING OPERATION ON ABY2 PAUSE.. PLEASE ISSUE CARRIAGE RETURN WHEN READY , . . FINISHED. THANK YOU.
Now you can run or examine the members that contained the string and make any necessary adjustments.
|
Information Builders |