Reformat Definition Editor
The following figure enables you to create reformat definitions or change existing definitions. File-AID displays the Reformat Definition Editor screen when you:
- Leave the OPTION field blank and specify the name of an existing data set and member on the Reformat Definition screen
- Complete the fields on the Reformat Record Layouts screen and press Enter.
The editor allows you to use field references and field overlays to create a reformat definition. You can define the following on the Reformat Definition Editor screen:
- Records from the source data set to copy to the target data set
- Source fields for each target field
- Initial values for new target fields.
Reformat Definition Editor screen
File-AID - Reformat Definition Editor - - - - - - - - - - - - - - - - - - -
COMMAND ===> SCROLL ===> PAGE
Source COBOL - EMPLOYEE-MASTER-FILE ---- USERID9.FASAMP.LAYOUTS(EMPLOYEE) ------
Num Field Name Format Pic OP Data Row 1 of 35
0 EMPLOYEE-MASTER-FILE GRP/198
1 EMP-NUMBER AN/5
2 EMP-LAST-NAME AN/15
3 EMP-FIRST-NAME AN/10
4 EMP-MID-INIT AN/1
5 FILLER AN/2
6 EMP-TITLE AN/30
7 EMP-PERSONAL-INFO GRP/23
Target COBOL - EMPLOYEE-MASTER-FILE ---- USERID9.FASAMP.LAYOUTS(EMPLOYE2) ------
Num Field Name Format Pic Data Row 1 of 36
0 EMPLOYEE-MASTER-FILE GRP/211
1 EMP-NUMBER AN/5 /1
2 EMP-FIRST-NAME AN/15 /3
3 EMP-MID-INIT AN/1 /4
4 EMP-LAST-NAME AN/20 /2
5 EMP-TITLE AN/30 /6
6 EMP-PERSONAL-INFO GRP/24
7 EMP-NATL-ID-NUMBER NUM/9 9v00 /8
Use END Command to Save then End, CANCEL to Cancel, or EX to Execute Reformat
COMMAND ===> SCROLL ===> PAGE
Source COBOL - EMPLOYEE-MASTER-FILE ---- USERID9.FASAMP.LAYOUTS(EMPLOYEE) ------
Num Field Name Format Pic OP Data Row 1 of 35
0 EMPLOYEE-MASTER-FILE GRP/198
1 EMP-NUMBER AN/5
2 EMP-LAST-NAME AN/15
3 EMP-FIRST-NAME AN/10
4 EMP-MID-INIT AN/1
5 FILLER AN/2
6 EMP-TITLE AN/30
7 EMP-PERSONAL-INFO GRP/23
Target COBOL - EMPLOYEE-MASTER-FILE ---- USERID9.FASAMP.LAYOUTS(EMPLOYE2) ------
Num Field Name Format Pic Data Row 1 of 36
0 EMPLOYEE-MASTER-FILE GRP/211
1 EMP-NUMBER AN/5 /1
2 EMP-FIRST-NAME AN/15 /3
3 EMP-MID-INIT AN/1 /4
4 EMP-LAST-NAME AN/20 /2
5 EMP-TITLE AN/30 /6
6 EMP-PERSONAL-INFO GRP/24
7 EMP-NATL-ID-NUMBER NUM/9 9v00 /8
Use END Command to Save then End, CANCEL to Cancel, or EX to Execute Reformat
This section provides information about the following topics:
Tip: For faster searching, add an asterisk to the end of your partial query. Example: cert*