File Aid
File Aid
File Aid
Release 8.8
ii
Please direct questions about File-AID/MVS or comments on this document to: File-AID/MVS Technical Support Compuware Corporation 31440 Northwestern Highway Farmington Hills, MI 48334-2564
1-800-538-7822 Outside the USA and Canada, please contact your local Compuware office or agent.
This document and the product referenced in it are subject to the following legends: Copyright 1995-2001 Compuware Corporation. All rights reserved. Unpublished rights reserved under the Copyright Laws of the United States. U.S. GOVERNMENT RIGHTS-Use, duplication, or disclosure by the U.S. Government is subject to restrictions as set forth in Compuware Corporation license agreement and as provided in DFARS 227.7202-1(a) and 227.7202-3(a) (1995), DFARS 252.227-7013(c)(1)(ii) (OCT 1988), FAR 12.212(a) (1995), FAR 52.227-19, or FAR 52.227-14 (ALT III), as applicable. Compuware Corporation. This product contains confidential information and trade secrets of Compuware Corporation. Use, disclosure, or reproduction is prohibited without the prior express written permission of Compuware Corporation. Access is limited to authorized users. Use of this product is subject to the terms and conditions of the user's License Agreement with Compuware Corporation. File-AID is a registered trademark of Compuware Corporation. IBM and DB2 are registered trademarks of International Business Machines Corporation. Adobe Acrobat Reader copyright 1987-2001 Adobe Systems Incorporated. All rights reserved. Adobe and Acrobat are trademarks of Adobe Systems Incorporated. All other company or product names are trademarks or registered trademarks of their respective owners.
iii
Contents
Introduction . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . ix Whats In This Guide? . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . ix Related Publications . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . x FrontLine Support Web Site . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . x Online Documentation . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . xi World Wide Web . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . xi File-AID/MVS Frequently Asked Questions . . . . . . . . . . . . . . . . . . . . . . . . . xi Technical Support . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . xi Documentation Feedback . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . xi Product Problems . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . xi Chapter 1. Getting Started with File-AID . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 1-1 Logging on to TSO with File-AID . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 1-1 Accessing File-AID . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 1-2 Creating Your Training Files. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .1-3 Setting Your File-AID Default Parameters . . . . . . . . . . . . . . . . . . . . . . . . . . . . .1-4 Reviewing and Changing Your Default Values . . . . . . . . . . . . . . . . . . . . . . . . . 1-5 Chapter 2. Browsing a Data File . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 2-1 Accessing the Browse Function (Option 1) . . . . . . . . . . . . . . . . . . . . . . . . . . . .2-2 Selecting Records to Browse . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .2-2 Selecting the Browse Input Dataset. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 2-4 Specifying Temporary Selection Criteria . . . . . . . . . . . . . . . . . . . . . . . . . . . 2-5 Specifying the Selection Criteria Options . . . . . . . . . . . . . . . . . . . . . . . . . . 2-6 Formatted Selection Criteria Screen . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 2-8 Viewing Layout in Column Location Order . . . . . . . . . . . . . . . . . . . . . . . . 2-9 Suppressing the Display of Field Redefinitions. . . . . . . . . . . . . . . . . . . . . 2-10 Defining Formatted Field Selection Criteria . . . . . . . . . . . . . . . . . . . . . . . 2-11 Defining a Compound AND Condition . . . . . . . . . . . . . . . . . . . . . . . . . . 2-13 Defining Unformatted Field Selection Criteria . . . . . . . . . . . . . . . . . . . . . 2-14 Processing Your Selection . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 2-15 Formatted Display of First Selected Record. . . . . . . . . . . . . . . . . . . . . . . . 2-16 Displaying the Next Record in the Dataset. . . . . . . . . . . . . . . . . . . . . . . . 2-17 Displaying the Previous Record in the Dataset . . . . . . . . . . . . . . . . . . . . 2-19 Displaying the User Profile Options. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 2-20 Removing the Profile Settings Information . . . . . . . . . . . . . . . . . . . . . . . 2-22 Specifying the Type of Field Information to Display . . . . . . . . . . . . . . . . . . . . 2-23 Displaying the Offset for Each Field . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 2-25 Displaying Current Field Length and Format . . . . . . . . . . . . . . . . . . . . . . 2-27 Displaying Field Numbers . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .2-28 Displaying Only Specific Fields by Number (DISPLAY) . . . . . . . . . . . . . . . . . .2-29 Result of DISPLAY ONLY command . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 2-29 Excluding Fields from the Display . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 2-31 Adding Fields to the Display . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 2-32 Redisplaying all the Fields of a Record . . . . . . . . . . . . . . . . . . . . . . . . . . .2-33 Searching for Data Using the FIND Primary Command . . . . . . . . . . . . . . . . .2-34 Displaying the FIND Command Screen . . . . . . . . . . . . . . . . . . . . . . . . . . 2-34 Specifying a FIND Using The Command Prompt Screen . . . . . . . . . . . . . 2-35 Invoking Character Mode (CHAR) from Formatted Mode . . . . . . . . . . . . . . . 2-37 Controlling the Records Not Selected Line . . . . . . . . . . . . . . . . . . . . . . . . 2-37 Displaying Data in Hexadecimal Format . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 2-38
iv
Result of HEX ON . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . Redisplaying Character Format from Hexadecimal Format . . . . . . . . . . Displaying the Column Number Information Line . . . . . . . . . . . . . . . . . . . . Searching for Data In a Specific Column . . . . . . . . . . . . . . . . . . . . . . . . . . . . Invoking Vertical Formatted Mode (VFMT) from Character Mode . . . . . . . . Vertical Formatted (VFMT) Display . . . . . . . . . . . . . . . . . . . . . . . . . . . . . Removing the Mode Prompt Message Line . . . . . . . . . . . . . . . . . . . . . . . . . . Specifying the Type of Information to Display . . . . . . . . . . . . . . . . . . . . . . . Displaying the Offset for Each Column . . . . . . . . . . . . . . . . . . . . . . . . . Displaying the Length and Format of Each Field . . . . . . . . . . . . . . . . . . Selecting Fields to Display by Field Number. . . . . . . . . . . . . . . . . . . . . . . . . . Changing the Display Format of a Field . . . . . . . . . . . . . . . . . . . . . . . . . . . . . Displaying Hexadecimal Notation for a Specified Field . . . . . . . . . . . . . Returning Fields to Their Standard Display Format . . . . . . . . . . . . . . . . Redisplaying All Fields . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . Exiting the Browse Function. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . Viewing the Last Referenced File List . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . Requesting Related File List . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . Locking Dataset in File List . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . Returning To Primary Menu . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
2-38 2-39 2-40 2-41 2-42 2-42 2-43 2-44 2-45 2-46 2-47 2-48 2-48 2-50 2-51 2-52 2-53 2-54 2-54 2-55 3-1 3-1 3-2 3-2 3-3 3-4 3-5 3-6 3-7 3-7 3-7
Chapter 3. Allocating a VSAM Cluster . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . Accessing the VSAM Utility (Option 3.5) . . . . . . . . . . . . . . . . . . . . . . . . . . . . . Choosing a VSAM Utility Option . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . Using an Existing Datasets Allocation Attributes . . . . . . . . . . . . . . . . . . . . . . Allocating a Cluster . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . Verifying Allocation Parameters . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . Specifying Extended Allocation Parameters . . . . . . . . . . . . . . . . . . . . . . . . . . . Generating the Batch JCL Information. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . Executing the JCL . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . Saving the JCL . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . Exit the VSAM Utility . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
Chapter 4. Full-Screen Editing . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 4-1 Accessing the Edit Function (Option 2) . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 4-2 Specifying the Dataset to Edit . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 4-2 Copying Data Into a File With the COPY Command . . . . . . . . . . . . . . . . . . . 4-4 Specifying the "Copy From" Dataset . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 4-5 Removing Informational Flags from the Display . . . . . . . . . . . . . . . . . . . 4-6 Protecting Keys. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 4-7 Invoking Formatted Mode . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 4-8 Controlling the Display of Redefines Fields . . . . . . . . . . . . . . . . . . . . . . . . . . . 4-9 Holding and Hiding Fields . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 4-11 Specifying a Field Number to Conduct a Search For Invalid Data . . . . . . . . 4-13 Result of FIND INVALID /19 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 4-14 Resetting Hold and Hide . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 4-15 Printing the Currently Displayed Record . . . . . . . . . . . . . . . . . . . . . . . . . . . . 4-16 Directing The FPRINT Report to a Dataset or SYSOUT . . . . . . . . . . . . . . 4-16 Specifying Additional Print Parameters for New Dataset . . . . . . . . . . . . 4-18 Changing Data Using the CHANGE Command . . . . . . . . . . . . . . . . . . . . . . . 4-19 Specifying the CHANGE Parameters . . . . . . . . . . . . . . . . . . . . . . . . . . . . 4-20 Navigating within a Formatted Record. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 4-21 Scroll UP Result . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 4-22 Creating a New Record by Copying the Currently Displayed Record . . . . . . 4-23 Record REPEATED Result . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 4-23 Displaying the New Record . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 4-24 Entering New Data Values in a Repeated Record . . . . . . . . . . . . . . . . . . . . . . 4-25
Protecting New Record Key Fields . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 4-26 Navigating to a Record by Its Key Value . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 4-27 KEY Result - Key Specification Screen . . . . . . . . . . . . . . . . . . . . . . . . . . . .4-27 Scrolling to Another Record by Specifying a Key Value . . . . . . . . . . . . . . 4-28 Using Character Mode . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 4-29 Switching To Character Mode . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 4-29 Removing Informational Lines and Markers (RESET Command) . . . . . .4-30 Assigning Labels . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 4-31 Using the CHANGE Command With Labels . . . . . . . . . . . . . . . . . . . . . . 4-31 Reversing Changes (UNDO) . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 4-33 Removing the Line Label Values . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 4-34 Editing With Line Commands . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .4-35 C (Copy) Line Command . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .4-35 Sorting the Records of the Dataset . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 4-37 Deleting Duplicate Records - D (Delete) Line Command . . . . . . . . . . . . . 4-38 Invoking Vertical Formatted Mode . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 4-39 Displaying a Subset of Fields . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 4-39 Using the CHANGE ANY Command . . . . . . . . . . . . . . . . . . . . . . . . . . . .4-41 Printing Records in Vertical Formatted Mode . . . . . . . . . . . . . . . . . . . . . . . . . 4-42 Terminate Edit Function. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 4-43 Controlling Automatic Save Processing . . . . . . . . . . . . . . . . . . . . . . . . . . 4-43 Specify Audit Trail Dataset and JOB Statements . . . . . . . . . . . . . . . . . . . . 4-44 Chapter 5. Comparing Files . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 5-1 Accessing the Compare Function (Option 10) . . . . . . . . . . . . . . . . . . . . . . . . . 5-1 Specifying the "Old" Dataset. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .5-2 Specifying the "New" Dataset . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .5-3 Specifying Execution Options . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .5-4 Selecting Your Compare - Criteria Options . . . . . . . . . . . . . . . . . . . . . . . . . . . .5-5 Specifying Print Options for a Formatted Compare. . . . . . . . . . . . . . . . . . . . . . 5-6 Specifying Formatted Field Criteria . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 5-8 Viewing Formatted Compare Criteria . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 5-9 Executing Compare . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 5-11 Analyzing the Compare Report . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 5-12 Viewing the Compare Summary Report. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 5-13 Printing the Report . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 5-14 Load Library Compare . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 5-16 Specifying the "New" Load Library . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 5-17 Specifying Execution Options . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .5-18 Selecting Your Compare - Load Library Criteria . . . . . . . . . . . . . . . . . . . . . . . 5-19 Specifying Load Library Print Options . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 5-21 Viewing Formatted Compare Criteria . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 5-22 Executing Compare . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 5-23 Analyzing the Compare Report . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 5-24 Viewing the Compare Summary Report. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 5-25 Printing the Report . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 5-26 Chapter 6. Scanning and Updating Datasets . . . . . . . . . . . . . . . . . . . . . . . . . . . . 6-1 Accessing the Search/Update Utility (Option 3.6) . . . . . . . . . . . . . . . . . . . . . . 6-1 Defining Your Search/Update Request . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 6-1 Generating a PDS Find/Change Member List of Selected Members . . . . . . . . . 6-3 Using PDS Member Selection Features . . . . . . . . . . . . . . . . . . . . . . . . . . . .6-4 Specifying Quick Selection Criteria. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 6-5 Viewing the Initial PDS Find/Change Member List . . . . . . . . . . . . . . . . . .6-7 Issuing Commands on the PDS Find/Change Screen . . . . . . . . . . . . . . . . . 6-7 Specifying a CHANGE to All Selected Members . . . . . . . . . . . . . . . . . . . . . 6-9 Scanning Datasets for Specific Records (Option B) . . . . . . . . . . . . . . . . . . . . . 6-14
vi
Requesting PDS Member Selection Processing . . . . . . . . . . . . . . . . . . . . Specifying Global Changes - (Option U) . . . . . . . . . . . . . . . . . . . . . . . . . . . . Specifying Change Criteria . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . Preview Changes . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . Apply Changes (Confirm Update) . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . Processing Your Update In Batch. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . Reviewing Change Criteria . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . Submit Batch JCL . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .
Chapter 7. Copying Selected PDS Members . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 7-1 Accessing the Copy Utility (Option 3.3) . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 7-1 Defining Your Copy Request. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 7-2 Specifying a Copy of Selected Members . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 7-3 Using PDS Member Processing and Selection Features. . . . . . . . . . . . . . . . . . . 7-4 "FROM" PDS Member Processing . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 7-4 "TO" PDS Member Processing . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 7-4 Specifying Temporary Selection Criteria. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 7-6 Specifying the Unformatted Data Test . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 7-7 Ending Selection Criteria Specification . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 7-8 Generate Batch JCL . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 7-9 Editing Your Generated Copy JCL . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 7-10 Chapter 8. Finding Files On Disk . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 8-1 Scanning the System Catalog (3.4 Catalog Utility) . . . . . . . . . . . . . . . . . . . . . 8-2 Accessing the Catalog Utility (Option 3.4) . . . . . . . . . . . . . . . . . . . . . . . . 8-2 Selecting the Catalog Utility . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 8-3 Specifying Catalog Search Options . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 8-4 Working With Your Dataset List (Primary and Line Commands) . . . . . . 8-6 Reviewing the Tutorial - Summary of Primary and Line Commands . . . 8-7 Selecting a Dataset for Processing . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 8-8 Ending Dataset Processing . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 8-9 Scanning DASD Volumes to Find Files (3.7 VTOC Utility) . . . . . . . . . . . . . . 8-10 Accessing the VTOC Utility (Option 3.7) . . . . . . . . . . . . . . . . . . . . . . . . 8-10 Specifying VTOC Search Options . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 8-11 Performing the Name Search . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 8-13 Selecting a Dataset for Processing . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 8-14 Chapter 9. Viewing Load Module Information . . . . . . . . . . . . . . . . . . . . . . . . . . . Accessing the Library Utility (Option 3.1) . . . . . . . . . . . . . . . . . . . . . . . . . . . . Defining Your Library Request . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . Generating a Member List. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . Using the Load Library Processing Options . . . . . . . . . . . . . . . . . . . . . . . . . . . Processing the Member List Using Primary Commands . . . . . . . . . . . . . . . . . Processing the Member List Using Line Commands . . . . . . . . . . . . . . . . . . . . Viewing the Load Modules CSECTS in Address Order . . . . . . . . . . . . . . . . . . Chapter 10. Viewing Layouts . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . Accessing the View Utility (Option 8) . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . Specifying the Record Layout to be Interpreted . . . . . . . . . . . . . . . . . . . . . . . Viewing the Interpreted Layout. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . Chapter 11. Reformatting Records . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . Accessing the Reformat Function (Option 9) . . . . . . . . . . . . . . . . . . . . . . . . . Creating a New Reformat Definition . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . Identifying the Source and Target Record Layouts. . . . . . . . . . . . . . . . . . . . . Using the Reformat Definition Editor. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . Entering Constants . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . Initializing New Fields. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 9-1 9-1 9-2 9-3 9-4 9-5 9-6 9-7
10-1 10-1 10-2 10-3 11-1 11-1 11-2 11-3 11-5 11-7 11-9
vii
Hiding Sensitive Data On Output . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 11-10 Establishing Selection Criteria . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 11-11 Executing the Reformat Online at Your Terminal . . . . . . . . . . . . . . . . . . . . . 11-13 Browsing the Reformatted File . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 11-15 Chapter 12. Printing File Contents . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 12-1 Accessing the Print Selection Menu (Option 5) . . . . . . . . . . . . . . . . . . . . . . . 12-1 Selecting the Type of File To Be Printed. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 12-2 Requesting a Print of a Data File . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 12-2 Submitting the Print Job . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 12-4 Viewing the Report Output . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .12-5 Exiting the Print Function . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 12-5 Chapter 13. Extracting a Selected Subset of Records to Create a Test File . . . . 13-1 Accessing the Selection Criteria Function (Option 6) . . . . . . . . . . . . . . . . . . . 13-1 Specifying the Selection Criteria Datasets . . . . . . . . . . . . . . . . . . . . . . . . . . . .13-2 Defining Formatted Field Selections . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 13-3 Viewing a Layout in Column Location Order . . . . . . . . . . . . . . . . . . . . . . . . . 13-4 Defining Formatted Field Selection Criteria. . . . . . . . . . . . . . . . . . . . . . . . . . .13-5 Saving Your Permanent Selection Criteria Member . . . . . . . . . . . . . . . . . . . . 13-6 Exiting the Selection Criteria Utility . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 13-7 Accessing the Copy Utility (3.3). . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 13-8 Specifying the "FROM" and "TO" Datasets and Selection Criteria Member. . . 13-9 Exiting the Copy Utility . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 13-10 Chapter 14. Automating Layout Usage with XREF . . . . . . . . . . . . . . . . . . . . . . . 14-1 Accessing the XREF Function (Option 7) . . . . . . . . . . . . . . . . . . . . . . . . . . . .14-1 Creating a New XREF Member . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .14-2 Defining the XREF . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 14-3 Defining Layout Selection Rules Using Formatted Criteria . . . . . . . . . . . . . . . 14-4 Using the PPO Member Filters . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .14-6 Selecting a Layout Member from a Member List . . . . . . . . . . . . . . . . . . . . . . 14-7 Defining the Formatted XREF Criteria . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 14-8 Defining the Formatted Layout Selection Condition . . . . . . . . . . . . . . . . . . . 14-9 Defining Unformatted XREF Criteria . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 14-10 Defining the Unformatted Layout Selection Condition . . . . . . . . . . . . . . . . 14-11 Defining Formatted XREF Criteria Using Beginning Data-Name . . . . . . . . . 14-13 Accessing the List of Available Layouts Screen . . . . . . . . . . . . . . . . . . . 14-13 Selecting a Layout Structure from an Available Layouts List . . . . . . . . . . . . . 14-14 Defining the Formatted Layout Selection - Compound Condition . . . . . . . 14-15 Setting a Default Base Layout . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 14-16 Saving the New XREF Member . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 14-17 Exiting XREF and Returning to Main Menu . . . . . . . . . . . . . . . . . . . . . . . . . 14-18 Using the XREF Member - Record Layout Usage . . . . . . . . . . . . . . . . . . . . . . 14-19 Browsing Formatted Data Records with an XREF . . . . . . . . . . . . . . . . . . . . . 14-20 Requesting the XREF Usage . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 14-21 Scrolling with the FWD Command . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 14-22 Printing Your Data Records with XREF . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 14-23 Routing Your FPRINT . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 14-24 Chapter 15. Using File-AID/Batch . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 15-1 Specifying Your Batch Processing Request . . . . . . . . . . . . . . . . . . . . . . . . . . .15-1 Executing the File-AID Batch Utility Interactively (Option 3.8) . . . . . . . . . . . 15-4 Defining Datasets to Process. . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .15-4 Performing the Totaling Function . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 15-5 Entering Control Statements . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . .15-6 Exiting Interactive Execution . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 15-7
viii
Submitting File-AID/Batch JCL . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 15-8 Examples of Customer Uses of File-AID/Batch . . . . . . . . . . . . . . . . . . . . . . . 15-9 Applying Mass Changes to a JCL Library . . . . . . . . . . . . . . . . . . . . . . . . 15-9 Copying From One Input File to Create Multiple Output Files . . . . . . 15-10 Scanning and Printing Data in a Load Library . . . . . . . . . . . . . . . . . . . 15-10 Chapter 16. Segmented Record File Layout Automation . . . . . . . . . . . . . . . . . . 16-1 How to Identify Segments in a Segmented Record File . . . . . . . . . . . . . . . . . 16-1 Review the Sample Segmented Record XREF . . . . . . . . . . . . . . . . . . . . . . . . . 16-3 Viewing an Existing XREF Member . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 16-4 Using the VIEW Command . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 16-5 Browsing the XREF View Criteria . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 16-6 Using the XREF to Browse a Segmented Record File . . . . . . . . . . . . . . . . . . . 16-7 Viewing the Next Segment Using the NEXT Command . . . . . . . . . . . . . . . . 16-8 Understanding NEXT Command Processing . . . . . . . . . . . . . . . . . . . . . 16-9 Jumping to Another Record with the LR (Locate Record) Command . . . . . 16-10 Keeping a Command On the Command Line with & (Ampersand) . . . . . 16-11 Exiting File-AID with the RETURN Command . . . . . . . . . . . . . . . . . . . . . . . 16-14 Appendix A. Convert File-AID for IMS XREF Members to File-AID/MVS Release 8 Format . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . Convert One File-AID for IMS XREF to One File-AID/MVS XREF . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . Convert Multiple File-AID for IMS XREFs to One File-AID/MVS XREF . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . Convert Multiple File-AID for IMS XREFs to File-AID/MVS XREFs (One for One) . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . A-1 A-2 A-3 A-4
Index . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . I-1
ix
Introduction
I nt ro
This document provides information and examples for all users of Compuwares Release 8.8 File-AID/MVS data management system. Use this document to learn about File-AIDs facilities. By using the Compuware supplied test data, you can follow the examples shown in this document to practice using File-AID at your own pace and at your own terminal. The chapters are arranged to explain the most frequently used capabilities of File-AID first. However, the table of contents at the beginning of this book or the index at the back may provide faster access to the example information you need. If Release 8 is not your first experience with File-AID, you should read one of the conversion considerations appendixes in the back of this manual. There is an appendix for former Release 6 users and one for former Release 7 users. These sections explain the differences in Release 8 of File-AID and document utility programs you can run to make Release 8 more productive for you.
Chapter 15, Using File-AID/Batch: File-AID/Batch examples, interactive online facilities, and background JCL requirements. Chapter 16, Segmented Record File Layout Automation: Segmented record processing with advanced XREF usage. Appendix A, Convert File-AID for IMS XREF Members to File-AID/MVS Release 8 Format: Instructions for using the File-AID Release 8.0.2-enhanced batch CONVERT function to convert your File-AID for IMS XREFs to the File-AID Release 8 format.
Related Publications
File-AID MVS Online Reference Manual (SPF and XE): Detailed reference document for users of File-AID. This manual describes the online product features, screens, options, fields, and commands. File-AID Batch Reference Manual: Detailed reference document for users of FileAID/Batch. This manual provides information necessary to fully use the batch features of File-AID. File-AID Installation Guide: Step-by-step description of the process necessary to install File-AID. It is intended for the systems group responsible for File-AID at your installation. The installation guide provides the information you need to tailor the online and batch products. It describes the security, I/O, and audit exits. In addition, it describes the SMF recording function and the Release 8 conversion utility. File-AID Reference Summary: Summary of File-AID options and commands. This reference is intended for any user of File-AID. File-AID SMF Record Mapping Reference JES V4: Instructions and reference information for installing and using the File-AID SMF Record Mapping facility. File-AID Training Guide: Overview of File-AID to first-time users. This guide is made available during the File-AID training session conducted by Compuware. IBM Documentation: File-AID documentation does not document ISPF functions. It is assumed that the File-AID user is familiar with the ISPF environment. For more information on ISPF functions, refer to the current version and release of the following documents: ISPF Getting Started ISPF Users Guide ISPF Dialog Developers Guide and Reference ISPF Services Guide MVS/ESA JCL Reference. Innovative Data Processing, Inc. Documentation: File-AID reference manuals assume that Innovation Access Method (IAM) users are familiar with the IAM environment. Refer to the Innovation Access Method User Manual for more information.
Introduction
xi
Online Documentation
Documentation for this product is provided on CD-ROM in several electronic formats. PDF files can be viewed with the free Adobe Acrobat Reader, available at http://www.adobe.com. HTML files can be viewed with any standard web browser. BookManager softcopy files can be viewed with any version of IBM BookManager READ or the IBM Library Reader. To learn more about BookManager or download the free Library Reader, go to http://booksrv2.raleigh.ibm.com.
Technical Support
Documentation Feedback
Compuware uses your feedback to make the best products and documentation in the industry. If you cannot locate the information you require, or if the information is not clear, please let us know.
Product Problems
If problems arise, please consult your manual or the File-AID/MVS technical representative at your site. If problems persist, contact Compuware for technical support: File-AID Technical Support Compuware Corporation 31440 Northwestern Highway Farmington Hills, MI 48334-2564
1-800-538-7822 Outside the USA and Canada, please contact your local Compuware office or agent.
xii
1-1
C ha p 1
This document is designed to give you some hands on practice with File-AID. You need to know how to access the installed version of File-AID at your site in order to use these examples online. In the screen examples, underlined values indicate entries you should make. The Steps section is an ordered list that describes the procedure to follow to accomplish the specific task, including the data values and commands you are to enter and the keys you need to press. All values are distinguished in each step in boldface type.
----------------------OPTION ===> F 0 1 2 3 4 5 6 7 8 9 10 C F P S U T X ISPF PARMS BROWSE EDIT UTILITIES FOREGROUND BATCH COMMAND DIALOG TEST LM UTILITIESIBM PRODUCTSSCLM CHANGES File-AID PRODUCTS SDSF USER TUTORIAL EXIT -
USERID Specify terminal and user parameters TIME Display source data or output listings TERMINAL Create or change source data PF KEYS Perform utility functions Invoke language processors in foreground Submit job for language processing Enter TSO Command, CLIST, or REXX exec Perform dialog testing Perform library administrator utility functions Additional IBM program development products Software Configuration and Library Manager Display summary of changes for this release File-AID data management system COMPUWARE Products System Display and Search Facility User Dialogs Display information about ISPF/PDF Terminate ISPF using log and list defaults
1-2
Accessing File-AID
Steps:
1. Log on to TSO using the appropriate logon PROC or allocation CLIST for File-AID. 2. Use the appropriate option code (for example, ISPF option F) or execution CLIST (for example, TSO FASTART) to display the File-AID Primary Option Menu. After you select option F from the ISPF/PDF PRIMARY OPTION MENU (or the option code on another ISPF menu as defined at your site), or you execute the correct CLIST, the File-AID Primary Option Menu is displayed as shown in Figure 1-2. Use the following space to note the method of access at your installation: _________________________________________________________________________ _________________________________________________________________________ _________________________________________________________________________
Figure 1-2. File-AID Primary Option Menu
File-AID 8.8.0 ------------OPTION ===> 0 1 2 3 5 6 7 8 9 10 C T X PARAMETERS BROWSE EDIT UTILITIES PRINT SELECTION XREF VIEW REFORMAT COMPARE CHANGES TUTORIAL EXIT -
Specify ISPF and File-AID parameters USERID Display file contents PF KEYS Create or change file contents TERMINAL File-AID/SPF extended utilities TIME Print file contents JULIAN Create or change selection criteria DATE Create or change record layout cross reference View interpreted record layout Convert file from one format to another Compare file contents Display summary of File-AID changes Display information about File-AID Terminate File-AID and return to ISPF
Use END to terminate File-AID Online Technical Support available at: frontline.compuware.com
Copyright (c) 1982 - 2001, by Compuware Corporation. All rights reserved. Unpublished rights reserved under the Copyright Laws of the United States. Type LEGAL on the command line for Copyright/Trade Secret Notice.
1-3
----
Steps:
1. On the COMMAND line of any screen (see Figure 1-3 above), execute the FACOPY CLIST by issuing the command TSO %FACOPY. Notes: a. Your site may have a different procedure for executing the FACOPY CLIST. If you receive an error message, contact the person who installed File-AID at your site. b. Whenever three asterisks (***) are displayed, press <Enter> to continue. 2. Before creating your new training files, File-AID displays the following message:
FACOPY PREPARING TO CREATE userid.FASAMP TRAINING FILES ANSWER "Y" TO PERMIT DELETE OF OLD AND CREATION OF NEW userid.FASAMP FI LES
3. Type a Y and press <Enter> to begin creating your training files. 4. The FACOPY process takes a couple of minutes to complete and should display status messages as it progresses. Remember, whenever three asterisks (***) are displayed, press <Enter> to continue. 5. When FACOPY is finished executing, File-AID displays an informational message, similar to the following message:
FACOPY PROCESSING HAS COMPLETED! FACOPY - YOUR TRAINING FILES (userid.FASAMP..) ARE NOW READY
1-4
-----
- Specify ISPF and File-AID parameters - Display file contents - Create or change file contents - File-AID/SPF extended utilities
Steps:
1. Select File-AID option 0. 2. Press <Enter>. File-AID displays the Parameter Selection Menu screen (Figure 1-5).
Figure 1-5. File-AID Parameter Selection Menu
0 1 2 3 4 5 6
- ISPF parameters and File-AID PF keys - File-AID system parameters - Selection criteria default parameters - Print default parameters - Processing option default parameters - Audit file allocation parameters - Hierarchical File System Options
1-5
0 1 2
- ISPF parameters and File-AID PF keys - File-AID system parameters - Selection criteria default parameters
Steps:
1. Select each option and look at the defaults that have been pre-set for you. 2. Press PF1 (HELP) to view tutorial information on each default parameter. Make any changes you like. 3. Use the END command or press PF3 (set as the default for the END command) to save any changes you have made. File-AID redisplays the Parameter Selection Menu. 4. Use the KEYS command, or select option 0, to review or change your File-AID PF key settings. The KEYS command is valid on every File-AID screen.
1-6
2-1
C ha p 2
This chapter discusses several of the primary commands that you can use in the Browse function. Refer to the File-AID/MVS Online Reference Manual (SPF and XE) for a complete list of the primary and line commands that are supported in the Browse and Edit functions.
Character Mode
The character browse mode provides a full-screen view of the data. From character mode, you can use the FMT primary command to redisplay the data in formatted mode, the VFMT primary command to redisplay the data in Vertical Formatted mode, or UNFMT primary command to redisplay the data in Unformatted mode.
Formatted Mode
The formatted browse mode lets you view data using a record layout. This mode presents data one record at a time and formats each record field-by-field. Record layouts can be either COBOL (FD: 01 level) or PL/I (Declare). Cross references (XREFs) are used to define automatic selection of record layouts for datasets with multiple record types. From Formatted mode, you can use the CHAR primary command to redisplay the data in Character mode, the VFMT primary command to redisplay the data in Vertical Formatted mode, or UNFMT primary command to redisplay the data in Unformatted mode.
Unformatted Mode
The unformatted browse mode provides a full-screen display of your data one record at a time without record layout formatting. File-AID displays 70 characters of data per line until all data for the record is shown or the screen is filled. Unformatted mode is accessed by selecting Browse or Edit mode U (Unformatted) or entering the UNFMT primary command from Character, Formatted, or Vertical Formatted mode of Browse or Edit. From Unformatted mode, use the CHAR primary command to redisplay the data in Character mode, the FMT primary command to redisplay the data in Formatted mode, or VFMT primary command to redisplay the data in Vertical Formatted mode. Note: Unformatted mode is not available for DBCS terminals.
2-2
Steps:
1. Enter a 1 in the OPTION field on the File-AID Primary Option Menu (not shown here). 2. Press <Enter>. File-AID displays the Browse - Dataset Specification screen as illustrated in Figure 2-1.
----------------------
Specify Browse Information: Dataset name or HFS path ===> FASAMP.* Member name ===> Volume serial ===>
Specify Record Layout and XREF Information: (S = Single; X = XREF; N = None) Record layout usage ===> S Record layout dataset ===> FASAMP.LAYOUTS Member name ===> EMPLOYEE (Blank or pattern for member list) XREF dataset name ===> Member name ===> (Blank or pattern for member list) Specify Selection Criteria Selection criteria usage Selection dataset name Member name Information: ===> T ===> ===> (E = Existing; T = Temporary; M = Modify; Q = Quick; N = None) (Blank or pattern for member list)
Use the Browse - Dataset Specification screen to define your browse request, which consists of: Browse Mode Browse Dataset Record Layout and XREF Information Selection Criteria Usage Information.
In this exercise, you create temporary selection criteria to view a subset of records. You supply a record layout to view the data in formatted and vertical formatted display modes.
Steps:
1. Type an F in the Browse Mode field to request the Formatted mode for viewing your data records. 2. Type the dataset name and pattern character FASAMP.* in the Dataset name or HFS path field. The asterisk is a pattern character. It represents any single-level qualifier, or partiallevel qualifier when it is preceded by 1 to 7 characters. When you use a pattern character in a dataset name, File-AID displays a list of dataset names that match the pattern you specified. You can then use the S line command to select a dataset from
2-3
this list. Other valid pattern characters include question mark (?) and percent (%) (single character), as well as plus (+) and slash (/). Refer to the File-AID/MVS Online Reference Manual (SPF and XE) for more information on pattern dataset names. 3. Type an S in the Record layout usage field to indicate that you are using a single layout member to describe your data records. 4. Type the dataset name FASAMP.LAYOUTS in the Record layout dataset field. The record layout dataset is a dataset containing the source code for one or more record layouts. You can use a layout that is embedded in a source program. An XREF member is used to extract an embedded layout from a source member. A record layout dataset can be a sequential, partitioned, PANVALET, or LIBRARIAN dataset. File-AID Release 6 map libraries are fully supported. The record layout must be a valid COBOL or PL/I declaration. Otherwise, the displayed data may be invalid. 5. Type the member name EMPLOYEE in the layout Member name field. If you do not specify a member, File-AID displays a list of members. You can then select a member from this list. 6. Type a T in the Selection criteria usage field to indicate that you want to create a new temporary selection criteria specification. Selection criteria enables you to select specific records in a data file for processing. Usage option T (Temporary) dynamically invokes the Selection Criteria function and presents the Selection Criteria Menu (see Figure 2-3 on page 2-5). When you specify either T or Q in the Selection criteria usage field on the Browse Dataset Specification screen, File-AID permits you to save your temporary selection criteria by issuing the SAVE command. File-AID displays a screen to give you the opportunity to save your criteria permanently in a selection criteria dataset. Your sample training file, userid.FASAMP.SELCRIT, may be used to save selection criteria you create. 7. Press <Enter>. File-AID displays the Dataset List illustrated in Figure 2-2 on page 2-4.
2-4
Steps:
1. Enter the S (select) line command next to the dataset userid.FASAMP.EMPMAST. In the figure below, userid is shown as USERID9. Your TSO ID should appear on your list. 2. Press <Enter>. File-AID displays the Selection Criteria Menu screen illustrated in Figure 2-3 on page 2-5.
Figure 2-2. Catalog Utility Dataset List Screen. Pattern. Selecting From a List of Datasets Matching Your
File-AID ------------- Catalog Utility Dataset List ---- Select BROWSE Input COMMAND ===> SCROLL ===> PAGE ----- D A T A S E T N A M E -------------- --Type--Volume- -StatusUSERID9.FASAMP.COMPARE CLUSTER PRD928 USERID9.FASAMP.EMPLOYEE CLUSTER PRD928 USERID9.FASAMP.EMPLOYE2 NON-VSAM PRD925 NON-VSAM PRD925 S USERID9.FASAMP.EMPMAST USERID9.FASAMP.INVFILE NON-VSAM PRD925 USERID9.FASAMP.INVFILE2 NON-VSAM PRD925 USERID9.FASAMP.JCL NON-VSAM PRD925 USERID9.FASAMP.LAYOUTS NON-VSAM PRD925 USERID9.FASAMP.LOADLIB1 NON-VSAM PRD925 USERID9.FASAMP.LOADLIB2 NON-VSAM PRD925 USERID9.FASAMP.ORDRFILE NON-VSAM PRD925 USERID9.FASAMP.RFMTDEF NON-VSAM PRD925 USERID9.FASAMP.SEGFILE NON-VSAM PRD925 USERID9.FASAMP.SELCRIT NON-VSAM PRD925 USERID9.FASAMP.XREF NON-VSAM PRD925 ******************************* BOTTOM OF DATA ********************************
2-5
File-AID - Selection Criteria Menu - TEMPORARY -------------------------------OPTION ===> 1 - Status 1 OPTIONS - Enter selection criteria options default 2 FORMATTED - Edit formatted selection criteria 0 sets 3 UNFORMATTED - Edit unformatted selection criteria 0 sets Member list description ===> SC FOR EMPMAST________________ Long ===> LIMIT TO 12 RECORDS MEETING THE FOLLOWING: SINGLE AND LOCAL__ Description ===> TAX LE 7 OR LIVING IN AREA CODES 404, 408 OR 415______________
VIEW command to display selection criteria summary SAVE command to write selection criteria request END to continue processing CANCEL to return to main panel
Use the Selection Criteria Menu screen to access facilities for defining selection conditions based on formatted or unformatted field selection criteria and/or options for reading records. Option 1 (Enter selection criteria options) displays the Selection Criteria Options screen. Here you can tell File-AID where you want to begin selecting records, establish a random read pattern, and set limits on the number of records processed.
Steps:
1. Enter a 1 in the OPTION field. 2. Enter the description SC FOR EMPMAST in the Member list description field. Since this is temporary selection criteria the description is optional. However, if you decide to SAVE this criteria permanently, File-AID displays this description on the Member List screen. 3. Enter the description LIMIT TO 12 RECORDS MEETING THE FOLLOWING: SINGLE AND LOCAL TAX LE 7 OR LIVING IN AREA CODES 404, 408, OR 415 in the Long Description field. Once again, since this is temporary criteria, descriptions are not needed unless you SAVE your temporary criteria, 4. Press <Enter>. File-AID displays the Selection Criteria Options screen as shown in Figure 2-4 on page 6.
2-6
If you specify usage option Q (Quick) on the Browse - Dataset Specification screen, File-AID creates temporary criteria but bypasses the Selection criteria menu screen and takes you directly to the unformatted selection criteria screen. When you END from the unformatted screen, your selection criteria is applied immediately. With usage Q, default options are used and all records are read and selected based on the defaults you establish in your 0.2 Selection Parameters for number of records to search and select.
--------------------------
Specify Selection Criteria Options: Start at the following record key (both blank for start of dataset) Starting record key - OR Starting RBA or RRN Initial records to skip ===> OR at the following RBA or RRN ===> ===> 0 then skip this many records then repeat the following - select this many records - then skip this many records until you have read this many records or selected this many records (F = Forward; B = Backward)
Subsequent Selection Interval: Records to select ===> 1 Records to skip ===> 0 Number of records to search ===> ALL Number of records to select ===> 12 SEQ/VSAM processing direction ===> F
The Selection Criteria Options screen allows you to control the selection of records based on a starting record key, RBA or RRN, and record counts. File-AID reads and selects records in a file based on the values you specify on this screen. File-AID then compares the selected records to any formatted and unformatted selection criteria to determine if any of the selected records match the selection criteria. In this example, you limit the number of selected matching records to 12.
Steps:
1. Type a value of 12 in the Number of records to select field. The value you specify in this field sets the limit for the total number of records that File-AID selects from the dataset. Valid values are ALL (the default), 0 (means all), and 1 through 999999. 2. Type FMT in the COMMAND field. The FMT primary command invokes the Formatted Selection Criteria screen. 3. Press <Enter>. File-AID displays the EMPLOYEE record layout as illustrated in Figure 2-5 on page 2-8.
2-7
BDAM, and ISAM files. All records before the starting record key are not selected, regardless of matching formatted or unformatted field selection criteria. The "Starting RBA or RRN" field enables you to specify a random starting point for record selection in a VSAM or BDAM dataset. All records before the specified starting RBA or RRN are not selected, regardless of matching formatted or unformatted field selection criteria. The "Initial records to skip" field tells File-AID how many records to skip before processing the dataset. Valid values are 0 through 999999. A value of 0 (zero) tells File-AID to process all records in the dataset. The Subsequent Selection Interval: "Records to select" field tells File-AID how many records to retrieve from the dataset per interval. Valid values are 1 through 999999. The default value is 1. File-AID applies all field selection criteria after it retrieves each record. The Subsequent Selection Interval: "Records to skip" field tells File-AID how many records to skip after it reaches the value you specified in the "Records to select" field. A value greater than 0 (zero) establishes the selection interval. Valid values are 0 through 999999. A value of 0 (zero) tells File-AID to ignore the "Interval Records to select" value. The "Number of records to search" field tells File-AID the maximum number of records to read from the dataset. This parameter can prevent excessive I/O processing when searching large files. Valid values are ALL and 0 through 999999. The default for the field is ALL. Both ALL and 0 (zero) indicate to search the entire file. The "Number of records to select" field tells File-AID the maximum number of records to select if the records match the selection criteria. Valid values are ALL and 0 through 999999. The default for the field is ALL. Both ALL and 0 (zero) indicate no limit on the number of records selected. You may establish your own default value for these fields by using option 0.2 (Selection Criteria Parameters). The "SEQ/VSAM processing direction" field indicates the direction in which File-AID is to read the file (sequential or VSAM). Valid values are F (forward) and B (backward). If you specify a value of B when processing a file other than a sequential or VSAM file, File-AID ignores the value and starts processing at the beginning of the file.
2-8
File-AID --- Formatted Selection Criteria ----------------- COLUMNS 00001 00098 COMMAND ===> SCROLL ===> PAGE SC010- Valid commands are: INSERT, DELETE, REPEAT, VIEW, SAVE, CANCEL, PROFILE ---- FIELD LEVEL/NAME ------- -FORMAT- RO ----+----1----+----2----+----3----+******************************* TOP OF DATA ******************************** 5 EMP-NUMBER 5/AN 5 EMP-LAST-NAME 15/AN 5 EMP-FIRST-NAME 10/AN 5 EMP-MID-INIT 1/AN 5 FILLER 2/AN 5 EMP-TITLE 30/AN 5 EMP-PERSONAL-INFO SYNC 23/GRP 10 EMP-NATL-ID-NUMBER 9/NUM 10 FILLER 1/AN 10 EMP-DATE-OF-BIRTH 6/AN 10 EMP-DOB-REDEF REDEFINES EMP-DATE-OF-BIRTH 10 EMP-DOB-REDEF SYNC 6/GRP 15 EMP-DOB-MM 2/NUM 15 EMP-DOB-DD 2/NUM 15 EMP-DOB-YY 2/NUM 10 EMP-HIRE-DATE 6/AN 10 EMP-MARITAL-STATUS 1/AN 5 EMP-WITHOLD-INFO SYNC 15/GRP Use VIEW command to browse selection criteria summary
2-9
File-AID --- Formatted Selection Criteria -------------COMMAND ===> SHOW OFFSET SC010- Valid commands are: INSERT, DELETE, REPEAT, VIEW, ---- FIELD LEVEL/NAME ------- -FORMAT- RO ----+----1---******************************* TOP OF DATA ************ 5 EMP-NUMBER 5/AN
Steps:
1. Type SHOW OFFSET in the COMMAND field. 2. Press <Enter>. File-AID redisplays the Formatted Selection Criteria screen as shown in Figure 2-7 displaying the column position of the first byte of each field.
File-AID --- Formatted Selection Criteria ----------------- COLUMNS 00001 00098 COMMAND ===> SCROLL ===> PAGE CRITERIA NUMBER: 1 OF 1 EMPLOYEE-MASTER-FILE LAYOUT LENGTH: 198 ---- FIELD LEVEL/NAME ------- COLUMNS- RO ----+----1----+----2----+----3----+******************************* TOP OF DATA ******************************** 5 EMP-NUMBER 1 5 EMP-LAST-NAME 6 5 EMP-FIRST-NAME 21 5 EMP-MID-INIT 31 5 FILLER 32 5 EMP-TITLE 34 5 EMP-PERSONAL-INFO SYNC 64 10 EMP-NATL-ID-NUMBER 64 10 FILLER 73 10 EMP-DATE-OF-BIRTH 74 10 EMP-DOB-REDEF REDEFINES EMP-DATE-OF-BIRTH 10 EMP-DOB-REDEF SYNC 74 15 EMP-DOB-MM 74 15 EMP-DOB-DD 76 15 EMP-DOB-YY 78 10 EMP-HIRE-DATE 80 10 EMP-MARITAL-STATUS 86 5 EMP-WITHOLD-INFO SYNC 87 Use VIEW command to browse selection criteria summary
2-10
File-AID --- Formatted Selection Criteria -------------COMMAND ===> REDEF OFF CRITERIA NUMBER: 1 OF 1 EMPLOYEE-MASTER-FILE ---- FIELD LEVEL/NAME ------- COLUMNS- RO ----+----1---******************************* TOP OF DATA ************ 5 EMP-NUMBER 1
Steps:
1. Type REDEF OFF in the COMMAND field. 2. Press <Enter>. File-AID redisplays the Formatted Selection Criteria screen as shown in Figure 2-9 and suppresses the EMP-DOB redefinitions of EMP-DATE-OF-BIRTH.
File-AID --- Formatted Selection Criteria ----------------- COLUMNS 00001 00098 COMMAND ===> SCROLL ===> PAGE CRITERIA NUMBER: 1 OF 1 EMPLOYEE-MASTER-FILE LAYOUT LENGTH: 198 ---- FIELD LEVEL/NAME ------- COLUMNS- RO ----+----1----+----2----+----3----+******************************* TOP OF DATA ******************************** 5 EMP-NUMBER 1 5 EMP-LAST-NAME 6 5 EMP-FIRST-NAME 21 5 EMP-MID-INIT 31 5 FILLER 32 5 EMP-TITLE 34 5 EMP-PERSONAL-INFO SYNC 64 10 EMP-NATL-ID-NUMBER 64 10 FILLER 73 10 EMP-DATE-OF-BIRTH 74 10 EMP-HIRE-DATE 80 10 EMP-MARITAL-STATUS 86 5 EMP-WITHOLD-INFO SYNC 87 10 EMP-LIFE-INS-WITHOLD-AMT 87 10 EMP-NATL-TAX-WITHOLD-PCT 93 10 EMP-REGION-TAX-WITHOLD-PCT 96 10 EMP-LOCAL-TAX-WITHOLD-PCT Use VIEW command to browse selection criteria summary
2-11
Steps:
1. Type EQ in the RO column next to the field name EMP-MARITAL-STATUS. 2. Type an S in the data area (to the right of the EQ you just typed) to define the test "MARITAL-STATUS EQUAL TO S". 3. Type DOWN in the COMMAND field and press <Enter> (or use PF8) to view more layout fields. File-AID scrolls the Formatted Selection Criteria screen down one full page as shown in Figure 2-11 on page 2-13.
Figure 2-10. Specifying a Formatted Selection Criteria Test Condition
File-AID --- Formatted Selection Criteria ----------------- COLUMNS 00001 00098 COMMAND ===> DOWN SCROLL ===> PAGE CRITERIA NUMBER: 1 OF 1 EMPLOYEE-MASTER-FILE LAYOUT LENGTH: 198 ---- FIELD LEVEL/NAME ------- COLUMNS- RO ----+----1----+----2----+----3----+******************************* TOP OF DATA ******************************** 5 EMP-NUMBER 1 5 EMP-LAST-NAME 6 5 EMP-FIRST-NAME 21 5 EMP-MID-INIT 31 5 FILLER 32 5 EMP-TITLE 34 5 EMP-PERSONAL-INFO SYNC 64 10 EMP-NATL-ID-NUMBER 64 10 FILLER 73 10 EMP-DATE-OF-BIRTH 74 10 EMP-HIRE-DATE 80 10 EMP-MARITAL-STATUS 86 EQ S 5 EMP-WITHOLD-INFO SYNC 87 10 EMP-LIFE-INS-WITHOLD-AMT 87 10 EMP-NATL-TAX-WITHOLD-PCT 93 10 EMP-REGION-TAX-WITHOLD-PCT 96 10 EMP-LOCAL-TAX-WITHOLD-PCT Use VIEW command to browse selection criteria summary
2-12
NC BT NB VA NV
Not contains Between (specify value1:value2 - endpoints inclusive) Not between (specify value1:value2 - endpoints exclusive) Valid Not Valid
To specify a search argument that contains case-sensitive data, you must enter the CAPS OFF primary command. Multiple values can be tested in non-numeric fields using the CO and EQ operators by separating the values with commas. For example: EQ ABC,DEF,GHI You can use the REPEAT or INSERT command to add a new selection criteria set. Sets are ORed together and only one of the test sets must be true. If a record fails to match CRITERIA NUMBER 1 in an ORed condition, File-AID tests the record to see if CRITERIA NUMBER 2 matches. As soon as a record matches any set, File-AID selects it. If a record fails to match any formatted set, it is checked against each unformatted set. If the record fails all tests, it is not selected.
2-13
File-AID --- Formatted Selection Criteria ----------------- COLUMNS 00099 00198 SCROLL ===> PAGE COMMAND ===> UNFMT CRITERIA NUMBER: 1 OF 1 EMPLOYEE-MASTER-FILE LAYOUT LENGTH: 198 ---- FIELD LEVEL/NAME ------- COLUMNS- RO ----+----1----+----2----+----3----+10 EMP-LOCAL-TAX-WITHOLD-PC 99 LE 7 5 EMP-HOME-ADDRESS SYNC 102 10 EMP-STREET-ADDRESS 102 10 FILLER 127 10 EMP-CITY 128 10 EMP-STATE-PROV-CNTY SYNC 143 15 EMP-STATE 143 15 FILLER 145 10 EMP-POSTAL-CODE 147 5 EMP-EMERGENCY-CONTACT SYNC 152 10 EMP-CONTACT-NAME 152 10 FILLER 177 10 EMP-CON-WORK-PHONE 179 10 EMP-CON-HOME-PHONE 189 ***************************** BOTTOM OF DATA ******************************* Use VIEW command to browse selection criteria summary
Steps:
1. Type LE in the RO column next to the field name EMP-LOCAL-TAX-WITHOLD-PCT. 2. Type a 7 in data area to define the test. You have now created a compound criteria set matching records with MARITALSTATUS EQUAL TO S and EMP-LOCAL-TAX-WITHOLD-PCT LESS THAN OR EQUAL TO 7. 3. Notice the column offset (189) of the EMP-CON-HOME-PHONE field. In Figure 2-12 on page 2-14 you define a test to select records based on the value of the area code (first three characters of the PHONE field) using unformatted selection criteria. 4. Type UNFMT in the COMMAND field. Instead of entering the UNFMT command, you could enter the END primary command to return to the Selection Criteria Menu and then select option 3 (Unformatted). Or, you could have entered the 3 command. 3 is an alias for UNFMT. 5. Press <Enter> to display the Unformatted Selection Criteria screen as shown in Figure 2-12 on page 2-14.
2-14
---
Use END command to continue, use CANCEL command to return to main screen. Cmd --___ ___ ___ ___ ___ ___ ___ ___ ___ ___ ___ ___ ___ ___ ___ ___ AND /OR Position Length RO --- -------- ------ -_______EQ 189__ AND _____ _____ EQ AND _____ _____ EQ AND _____ _____ EQ AND _____ _____ EQ AND _____ _____ EQ AND _____ _____ EQ AND _____ _____ EQ AND _____ _____ EQ AND _____ _____ EQ AND _____ _____ EQ AND _____ _____ EQ AND _____ _____ EQ AND _____ _____ EQ AND _____ _____ EQ AND _____ _____ EQ Data Value ---------------------------------------------------404,408,415________________________________________ ____________________________________________________ ____________________________________________________ ____________________________________________________ ____________________________________________________ ____________________________________________________ ____________________________________________________ ____________________________________________________ ____________________________________________________ ___________________________________________________ ____________________________________________________ ____________________________________________________ ____________________________________________________ ____________________________________________________ ____________________________________________________ ____________________________________________________
Steps:
1. Type 189 on the first entry line under the Position column. The Position tells File-AID where in the record to begin the search. 2. Verify that the value of the relational operator is "equal to" (either EQ or =). The relational operator default value is EQ. Use option 0.2 Selection Defaults if you want to change the default. 3. Type 404,408,415 in the Data Value column. File-AID interprets a comma in the search argument as an OR condition within the current set. To search for a comma as data, you must enclose the comma in double quotes (for example, "data,contains,commas"). 4. Type END in the COMMAND field. 5. Press <Enter>. File-AID returns to the Selection Criteria Menu screen as shown in Figure 2-13 on page 2-15.
2-15
File-AID - Selection Criteria Menu - TEMPORARY -------------------------------OPTION ===> END - Status 1 OPTIONS - Enter selection criteria options not default 2 FORMATTED - Edit formatted selection criteria 1 sets 3 UNFORMATTED - Edit unformatted selection criteria 1 sets Member list description ===> SC FOR EMPMAST________________ Long ===> LIMIT TO 12 RECORDS MEETING THE FOLLOWING: SINGLE AND LOCAL__ Description ===> TAX LE 7 OR LIVING IN AREA CODES 404, 408 OR 415______________
VIEW to display selection criteria summary SAVE to write selection criteria request END to continue processing CANCEL to return to main panel
Steps:
1. Type END in the OPTION field. 2. Press <Enter>. File-AID displays the Browse formatted screen for the first selected record in the dataset USERID9.FASAMP.EMPMAST as shown in Figure 2-14 on page 2-16.
2-16
File-AID - Browse - USERID9.FASAMP.EMPMAST ------------------------- COL 1 92 COMMAND ===> SCROLL ===> PAGE RECORD: 1 EMPLOYEE-MASTER-FILE LENGTH: 198 ---- FIELD LEVEL/NAME ------- COLUMNS- ----+----1----+----2----+----3----+----4 5 EMP-NUMBER 1 00090 5 EMP-LAST-NAME 6 MARTIN 5 EMP-FIRST-NAME 21 EDWARD 5 EMP-MID-INIT 31 M 5 FILLER 32 5 EMP-TITLE 34 AIRPLANE MANUFACTURER 5 EMP-PERSONAL-INFO SYNC 64 10 EMP-NATL-ID-NUMBER 64 427890125 10 FILLER 73 10 EMP-DATE-OF-BIRTH 74 101954 10 EMP-DOB-REDEF REDEFINES EMP-DATE-OF-BIRTH 10 EMP-DOB-REDEF SYNC 74 15 EMP-DOB-MM 74 10 15 EMP-DOB-DD 76 19 15 EMP-DOB-YY 78 54 10 EMP-HIRE-DATE 80 920101 10 EMP-MARITAL-STATUS 86 M 5 EMP-WITHOLD-INFO SYNC 87 10 EMP-LIFE-INS-WITHOLD-AMT 87 30000} Enter CHAR for character mode, VFMT for vertical format mode
2-17
File-AID - Browse - USERID9.FASAMP.EMPMAST ----------COMMAND ===> FWD RECORD: 1 EMPLOYEE-MASTER-FILE ---- FIELD LEVEL/NAME ------- COLUMNS- ----+----1----+5 EMP-NUMBER 1 00090
Steps:
1. Type FWD in the COMMAND field. 2. Press <Enter>. File-AID displays the next selected record, as shown in Figure 2-16 on page 2-17.
Figure 2-16. Browse - FWD Result - Formatted Display of Record 2
File-AID - Browse - USERID9.FASAMP.EMPMAST ------------------------- COL 1 92 COMMAND ===> SCROLL ===> PAGE RECORD: 2 EMPLOYEE-MASTER-FILE LENGTH: 198 ---- FIELD LEVEL/NAME ------- COLUMNS- ----+----1----+----2----+----3----+----4 5 EMP-NUMBER 1 00200 5 EMP-LAST-NAME 6 JACKSON 5 EMP-FIRST-NAME 21 JOSEPH 5 EMP-MID-INIT 31 C 5 FILLER 32 5 EMP-TITLE 34 ORATOR 5 EMP-PERSONAL-INFO SYNC 64 10 EMP-NATL-ID-NUMBER 64 275587177 10 FILLER 73 10 EMP-DATE-OF-BIRTH 74 020462 10 EMP-DOB-REDEF REDEFINES EMP-DATE-OF-BIRTH 10 EMP-DOB-REDEF SYNC 74 15 EMP-DOB-MM 74 2 15 EMP-DOB-DD 76 4 15 EMP-DOB-YY 78 62 10 EMP-HIRE-DATE 80 920121 10 EMP-MARITAL-STATUS 86 S 5 EMP-WITHOLD-INFO SYNC 87 10 EMP-LIFE-INS-WITHOLD-AMT 87 00000{ Enter CHAR for character mode, VFMT for vertical format mode
2-18
You can specify a number of records to scroll forward. For example, if record number 10 is the currently displayed record and you enter RIGHT 8, File-AID displays the 18th record in the dataset. You can specify a number of records to scroll backward. For example, if record number 10 is the currently displayed record and you enter BACK 8, File-AID displays the 2nd selected record in the dataset. Note that the number of the record is indicated in the RECORD field located in line three of the display heading. Another navigation command is LR n (locate record number n). For example, LR 4 displays selected record number 4.
2-19
File-AID - Browse - USERID9.FASAMP.EMPMAST ----------COMMAND ===> BACK RECORD: 2 EMPLOYEE-MASTER-FILE ---- FIELD LEVEL/NAME ------- COLUMNS- ----+----1----+5 EMP-NUMBER 1 00200
Steps:
1. Type BACK in the COMMAND field. 2. Press <Enter>. File-AID displays the previous selected record, as shown in Figure 2-18.
Figure 2-18. Browse - BACK Result - Formatted Display of Record 1
File-AID - Browse - USERID9.FASAMP.EMPMAST ------------------------- COL 1 92 COMMAND ===> SCROLL ===> PAGE RECORD: 1 EMPLOYEE-MASTER-FILE LENGTH: 198 ---- FIELD LEVEL/NAME ------- COLUMNS- ----+----1----+----2----+----3----+----4 5 EMP-NUMBER 1 00090 5 EMP-LAST-NAME 6 MARTIN 5 EMP-FIRST-NAME 21 EDWARD 5 EMP-MID-INIT 31 M 5 FILLER 32 5 EMP-TITLE 34 AIRPLANE MANUFACTURER 5 EMP-PERSONAL-INFO SYNC 64 10 EMP-NATL-ID-NUMBER 64 427890125 10 FILLER 73 10 EMP-DATE-OF-BIRTH 74 101954 10 EMP-DOB-REDEF REDEFINES EMP-DATE-OF-BIRTH 10 EMP-DOB-REDEF SYNC 74 15 EMP-DOB-MM 74 10 15 EMP-DOB-DD 76 19 15 EMP-DOB-YY 78 54 10 EMP-HIRE-DATE 80 920101 10 EMP-MARITAL-STATUS 86 M 5 EMP-WITHOLD-INFO SYNC 87 10 EMP-LIFE-INS-WITHOLD-AMT 87 30000} Enter CHAR for character mode, VFMT for vertical format mode
2-20
File-AID - Browse - USERID9.FASAMP.EMPMAST ----------COMMAND ===> PROFILE RECORD: 1 EMPLOYEE-MASTER-FILE ---- FIELD LEVEL/NAME ------- COLUMNS- ----+----1----+5 EMP-NUMBER 1 00090
Steps:
1. Type PROFILE in the COMMAND field. 2. Press <Enter>. File-AID displays three profile lines at the top of the data area as shown in Table on page 2-20.
Figure 2-20. Browse - Formatted Mode - After PROFILE Command
File-AID - Browse - USERID9.FASAMP.EMPMAST -------------------------- COL 1 98 COMMAND ===> SCROLL ===> PAGE RECORD: 1 EMPLOYEE-MASTER-FILE LENGTH: 198 ---- FIELD LEVEL/NAME ------- -FORMAT- ----+----1----+----2----+----3----+----4 =PROF> ..CAPS OFF....FILLER ON....GROUP ON....OCCURS ON....OFFSET COLUMNS...... =PROF> ..PICT OFF....PROT OFF....REDEF OFF....SHOW LEVEL....SYNC ON............ =PROF> ..ZERO OFF....MESSAGE ON................................................ 5 EMP-NUMBER 1 00090 5 EMP-LAST-NAME 6 MARTIN 5 EMP-FIRST-NAME 21 EDWARD 5 EMP-MID-INIT 31 M 5 FILLER 32 5 EMP-TITLE 34 AIRPLANE MANUFACTURER 5 EMP-PERSONAL-INFO SYNC 64 10 EMP-NATL-ID-NUMBER 64 427890125 10 FILLER 73 10 EMP-DATE-OF-BIRTH 74 101954 10 EMP-DOB-REDEF REDEFINES EMP-DATE-OF-BIRTH 10 EMP-DOB-REDEF SYNC 74 15 EMP-DOB-MM 74 10 15 EMP-DOB-DD 76 19 15 EMP-DOB-YY 78 54 10 EMP-HIRE-DATE 80 920101 Enter CHAR for character mode, VFMT for vertical format mode
2-21
Table 2-1. Option ALIGN ARRAY AUTOSAVE BOUNDS CAPS COMPLEX FILLER GROUP HEX MESSAGE OCCURS OFFSET PAD PICTURE PROTECT REDEFINES REFLNG SETUNDO SHOW STATS SYNC ZERO
User Profile Options Mode FMT FMT All modes CHAR,VFMT All modes FMT FMT, VFMT FMT CHAR, UNFMT, VFMT all modes FMT FMT, VFMT CHAR FMT FMT FMT, VFMT FMT All modes FMT, VFMT CHAR,VFMT FMT FMT, VFMT Language PL/I PL/I any any any PL/I COBOL, PL/I COBOL, PL/I any any COBOL COBOL, PL/I any COBOL, PL/I COBOL, PL/I COBOL PL/I any COBOL, PL/I any COBOL COBOL, PL/I Controls display of ... ALIGNED/UNALIGNED term ARRAY information ON or OFF issue SAVE on END current bounds settings ON or OFF uppercase entered text COMPLEX term FILLER fields occurrences of group-level items hexadecimal display of data mode command prompt line array declaration lines format for display of field offset information PAD character for shift PICTURE or DISPLAY line for numeric data fields ON or OFF key data protection data item redefinitions field length reference lines for BIT and CHAR ON or OFF toggle UNDO support LEVEL, NUMBER, FORMAT, OFFSET, or PICTURE information ISPF statistics update SYNC term for layout fields leading zeros in numeric data fields.
2-22
File-AID - Browse - USERID9.FASAMP.EMPMAST ----------COMMAND ===> RESET RECORD: 1 EMPLOYEE-MASTER-FILE ---- FIELD LEVEL/NAME ------- COLUMNS- ----+----1----+=PROF> ..CAPS OFF....FILLER ON....GROUP ON....OCCURS ON
Steps:
1. Type RESET in the COMMAND field. 2. Press <Enter>. File-AID redisplays the screen without the profile information lines. shown in Figure 2-22.
Figure 2-22. Browse - RESET Result - =PROF> Lines Gone
File-AID - Browse - USERID9.FASAMP.EMPMAST ------------------------- COL 1 92 COMMAND ===> SCROLL ===> PAGE RECORD: 1 EMPLOYEE-MASTER-FILE LENGTH: 198 ---- FIELD LEVEL/NAME ------- COLUMNS- ----+----1----+----2----+----3----+----4 5 EMP-NUMBER 1 00090 5 EMP-LAST-NAME 6 MARTIN 5 EMP-FIRST-NAME 21 EDWARD 5 EMP-MID-INIT 31 M 5 FILLER 32 5 EMP-TITLE 34 AIRPLANE MANUFACTURER 5 EMP-PERSONAL-INFO SYNC 64 10 EMP-NATL-ID-NUMBER 64 427890125 10 FILLER 73 10 EMP-DATE-OF-BIRTH 74 101954 10 EMP-DOB-REDEF REDEFINES EMP-DATE-OF-BIRTH 10 EMP-DOB-REDEF SYNC 74 15 EMP-DOB-MM 74 10 15 EMP-DOB-DD 76 19 15 EMP-DOB-YY 78 54 10 EMP-HIRE-DATE 80 920101 10 EMP-MARITAL-STATUS 86 M 5 EMP-WITHOLD-INFO SYNC 87 10 EMP-LIFE-INS-WITHOLD-AMT 87 30000} Enter CHAR for character mode, VFMT for vertical format mode
2-23
File-AID - Browse - USERID9.FASAMP.EMPMAST ----------COMMAND ===> SHOW PICTURE RECORD: 1 EMPLOYEE-MASTER-FILE ---- FIELD LEVEL/NAME ------- COLUMNS- ----+----1----+5 EMP-NUMBER 1 00090
Steps:
1. Type SHOW PICTURE in the COMMAND field. 2. Press <Enter>. File-AID redisplays the screen, changing the heading of the Field Description area to PICTURE and displaying the data declaration of each elementary item. The changed display is shown in Figure 2-24.
File-AID - Browse - USERID9.FASAMP.EMPMAST ------------------------- COL 1 92 COMMAND ===> SCROLL ===> PAGE RECORD: 1 EMPLOYEE-MASTER-FILE LENGTH: 198 ---- FIELD LEVEL/NAME ------- PICTURE- ----+----1----+----2----+----3----+----4 5 EMP-NUMBER X(5) 00090 5 EMP-LAST-NAME X(15) MARTIN 5 EMP-FIRST-NAME X(10) EDWARD 5 EMP-MID-INIT X M 5 FILLER XX 5 EMP-TITLE X(30) AIRPLANE MANUFACTURER 5 EMP-PERSONAL-INFO SYNC GROUP 10 EMP-NATL-ID-NUMBER 9(9) 427890125 10 FILLER X 10 EMP-DATE-OF-BIRTH X(6) 101954 10 EMP-DOB-REDEF REDEFINES EMP-DATE-OF-BIRTH 10 EMP-DOB-REDEF SYNC GROUP 15 EMP-DOB-MM 99 10 15 EMP-DOB-DD 99 19 15 EMP-DOB-YY 99 54 10 EMP-HIRE-DATE X(6) 920101 10 EMP-MARITAL-STATUS X M 5 EMP-WITHOLD-INFO SYNC GROUP 10 EMP-LIFE-INS-WITHOLD-AMT DISPLAY 30000} Enter CHAR for character mode, VFMT for vertical format mode
SHOW FORMAT
2-24
SHOW OFFSET
Change center column heading to COLUMNS and show the offset of each field relative to byte 1 (see Figure 2-26 on page 2-25). Abbrev: S O. You can tailor the offset using the OFFSET primary command (see Displaying the Offset for Each Field on page 2-25 for a description of the OFFSET command and its parameters).
SHOW LEVEL
Change left column heading to FIELD LEVEL/NAME and show the hierarchical level number (see Figure 2-24 on page 2-23). Abbrev: S L. Change left column heading to FIELD NUMBER/NAME and show the system-assigned field number (see Figure 2-30 on page 2-28). Abbrev: S N.
SHOW NUMBER
2-25
File-AID - Browse - USERID9.FASAMP.EMPMAST ----------COMMAND ===> SHOW OFFSET RECORD: 1 EMPLOYEE-MASTER-FILE ---- FIELD LEVEL/NAME ------- PICTURE- ----+----1----+5 EMP-NUMBER X(5) 00090
Steps:
1. Type SHOW OFFSET in the COMMAND field. (tip) SHOW may be abbreviated to S. Keyword OFFSET may be abbreviated to O. Therefore "S O" is the same as "SHOW OFFSET". Most commands can be shortened as long as they can be uniquely identified. 2. Press <Enter>. File-AID redisplays the screen, changing the heading of the Field Description area to indicate the format of the records offset and displaying the offset of each field from the beginning of the record.
File-AID - Browse - USERID9.FASAMP.EMPMAST ------------------------- COL 1 92 COMMAND ===> SCROLL ===> PAGE RECORD: 1 EMPLOYEE-MASTER-FILE LENGTH: 198 ---- FIELD LEVEL/NAME ------- COLUMNS- ----+----1----+----2----+----3----+----4 5 EMP-NUMBER 1 00090 5 EMP-LAST-NAME 6 MARTIN 5 EMP-FIRST-NAME 21 EDWARD 5 EMP-MID-INIT 31 M 5 FILLER 32 5 EMP-TITLE 34 AIRPLANE MANUFACTURER 5 EMP-PERSONAL-INFO SYNC 64 10 EMP-NATL-ID-NUMBER 64 427890125 10 FILLER 73 10 EMP-DATE-OF-BIRTH 74 101954 10 EMP-DOB-REDEF REDEFINES EMP-DATE-OF-BIRTH 10 EMP-DOB-REDEF SYNC 74 15 EMP-DOB-MM 74 10 15 EMP-DOB-DD 76 19 15 EMP-DOB-YY 78 54 10 EMP-HIRE-DATE 80 920101 10 EMP-MARITAL-STATUS 86 M 5 EMP-WITHOLD-INFO SYNC 87 10 EMP-LIFE-INS-WITHOLD-AMT 87 30000} Enter CHAR for character mode, VFMT for vertical format mode
2-26
OFFSET HEX
OFFSET COLUMNS
2-27
File-AID - Browse - USERID9.FASAMP.EMPMAST ----------COMMAND ===> SHOW FORMAT RECORD: 1 EMPLOYEE-MASTER-FILE ---- FIELD LEVEL/NAME ------- COLUMNS- ----+----1----+5 EMP-NUMBER 1 00090
Steps:
1. Type SHOW FORMAT in the COMMAND field. 2. Press <Enter>. File-AID redisplays the screen, changing the heading of the Field Description area to FORMAT and displaying the field length and format of each field.
File-AID - Browse - USERID9.FASAMP.EMPMAST ------------------------- COL 1 101 COMMAND ===> SCROLL ===> PAGE RECORD: 1 EMPLOYEE-MASTER-FILE LENGTH: 198 ---- FIELD LEVEL/NAME ------- -FORMAT- ----+----1----+----2----+----3----+----4 5 EMP-NUMBER 5/AN 00090 5 EMP-LAST-NAME 15/AN MARTIN 5 EMP-FIRST-NAME 10/AN EDWARD 5 EMP-MID-INIT 1/AN M 5 FILLER 2/AN 5 EMP-TITLE 30/AN AIRPLANE MANUFACTURER 5 EMP-PERSONAL-INFO SYNC 23/GRP 10 EMP-NATL-ID-NUMBER 9/NUM 427890125 10 FILLER 1/AN 10 EMP-DATE-OF-BIRTH 6/AN 101954 10 EMP-HIRE-DATE 6/AN 920101 10 EMP-MARITAL-STATUS 1/AN M 5 EMP-PERSONAL-INFO SYNC 15/GRP 10 EMP-LIFE-INS-WITHOLD-AMT 6/SNUM -3000.00 10 EMP-NATL-TAX-WITHOLD-PCT 3/PS -74.00 10 EMP-REGION-TAX-WITHOLD-PCT 3/PS 25.00 10 EMP-LOCAL-TAX-WITHOLD-PCT 3/PS 5.00 Enter CHAR for character mode, VFMT for vertical format mode
2-28
File-AID - Browse - USERID9.FASAMP.EMPMAST ----------COMMAND ===> SHOW NUMBER RECORD: 1 EMPLOYEE-MASTER-FILE ---- FIELD LEVEL/NAME ------- -FORMAT- ----+----1----+5 EMP-NUMBER 1 00090
Steps:
1. Type SHOW NUMBER in the COMMAND field. 2. Press <Enter>. File-AID redisplays the screen, changing the heading of the Field Name area to FIELD NUMBER/NAME and displaying the File-AID-assigned number for each field. The changed display is shown in Figure 2-30.
File-AID - Browse - USERID9.FASAMP.EMPMAST ------------------------- COL 1 101 COMMAND ===> SCROLL ===> PAGE RECORD: 1 EMPLOYEE-MASTER-FILE LENGTH: 198 ---- FIELD NUMBER/NAME ------ -FORMAT- ----+----1----+----2----+----3----+----4 1 EMP-NUMBER 5/AN 00090 2 EMP-LAST-NAME 15/AN MARTIN 3 EMP-FIRST-NAME 10/AN EDWARD 4 EMP-MID-INIT 1/AN M 5 FILLER 2/AN 6 EMP-TITLE 30/AN AIRPLANE MANUFACTURER 7 EMP-PERSONAL-INFO SYNC 23/GRP 8 EMP-NATL-ID-NUMBER 9/NUM 427890125 9 FILLER 1/AN 10 EMP-DATE-OF-BIRTH 6/AN 101954 15 EMP-HIRE-DATE 6/AN 920101 16 EMP-MARITAL-STATUS 1/AN M 17 EMP-PERSONAL-INFO SYNC 15/GRP 18 EMP-LIFE-INS-WITHOLD-AMT 6/SNUM -3000.00 19 EMP-NATL-TAX-WITHOLD-PCT 3/PS -74.00 20 EMP-REGION-TAX-WITHOLD-PCT 3/PS 25.00 21 EMP-LOCAL-TAX-WITHOLD-PCT 3/PS 5.00 Enter CHAR for character mode, VFMT for vertical format mode
2-29
File-AID - Browse - USERID9.FASAMP.EMPMAST ----------COMMAND ===> DISPLAY 1-6 16 21 ONLY RECORD: 1 EMPLOYEE-MASTER-FILE ---- FIELD NUMBER/NAME ------ -FORMAT- ----+----1----+1 EMP-NUMBER 5/AN 00090
Steps:
1. Type DISPLAY 1-6 16 21 ONLY in the COMMAND field. You can separate the field numbers by blanks or commas. You may specify individual fields and/or field ranges (two fields connected by a hyphen: a-b). 2. Press <Enter>. Only the data items in fields 1 thru 6, 16, and 21 are displayed as illustrated in Figure 2-32.
File-AID - Browse - USERID9.FASAMP.EMPMAST ------------------------- COL 1 101 COMMAND ===> SCROLL ===> PAGE RECORD: 1 EMPLOYEE-MASTER-FILE LENGTH: 198 ---- FIELD NUMBER/NAME ------ -FORMAT- ----+----1----+----2----+----3----+----4 ******************************** TOP OF DATA ********************************** 1 EMP-NUMBER 5/AN 00090 2 EMP-LAST-NAME 15/AN MARTIN 3 EMP-FIRST-NAME 10/AN EDWARD 4 EMP-MID-INIT 1/AN M 5 FILLER 2/AN 6 EMP-TITLE 30/AN AIRPLANE MANUFACTURER 16 EMP-MARITAL-STATUS 1/AN M 21 EMP-LOCAL-TAX-WITHOLD-PCT 3/PS 5.00 ****************************** BOTTOM OF DATA *********************************
Enter CHAR for character mode, VFMT for vertical format mode
2-30
The ON, OFF, and ONLY parameters can be placed before, after, or in any position within the field list. In formatted mode, the set of fields that you define with the DISPLAY command is associated with a record layout and reused each time a record is mapped to that layout. You can define a separate set of fields to be displayed for each record layout if an XREF is in use. The SHOW NUMBER command is used to tailor the display to show the field numbers. The FPRINT command generates a report of one or more records and uses the current SHOW and DISPLAY settings to determine which fields are to appear on the report. (What you see is what you get.)
2-31
File-AID - Browse - USERID9.FASAMP.EMPMAST ----------COMMAND ===> DIS 3-6 OFF RECORD: 1 EMPLOYEE-MASTER-FILE ---- FIELD NUMBER/NAME ------ -FORMAT- ----+----1----+1 EMP-NUMBER 5/AN 00090
Steps:
1. Type DIS 3-6 OFF in the COMMAND field. 2. Press <Enter>. File-AID redisplays the screen, excluding fields 3-6 (EMP-FIRST-NAME, EMP-MID-INIT, FILLER, and EMP-TITLE) from the display as illustrated in Figure 2-34.
File-AID - Browse - USERID9.FASAMP.EMPMAST ------------------------- COL 1 101 COMMAND ===> SCROLL ===> PAGE RECORD: 1 EMPLOYEE-MASTER-FILE LENGTH: 198 ---- FIELD NUMBER/NAME ------ -FORMAT- ----+----1----+----2----+----3----+----4 ******************************** TOP OF DATA ********************************** 1 EMP-NUMBER 5/AN 00090 2 EMP-LAST-NAME 15/AN MARTIN 16 EMP-MARITAL-STATUS 1/AN M 21 EMP-LOCAL-TAX-WITHOLD-PCT 3/PS 5.00 ****************************** BOTTOM OF DATA *********************************
Enter CHAR for character mode, VFMT for vertical format mode
2-32
File-AID - Browse - USERID9.FASAMP.EMPMAST ----------COMMAND ===> DIS 34 ON RECORD: 1 EMPLOYEE-MASTER-FILE ---- FIELD NUMBER/NAME ------ -FORMAT- ----+----1----+1 EMP-NUMBER 5/AN 00090
Steps:
1. Type DIS 34 ON in the COMMAND field. 2. Press <Enter>. File-AID redisplays the screen and adds field 34 to the set of currently displayed fields as illustrated in Figure 2-36.
Result of DISPLAY 34 ON
Figure 2-36. Browse - Formatted Mode - After DIS 34 ON Command
File-AID - Browse - USERID9.FASAMP.EMPMAST ------------------------- COL 1 198 COMMAND ===> SCROLL ===> PAGE RECORD: 1 EMPLOYEE-MASTER-FILE LENGTH: 198 ---- FIELD NUMBER/NAME ------ -FORMAT- ----+----1----+----2----+----3----+----4 ******************************** TOP OF DATA ********************************** 1 EMP-NUMBER 5/AN 00090 2 EMP-LAST-NAME 15/AN MARTIN 16 EMP-MARITAL-STATUS 1/AN M 21 EMP-LOCAL-TAX-WITHOLD-PCT 3/PS 5.00 34 EMP-CON-HOME-PHONE 10/AN 4155556981 ****************************** BOTTOM OF DATA *********************************
Enter CHAR for character mode, VFMT for vertical format mode
2-33
File-AID - Browse - USERID9.FASAMP.EMPMAST ----------COMMAND ===> DIS ALL RECORD: 1 EMPLOYEE-MASTER-FILE ---- FIELD NUMBER/NAME ------ -FORMAT- ----+----1----+1 EMP-NUMBER 5/AN 00090
Steps:
1. Type DIS ALL in the COMMAND field. 2. Press <Enter>. File-AID redisplays the screen with all of the fields for record 1 as illustrated in Figure 2-38.
File-AID - Browse - USERID9.FASAMP.EMPMAST ------------------------- COL 1 101 COMMAND ===> SCROLL ===> PAGE RECORD: 1 EMPLOYEE-MASTER-FILE LENGTH: 198 ---- FIELD NUMBER/NAME ------ -FORMAT- ----+----1----+----2----+----3----+----4 ******************************** TOP OF DATA ********************************** 1 EMP-NUMBER 5/AN 00090 2 EMP-LAST-NAME 15/AN MARTIN 3 EMP-FIRST-NAME 10/AN EDWARD 4 EMP-MID-INIT 1/AN M 5 FILLER 2/AN 6 EMP-TITLE 30/AN AIRPLANE MANUFACTURER 7 EMP-PERSONAL-INFO SYNC 23/GRP 8 EMP-NATL-ID-NUMBER 9/NUM 427890125 9 FILLER 1/AN 10 EMP-DATE-OF-BIRTH 6/AN 101954 15 EMP-HIRE-DATE 6/AN 920101 16 EMP-MARITAL-STATUS 1/AN M 17 EMP-PERSONAL-INFO SYNC 15/GRP 18 EMP-LIFE-INS-WITHOLD-AMT 6/SNUM -3000.00 19 EMP-NATL-TAX-WITHOLD-PCT 3/PS -74.00 20 EMP-REGION-TAX-WITHOLD-PCT 3/PS 25.00 21 EMP-LOCAL-TAX-WITHOLD-PCT Enter CHAR for character mode, VFMT for vertical format mode
2-34
File-AID - Browse - USERID9.FASAMP.EMPMAST ----------COMMAND ===> FIND RECORD: 1 EMPLOYEE-MASTER-FILE ---- FIELD NUMBER/NAME ------ -FORMAT- ----+----1----+1 EMP-NUMBER 5/AN 00090
Steps:
1. Type FIND in the COMMAND field. 2. Press <Enter>. File-AID displays the FIND Command screen as illustrated in Figure 240.
File-AID ----------------COMMAND ===> Specify FIND operands: Operator ===> Find string ===> Modifier ===> NEXT Lines to search ===>
FIND Command
------------------------------------
(EQ; NE; LT; GT; LE; GE) (NEXT; ALL; FIRST; LAST; PREV) (NX = Nonexcluded; X = Excluded; Blank = all)
Specify the Following Fields to Limit the Range of Search for this FIND: Field name ===> or Field number ===> or Start column ===> End column ===> (Column number(s)) Start range ===> End range ===> (Label or line number) NOTE: You may bypass this screen by entering the FIND command with operands: FIND string (NEXT) (NX) (col-1 (col-2)) (range) F (op) string (ALL) (X) (/field name) VALID (FIRST) (/field number) INVALID (LAST) * (PREV)
2-35
FIND Command
------------------------------------
Specify FIND operands: Operator ===> EQ Find string ===> JONES Modifier ===> NEXT Lines to search ===>
(EQ; NE; LT; GT; LE; GE) (NEXT; ALL; FIRST; LAST; PREV) (NX = Nonexcluded; X = Excluded; Blank = all)
Specify the Following Fields to Limit the Range of Search for this FIND: Field name ===> EMP-LAST-NAME or Field number ===> or Start column ===> End column ===> (Column number(s)) Start range ===> End range ===> (Label or line number) NOTE: You may bypass this screen by entering the FIND command with operands: FIND string (NEXT) (NX) (col-1 (col-2)) (range) F (op) string (ALL) (X) (/field name) VALID (FIRST) (/field number) INVALID (LAST) * (PREV)
The fields on the FIND Command screen correspond to the FIND primary command syntax parameters. Refer to the File-AID/MVS Online Reference Manual (SPF and XE) for information on the FIND command syntax. A sample of the FIND syntax is displayed on the bottom half of the screen.
Steps:
1. Type EQ in the Operator field. The relational operator EQ indicates that data must equal the value specified in the Find string field. Other valid operators are listed to the right of the field name. EQ is assumed when no operator is specified. 2. Type JONES in the Find string field. The Find string field contains the value that you want to match defined by the value you specify in the Operator field. 3. Type NEXT in the Modifier field. The value you specify in the Modifier field tells File-AID where to begin and in which direction to search. Using the NEXT value, File-AID searches forward in the dataset starting at the current cursor position. 4. Type EMP-LAST-NAME in the Field name field. Use the Field name field to limit the search to this field only in each record. 5. Press <Enter>. File-AID searches the EMP-LAST-NAME field in each record to find the value JONES. When found, the screen is automatically scrolled to show the data found as illustrated in Figure 2-42 on page 2-36.
2-36
File-AID - Browse - USERID9.FASAMP.EMPMAST ----------- JONES FOUND COMMAND ===> SCROLL ===> PAGE RECORD: 6 EMPLOYEE-MASTER-FILE LENGTH: 198 ---- FIELD NUMBER/NAME ------ -FORMAT- ----+----1----+----2----+----3----+----4 JONES 2 EMP-LAST-NAME 15/AN 3 EMP-FIRST-NAME 10/AN GEORGE 4 EMP-MID-INIT 1/AN B 5 FILLER 2/AN 6 EMP-TITLE 30/AN COUNTRY SINGER 7 EMP-PERSONAL-INFO SYNC 23/GRP 8 EMP-NATL-ID-NUMBER 9/NUM 463813456 9 FILLER 1/AN 10 EMP-DATE-OF-BIRTH 6/AN 090944 15 EMP-HIRE-DATE 6/AN 920221 16 EMP-MARITAL-STATUS 1/AN S 17 EMP-PERSONAL-INFO SYNC 15/GRP
Delimited
2-37
File-AID - Browse - USERID9.FASAMP.EMPMAST ----------COMMAND ===> CHAR RECORD: 6 EMPLOYEE-MASTER-FILE ---- FIELD NUMBER/NAME ------ -FORMAT- ----+----1----+2 EMP-LAST-NAME 15/AN JONES
Steps:
1. Type CHAR in the COMMAND field. 2. Press <Enter>. File-AID displays your data records in character mode as shown in Figure 2-44.
Figure 2-44. Browse - Character Mode Full Screen Display
File-AID - Browse - USERID9.FASAMP.EMPMAST ---------------- LINE 0000 COL 1 80 COMMAND ===> SCROLL ===> PAGE ********************************* TOP OF DATA **********************-CAPS OFF-* 00090MARTIN EDWARD M AIRPLANE MANUFACTURER 427890125 1019549 - - - - - - - - - - - - - - - - - - - - - - - - - - - 1 RECORD(S) NOT SELECTED 00200JACKSON JOSEPH C ORATOR 275587177 0204629 10000ANDREWS GEORGE ACTOR 576312032 0422489 15000MURPHY RONALD L PAINTER 987654321 1202559 18034SCHNEIDER ELLEN C NURSE 341559549 0329609 GEORGE B COUNTRY SINGER 463813456 0909449 21035 J ONES 25100ROBERTS WILLIAM R POLITICIAN 879563325 0508659 27007ALLEN JOYCE M AUTHOR 783458334 0121329 30001RICHARDS REX W RODEO CLOWN 632764534 0401409 31000SAVAGE JONATHON C ELECTRICIAN 348567992 0622509 34010SMITH JANET AIRLINE ATTENDANT 557782984 1123599 34011JACOBS DIANA DOCTOR 225368395 0217579 ******************************** BOTTOM OF DATA ********************-CAPS OFF-*
Enter FMT for formatted mode, VFMT for vertical format, HEX ON
for Hex
The appearance of the "NOT SELECTED" information line is controlled by the 0.1 System parameter "Display records not selected line" default.
2-38
File-AID - Browse - USERID9.FASAMP.EMPMAST ----------COMMAND ===> HEX ON ********************************* TOP OF DATA ********** 00090MARTIN EDWARD M AIRPLANE MANUFACTURER
Steps:
1. Return the cursor to the COMMAND field. When switching to Character mode from Formatted or Vertical Formatted mode, the cursor is positioned on the byte of data that was at the top of the formatted display. 2. Type HEX ON in the COMMAND field. 3. Press <Enter>. File-AID redisplays the screen and presents the data in its hexadecimal notation.
Result of HEX ON
Figure 2-46. Character Mode - After HEX ON
File-AID - Browse - USERID9.FASAMP.EMPMAST ---------------- LINE 0000 COL 1 80 COMMAND ===> SCROLL ===> PAGE ********************************* TOP OF DATA **********************-CAPS OFF-* 00090MARTIN EDWARD M AIRPLANE MANUFACTURER 427890125 1019549 FFFFFDCDECD444444444CCECDC4444D44CCDDDCDC4DCDECCCEEDCD444444444FFFFFFFFF4FFFFFFF 00090419395000000000546194000040019973155041546133495900000000042789012501019549 - - - - - - - - - - - - - - - - - - - - - - - - - - - 1 RECORD(S) NOT SELECTED 00200JACKSON JOSEPH C ORATOR 275587177 0204629 FFFFFDCCDEDD44444444DDECDC4444C44DDCEDD444444444444444444444444FFFFFFFFF4FFFFFFF 00200113226500000000162578000030069136900000000000000000000000027558717700204629 ------------------------------------------------------------------------------10000ANDREWS GEORGE ACTOR 576312032 0422489 FFFFFCDCDCEE44444444CCDDCC4444444CCEDD4444444444444444444444444FFFFFFFFF4FFFFFFF 10000154956200000000756975000000013369000000000000000000000000057631203200422489 ------------------------------------------------------------------------------15000MURPHY RONALD L PAINTER 987654321 1202559 FFFFFDEDDCE444444444DDDCDC4444D44DCCDECD44444444444444444444444FFFFFFFFF4FFFFFFF 15000449788000000000965134000030071953590000000000000000000000098765432101202559 ------------------------------------------------------------------------------18034SCHNEIDER ELLEN C NURSE 341559549 0329609 FFFFFECCDCCCCD444444CDDCD44444C44DEDEC4444444444444444444444444FFFFFFFFF4FFFFFFF 18034238559459000000533550000030054925000000000000000000000000034155954900329609 ------------------------------------------------------------------------------Enter FMT for formatted mode, VFMT for vertical format, HEX OFF for Char
2-39
File-AID - Browse - USERID9.FASAMP.EMPMAST ----------COMMAND ===> HEX OFF ********************************* TOP OF DATA ********** 00090MARTIN EDWARD M AIRPLANE MANUFACTURER FFFFFDCDECD444444444CCECDC4444D44CCDDDCDC4DCDECCCEEDCD44 00090419395000000000546194000040019973155041546133495900 - - - - - - - - - - - - - - - - - - - - - - - - - - - 1
Steps:
1. Type HEX OFF in the COMMAND field. 2. Press <Enter>. File-AID redisplays the screen in character format as illustrated in Figure 2-48.
Figure 2-48. Browse - Character Mode - After HEX OFF
File-AID - Browse - USERID9.FASAMP.EMPMAST ---------------- LINE 0000 COL 1 80 COMMAND ===> SCROLL ===> PAGE ********************************* TOP OF DATA **********************-CAPS OFF-* 00090MARTIN EDWARD M AIRPLANE MANUFACTURER 427890125 1019549 - - - - - - - - - - - - - - - - - - - - - - - - - - - 1 RECORD(S) NOT SELECTED 00200JACKSON JOSEPH C ORATOR 275587177 0204629 10000ANDREWS GEORGE ACTOR 576312032 0422489 15000MURPHY RONALD L PAINTER 987654321 1202559 18034SCHNEIDER ELLEN C NURSE 341559549 0329609 21035JONES GEORGE B COUNTRY SINGER 463813456 0909449 25100ROBERTS WILLIAM R POLITICIAN 879563325 0508659 27007ALLEN JOYCE M AUTHOR 783458334 0121329 30001RICHARDS REX W RODEO CLOWN 632764534 0401409 31000SAVAGE JONATHON C ELECTRICIAN 348567992 0622509 34010SMITH JANET AIRLINE ATTENDANT 557782984 1123599 34011JACOBS DIANA DOCTOR 225368395 0217579 ******************************** BOTTOM OF DATA ********************-CAPS OFF-*
Enter FMT for formatted mode, VFMT for vertical format, HEX ON
for Hex
2-40
File-AID - Browse - USERID9.FASAMP.EMPMAST ----------COMMAND ===> COLS ********************************* TOP OF DATA ********** 00090MARTIN EDWARD M AIRPLANE MANUFACTURER
Steps:
1. Type COLS in the COMMAND field. 2. Press <Enter>. File-AID displays the ruler line at the top of the data display as illustrated in Figure 2-50.
Figure 2-50. Browse - Character Mode - After COLS Command
File-AID - Browse - USERID9.FASAMP.EMPMAST ---------------- LINE 0000 COL 1 80 COMMAND ===> SCROLL ===> PAGE ----+----1----+----2----+----3----+----4----+----5----+----6----+----7----+----8 ********************************* TOP OF DATA **********************-CAPS OFF-* 00090MARTIN EDWARD M AIRPLANE MANUFACTURER 427890125 1019549 - - - - - - - - - - - - - - - - - - - - - - - - - - - 1 RECORD(S) NOT SELECTED 00200JACKSON JOSEPH C ORATOR 275587177 0204629 10000ANDREWS GEORGE ACTOR 576312032 0422489 15000MURPHY RONALD L PAINTER 987654321 1202559 18034SCHNEIDER ELLEN C NURSE 341559549 0329609 21035JONES GEORGE B COUNTRY SINGER 463813456 0909449 25100ROBERTS WILLIAM R POLITICIAN 879563325 0508659 27007ALLEN JOYCE M AUTHOR 783458334 0121329 30001RICHARDS REX W RODEO CLOWN 632764534 0401409 31000SAVAGE JONATHON C ELECTRICIAN 348567992 0622509 34010SMITH JANET AIRLINE ATTENDANT 557782984 1123599 34011JACOBS DIANA DOCTOR 225368395 0217579 ******************************** BOTTOM OF DATA ********************-CAPS OFF-*
Enter FMT for formatted mode, VFMT for vertical format, HEX ON
for Hex
2-41
File-AID - Browse - USERID9.FASAMP.EMPMAST ----------COMMAND ===> FIND POLITICIAN 34 ----+----1----+----2----+----3----+----4----+----5----+********************************* TOP OF DATA ********** 00090MARTIN EDWARD M AIRPLANE MANUFACTURER
Steps:
1. Type FIND POLITICIAN 34 in the COMMAND field. In the FIND primary command syntax, POLITICIAN is the Find string field value and 34 is the value of the Start column field. When you specify a Start column number, the value you specify as the Find string value must begin in the specified column position. If the value you are looking for is a number, enclose the number in single quotes (for example, FIND '18034' 1). 2. Press <Enter>. File-AID positions the cursor on the P in POLITICIAN. If necessary the display is automatically scrolled so that the found string is visible. File-AID indicates that it has found the search value by displaying the message 'POLITICIAN' FOUND in the upper-right hand corner of the screen as shown in Figure 2-52.
Figure 2-52. FIND result - Cursor on P in POLITICIAN
File-AID - Browse - USERID9.FASAMP.EMPMAST ---------------- POLITICIAN FOUND COMMAND ===> SCROLL ===> PAGE ----+----1----+----2----+----3----+----4----+----5----+----6----+----7----+----8 ********************************* TOP OF DATA **********************-CAPS OFF-* 00090MARTIN EDWARD M AIRPLANE MANUFACTURER 427890125 1019549 - - - - - - - - - - - - - - - - - - - - - - - - - - - 1 RECORD(S) NOT SELECTED 00200JACKSON JOSEPH C ORATOR 275587177 0204629 10000ANDREWS GEORGE ACTOR 576312032 0422489 15000MURPHY RONALD L PAINTER 987654321 1202559 18034SCHNEIDER ELLEN C NURSE 341559549 0329609 21035JONES GEORGE B COUNTRY SINGER 463813456 0909449 879563325 0508659 25100ROBERTS WILLIAM R POLITICIAN 27007ALLEN JOYCE M AUTHOR 783458334 0121329 30001RICHARDS REX W RODEO CLOWN 632764534 0401409 31000SAVAGE JONATHON C ELECTRICIAN 348567992 0622509 34010SMITH JANET AIRLINE ATTENDANT 557782984 1123599 34011JACOBS DIANA DOCTOR 225368395 0217579 ******************************** BOTTOM OF DATA ********************-CAPS OFF-*
Enter FMT for formatted mode, VFMT for vertical format, HEX ON
for Hex
2-42
File-AID - Browse - USERID9.FASAMP.EMPMAST ----------COMMAND ===> VFMT ----+----1----+----2----+----3----+----4----+----5----+********************************* TOP OF DATA ********** 00090MARTIN EDWARD M AIRPLANE MANUFACTURER
Steps:
1. Type VFMT in the COMMAND field. 2. Press <Enter>. File-AID redisplays the screen with the column headings positioned at the top of the data display as illustrated in Figure 2-54.
File-AID - Browse - USERID9.FASAMP.EMPMAST ---------------- LINE 0000 COL 1 49 COMMAND ===> SCROLL ===> PAGE EMP-NUMBER EMP-LAST-NAME EMP-FIRST-NAME EMP-MID-INIT FILLER EMP-TITLE 5/AN 15/AN 10/AN 1/AN 2/AN 30/AN (1-5) (6-20) (21-30) (31-31) (32-33) (34-49) 1--------- 2-------------- 3------------- 4----------- 5------- 6--------------********************************* TOP OF DATA **********************-CAPS OFF-* 00090 MARTIN EDWARD M AIRPLANE MANUFAC - - - - - - - - - - - - - - - - - - - - - - - - - - - 1 RECORD(S) NOT SELECTED 00200 JACKSON JOSEPH C ORATOR 10000 ANDREWS GEORGE ACTOR 15000 MURPHY RONALD L PAINTER 18034 SCHNEIDER ELLEN C NURSE 21035 JONES GEORGE B COUNTRY SINGER 25100 ROBERTS WILLIAM R POLITICIAN 27007 ALLEN JOYCE M AUTHOR 30001 RICHARDS REX W RODEO CLOWN 31000 SAVAGE JONATHON C ELECTRICIAN 34010 SMITH JANET AIRLINE ATTENDAN 34011 JACOBS DIANA DOCTOR ******************************** BOTTOM OF DATA ********************-CAPS OFF-* Enter FMT for formatted mode, CHAR for character format, HEX ON for Hex
2-43
The VPRINT primary command prints the current record and any number of subsequent records in a vertical formatted report. Use the FIELDS operand to specify exactly which fields to include in the report.
After you become familiar with the basic commands (CHAR, FMT, VFMT, and HEX), you can turn off the display of this message line with the MESSAGE command.
Figure 2-55. Suppress Mode Prompt Message Line (MESSAGE OFF)
File-AID - Browse - USERID9.FASAMP.EMPMAST ---------COMMAND ===> MSG OFF ----+----1----+----2----+----3----+----4----+----5----+ ********************************* TOP OF DATA ********* EMP-NUMBER EMP-LAST-NAME EMP-FIRST-NAME EMP-MID-INIT 5/AN 15/AN 10/AN 1/AN (1-5) (6-20) (21-30) (31-31) 1--------- 2-------------- 3------------- 4----------********************************* TOP OF DATA ********* 00090 MARTIN EDWARD M - - - - - - - - - - - - - - - - - - - - - - - - - - 00200 JACKSON JOSEPH C
Steps:
1. Type MSG OFF in the COMMAND field. 2. Press <Enter>. File-AID redisplays the screen without the message line as shown in Figure 2-56.
Figure 2-56. Browse - Vertical Formatted Mode - After MSG OFF Command. Lower Portion of Screen - Prompt Line Gone
30001 RICHARDS REX W RODEO CLOWN 31000 SAVAGE JONATHON C ELECTRICIAN 34010 SMITH JANET AIRLINE ATTENDAN 34011 JACOBS DIANA DOCTOR ******************************** BOTTOM OF DATA ********************-CAPS OFF-*
2-44
SHOW FORMAT
SHOW OFFSET
File-AID - Browse - USERID9.FASAMP.EMPMAST ---------COMMAND ===> SHOW PICTURE ----+----1----+----2----+----3----+----4----+----5----+ ********************************* TOP OF DATA ********* EMP-NUMBER EMP-LAST-NAME EMP-FIRST-NAME EMP-MID-INIT 5/AN 15/AN 10/AN 1/AN (1-5) (6-20) (21-30) (31-31) 1--------- 2-------------- 3------------- 4-----------
Steps:
1. Type SHOW PICTURE in the COMMAND field. 2. Press <Enter>. File-AID redisplays the screen, changing the second line of each column heading to show the type and maximum length of the items in the column. The changed display is shown in Figure 2-58.
Figure 2-58. Browse - Vertical Formatted Mode - After SHOW PICTURE
File-AID - Browse - USERID9.FASAMP.EMPMAST ---------------- LINE 0000 COL 1 49 COMMAND ===> SCROLL ===> PAGE EMP-NUMBER EMP-LAST-NAME EMP-FIRST-NAME EMP-MID-INIT FILLER EMP-TITLE X(5) X(15) X(10) X XX X(30) (1-5) (6-20) (21-30) (31-31) (32-33) (34-49) 1--------- 2-------------- 3------------- 4----------- 5------- 6--------------********************************* TOP OF DATA **********************-CAPS OFF-* 00090 MARTIN EDWARD M AIRPLANE MANUFAC - - - - - - - - - - - - - - - - - - - - - - - - - - - 1 RECORD(S) NOT SELECTED 00200 JACKSON JOSEPH C ORATOR 10000 ANDREWS GEORGE ACTOR
2-45
File-AID - Browse - USERID9.FASAMP.EMPMAST ---------COMMAND ===> SHOW OFFSET ----+----1----+----2----+----3----+----4----+----5----+ ********************************* TOP OF DATA ********* EMP-NUMBER EMP-LAST-NAME EMP-FIRST-NAME EMP-MID-INIT 5/AN 15/AN 10/AN 1/AN (1-5) (6-20) (21-30) (31-31) 1--------- 2-------------- 3------------- 4-----------
Steps:
1. Type SHOW OFFSET in the COMMAND field. 2. Press <Enter>. File-AID redisplays the screen, changing the second line of each column heading to show the offset for each column of data. The changed display is shown in Figure 2-60.
Figure 2-60. Browse - Vertical Formatted Mode - After SHOW OFFSET
File-AID - Browse - USERID9.FASAMP.EMPMAST ---------------- LINE 0000 COL 1 49 COMMAND ===> SCROLL ===> PAGE EMP-NUMBER EMP-LAST-NAME EMP-FIRST-NAME EMP-MID-INIT FILLER EMP-TITLE 1 6 21 31 32 34 (1-5) (6-20) (21-30) (31-31) (32-33) (34-49) 1--------- 2-------------- 3------------- 4----------- 5------- 6--------------********************************* TOP OF DATA **********************-CAPS OFF-* 00090 MARTIN EDWARD M AIRPLANE MANUFAC - - - - - - - - - - - - - - - - - - - - - - - - - - - 1 RECORD(S) NOT SELECTED 00200 JACKSON JOSEPH C ORATOR 10000 ANDREWS GEORGE ACTOR
2-46
File-AID - Browse - USERID9.FASAMP.EMPMAST ---------COMMAND ===> S F ----+----1----+----2----+----3----+----4----+----5----+ ********************************* TOP OF DATA ********* EMP-NUMBER EMP-LAST-NAME EMP-FIRST-NAME EMP-MID-INIT 1 6 21 31 (1-5) (6-20) (21-30) (31-31) 1--------- 2-------------- 3------------- 4-----------
Steps:
1. Type S F in the COMMAND field. 2. Press <Enter>. File-AID redisplays the screen, changing the second line of the column headings to describe the field length and format of each column of data items. The changed display is shown in Figure 2-62. The length of a field is expressed in bytes. The length indicates the actual number of bytes occupied by the field and not the data item size. The PICTURE parameter displays the size of the data item.
Figure 2-62. Browse - Vertical Formatted Mode - After SHOW FORMAT Command
File-AID - Browse - USERID9.FASAMP.EMPMAST ---------------- LINE 0000 COL 1 49 COMMAND ===> SCROLL ===> PAGE EMP-NUMBER EMP-LAST-NAME EMP-FIRST-NAME EMP-MID-INIT FILLER EMP-TITLE 5/AN 15/AN 10/AN 1/AN 2/AN 30/AN (1-5) (6-20) (21-30) (31-31) (32-33) (34-49) 1--------- 2-------------- 3------------- 4----------- 5------- 6--------------********************************* TOP OF DATA **********************-CAPS OFF-* 00090 MARTIN EDWARD M AIRPLANE MANUFAC - - - - - - - - - - - - - - - - - - - - - - - - - - - 1 RECORD(S) NOT SELECTED 00200 JACKSON JOSEPH C ORATOR 10000 ANDREWS GEORGE ACTOR
2-47
File-AID - Browse - USERID9.FASAMP.EMPMAST ---------COMMAND ===> DIS 16 21 34 ONLY ----+----1----+----2----+----3----+----4----+----5----+ ********************************* TOP OF DATA ********* EMP-NUMBER EMP-LAST-NAME EMP-FIRST-NAME EMP-MID-INIT 5/AN 15/AN 10/AN 1/AN (1-5) (6-20) (21-30) (31-31) 1--------- 2-------------- 3------------- 4-----------
Steps:
1. Type DIS 16 21 34 ONLY in the COMMAND field. 2. Press <Enter>. The data items for fields 16, 21, and 34 only are redisplayed on the screen as illustrated in Figure 2-64.
Figure 2-64. Vertical Formatted Mode - After DISPLAY 16 21 34 ONLY
File-AID - Browse - USERID9.FASAMP.EMPMAST -------------- LINE 0000 COL 86 198 COMMAND ===> SCROLL ===> PAGE EMP-MARITAL-STATUS EMP-LOCAL-TAX-WITHOLD-PCT EMP-CON-HOME-PHONE 1/AN 3/PS 10/AN (86-86) (99-101) (189-198) 16---------------- 21----------------------- 34---------------********************************* TOP OF DATA **********************-CAPS OFF-* M 5.00 4155556981 - - - - - - - - - - - - - - - - - - - - - - - - - - - 1 RECORD(S) NOT SELECTED S 0 2125559021 S 15.00 4045559021 S 0 3125559021 S 0 4085551245 S 7.00 4085551245 S 0 4085559021 S 0 7135559021
2-48
File-AID - Browse - USERID9.FASAMP.EMPMAST ---------COMMAND ===> DIS 21 HEX ----+----1----+----2----+----3----+----4----+----5----+ ********************************* TOP OF DATA ********* EMP-MARITAL-STATUS EMP-LOCAL-TAX-WITHOLD-PCT EMP-CON-HO 1/AN 3/PS 10/AN (86-86) (99-101) (189-198) 16---------------- 21----------------------- 34-------********************************* TOP OF DATA ********* M 5.00 4155556981 - - - - - - - - - - - - - - - - - - - - - - - - - - S 0 2125559021 S 15.00 4045559021
Steps:
1. Type DIS 21 HEX in the COMMAND field. 2. Press <Enter>. The data items in field 21 only are redisplayed in hexadecimal notation as illustrated in Figure 2-66.
2-49
File-AID - Browse - USERID9.FASAMP.EMPMAST -------------- LINE 0000 COL 86 198 COMMAND ===> SCROLL ===> PAGE EMP-MARITAL-STATUS EMP-LOCAL-TAX-WITHOLD-PCT EMP-CON-HOME-PHONE 1/AN 3/HEX 10/AN (86-86) (99-101) (189-198) 16---------------- 21----------------------- 34---------------********************************* TOP OF DATA **********************-CAPS OFF-* M 00500C 4155556981 - - - - - - - - - - - - - - - - - - - - - - - - - - - 1 RECORD(S) NOT SELECTED S 00000C 2125559021 S 01500C 4045559021 S 00000C 3125559021 S 00000C 4085551245 S 00700C 4085551245 S 00700C 7175550855
2-50
File-AID - Browse - USERID9.FASAMP.EMPMAST ---------COMMAND ===> DIS 21 RESET ----+----1----+----2----+----3----+----4----+----5----+ ********************************* TOP OF DATA ********* EMP-MARITAL-STATUS EMP-LOCAL-TAX-WITHOLD-PCT EMP-CON-HO 1/AN 3/HEX 10/AN (86-86) (99-101) (189-198) 16---------------- 21----------------------- 34-------********************************* TOP OF DATA ********* M 00500C 4155556981 - - - - - - - - - - - - - - - - - - - - - - - - - - S 00000C 2125559021 S 01500C 4045559021
Steps:
1. Type DIS 21 RESET in the COMMAND field. 2. Press <Enter>. Field 21 is displayed normalized in decimal format as illustrated in Figure 2-68.
Figure 2-68. Vertical Formatted Mode - After DISPLAY 21 RESET
File-AID - Browse - USERID9.FASAMP.EMPMAST -------------- LINE 0000 COL 86 198 COMMAND ===> SCROLL ===> PAGE EMP-MARITAL-STATUS EMP-LOCAL-TAX-WITHOLD-PCT EMP-CON-HOME-PHONE 1/AN 3/PS 10/AN (86-86) (99-101) (189-198) 16---------------- 21----------------------- 34---------------********************************* TOP OF DATA **********************-CAPS OFF-* M 5.00 4155556981 - - - - - - - - - - - - - - - - - - - - - - - - - - - 1 RECORD(S) NOT SELECTED S 0 2125559021 S 15.00 4045559021 S 0 3125559021 S 0 4085551245 S 7.00 4085551245 S 0 4085559021
2-51
File-AID - Browse - USERID9.FASAMP.EMPMAST ---------COMMAND ===> DIS ALL ----+----1----+----2----+----3----+----4----+----5----+ ********************************* TOP OF DATA ********* EMP-MARITAL-STATUS EMP-LOCAL-TAX-WITHOLD-PCT EMP-CON-HO 1/AN 3/PS 10/AN (86-86) (99-101) (189-198) 16---------------- 21----------------------- 34-------********************************* TOP OF DATA ********* M 5.00 4155556981 - - - - - - - - - - - - - - - - - - - - - - - - - - S 0 2125559021 S 15.00 4045559021
Steps:
1. Type DIS ALL in the COMMAND field. 2. Press <Enter>. File-AID redisplays all of the fields.
File-AID - Browse - USERID9.FASAMP.EMPMAST --------------- LINE 0000 COL 86 95 COMMAND ===> SCROLL ===> PAGE EMP-MARITAL-STATUS EMP-LIFE-INS-WITHOLD-AMT EMP-NATL-TAX-WITHOLD-PCT 1/AN 6/SNUM 3/PS (86-86) (87-92) (93-95) 16---------------- 18---------------------- 19---------------------********************************* TOP OF DATA **********************-CAPS OFF-* M -3000.00 -74.00 - - - - - - - - - - - - - - - - - - - - - - - - - - - 1 RECORD(S) NOT SELECTED S 0 55.00 S 0 INVALID S 5000.00 7.00 S 5000.00 65.00 S 0 49.00 S 5000.00 45.00 S 5000.00 INVALID
2-52
File-AID - Browse - USERID9.FASAMP.EMPMAST ---------COMMAND ===> END ----+----1----+----2----+----3----+----4----+----5----+ EMP-MARITAL-STATUS EMP-LIFE-INS-WITHOLD-AMT EMP-NATL-TA 1/AN 6/SNUM 3/PS (86-86) (87-92) (93-95) 16---------------- 18---------------------- 19--------********************************* TOP OF DATA ********* M -3000.00 - - - - - - - - - - - - - - - - - - - - - - - - - - S 0
Steps:
1. Type END in the COMMAND field. 2. Press <Enter>. File-AID displays the Browse - Dataset Specification screen (Figure 2-72 on page 2-53).
2-53
----------------------
Specify Browse Information: Dataset name or HFS path ===> FASAMP.EMPMAST' Member name ===> (Blank or pattern for member list) Volume serial ===> (If dataset is not cataloged) Specify Record Layout and XREF Information: Record layout usage ===> S (S = Single; X = XREF; N = None) Record layout dataset ===> FASAMP.LAYOUTS Member name ===> EMPLOYEE (Blank or pattern for member list) XREF dataset name ===> Member name ===> (Blank or pattern for member list) Specify Selection Criteria Information: Selection criteria usage ===> T Selection dataset name ===> Member name ===> (E = Existing; T = Temporary; M = Modify; Q = Quick; N = None) (Blank or pattern for member list)
Steps:
1. Type FILELIST in the COMMAND field (or blank out the Dataset name or HFS path field). 2. Press <Enter>. File-AID displays the Last Referenced File List screen as shown in Figure 2-73 on page 2-54.
2-54
File-AID ------------- Last Referenced File List ----------- Row 1 to 3 of 3 COMMAND ===> SCROLL ===> CSR S = Select for processing; M = Modify before processing I = Info; L = Lock; U = Unlock; D = Delete; P = HFS Pathname display File Name SETS RL SC LOCK REFERENCED 1 2001/01/13 I USERID0.FASAMP.EMPMAST USERID0.FASAMP.ORDRFILE 1 X 2001/01/03 USERID0.FASAMP.EMPLOYEE 2 1 2001/01/03 ******************************* Bottom of data ********************************
Steps:
1. Enter the I line command to the left of file name EMPMAST. 2. Press <Enter>. File-AID displays the Related File List screen (shown in Figure 2-74).
File-AID ------------------- Related File List ------------- Row 1 to 1 of 1 COMMAND ===> SCROLL ===> CSR S = Select for processing; M = Modify before processing L = Lock; U = Unlock; D = Delete; P = HFS Pathname display Referenced Date 2001/01/03 14:51 L USERID0.FASAMP.EMPMAST Volume Serial: I/O Exit: Layout: USERID0.FASAMP.LAYOUTS(EMPLOYEE) Xref: Selection: ******************************* Bottom of data ********************************
2-55
Steps:
1. Type the L line command in front of the list entry for the EMPMAST dataset. 2. Press <Enter>. File-AID redisplays the Browse - Dataset Specification screen (Figure 275) with the LOCKED status for EMPMAST.
File-AID ------------------- Related File List ------------- Row 1 to 1 of 1 SCROLL ===> CSR COMMAND ===> RETURN S = Select for processing; M = Modify before processing L = Lock; U = Unlock; D = Delete; P = HFS Pathname display Referenced Date USERID0.FASAMP.EMPMAST 2001/01/03 14:51 Volume Serial: I/O Exit: LOCKED Layout: USERID0.FASAMP.LAYOUTS(EMPLOYEE) Xref: Selection: ******************************* Bottom of data ********************************
Steps:
1. Type RETURN in the COMMAND field. 2. Press <Enter>. File-AID displays the File-AID Primary Option Menu. (Figure 1-2 on page 1-2).
2-56
3-1
C ha p 3
File-AID has a utility for managing VSAM datasets and IAM datasets. The features of this utility include: Allocating clusters (KSDS, ESDS, RRDS, and LINEAR) Allocating alternate indexes Building alternate indexes Deleting objects Renaming objects Displaying detailed information Modifying cluster attributes Generating IDCAMS control statements Redefining (Delete/Define) clusters Allocating and deleting dataspaces Allocating IAM datasets.
Steps:
1. From the File-AID Primary Option Menu (not shown here), select option 3.5. 2. Press <Enter>. File-AID displays the VSAM Utility screen as illustrated in Figure 3-1 on page 3-2.
3-2
VSAM Utility
--------------------------------D DR T P R M Delete Delete/Define Delete dataspace Allocate path Rename component Modify component
Allocate cluster Allocate dataspace Allocate alternate index Build alternate index Display dataset information
Specify Dataset Information: Dataset name ===> FASAMP.EMPMAST Volume serial ===> (Required for options S & T) Process Online or Batch ===> O (O = Online; B = Batch)
Specify Model Dataset Information: Dataset name ===> Specify Catalog to use if other than Default System Catalog: Catalog name ===> Catalog password ===> (If catalog is password protected) ------------------------------------------------------------------------------For dataset allocations only, the optional model dataset is used to prefill the allocation information on the allocation panel.
3-3
Allocating a Cluster
The Allocate cluster option (A) lets you allocate new VSAM clusters and IAM datasets online or in batch. All VSAM dataset types (KSDS, ESDS, RRDS, and LINEAR) are supported.
Figure 3-2. VSAM Utility Screen
File-AID --------------------- VSAM Utility OPTION ===> A A - Allocate cluster S - Allocate dataspace X - Allocate alternate index B - Build alternate index BLANK - Display dataset information
--------------------------------D DR T P R M Delete Delete/Define Delete dataspace Allocate path Rename component Modify component
Specify Dataset Information: Dataset name ===> FASAMP.EMPLOYE1 Volume serial ===> (Required for options S & T) Process Online or Batch ===> B (O = Online; B = Batch)
Specify Model Dataset Information: Dataset name ===> FASAMP.EMPLOYEE Specify Catalog to use if other than Default System Catalog: Catalog name ===> Catalog password ===> (If catalog is password protected) ------------------------------------------------------------------------------For dataset allocations only, the optional model dataset is used to prefill the allocation information on the allocation panel.
Steps:
1. Type an A in the OPTION field. 2. Type FASAMP.EMPLOYE1 in the Dataset name field under the Specify Dataset Information section. 3. Type a B in the Process Online or Batch field to request batch processing which generates IDCAMS control statements. 4. Type FASAMP.EMPLOYEE in the Dataset name field under the Specify Model Dataset Information section. 5. Press <Enter>. File-AID displays the Allocate New VSAM Cluster screen as illustrated in Figure 3-3 on page 3-4.
3-4
File-AID --------------COMMAND ===> Component names: Cluster: Data component ===> Index component ===> Dataset type ===> Owner ID ===>
--------------------------
USERID9.FASAMP.EMPLOYE1 USERID9.FASAMP.EMPLOYE1.DATA USERID9.FASAMP.EMPLOYE1.INDEX KSDS (KSDS; ESDS; RRDS; LINEAR) USERID9 KSDS INDEX Component (Blank for default) ===> (Generic group name or unit) ===> PRD902 ===> TRKS (TRKs; CYLs; RECs; K; M) ===> 1 (Amount in above units) ===> 1 (Amount in above units) (Y = Yes; N = No) (1 - 255 - Required for KSDS only) (0 - maximum record - KSDS only) (Not allowed for LINEAR) (Not allowed for LINEAR) (YYYY/MM/DD or blank) (U = Unique; S = Sub-allocate) (Y = Yes; N = No)
Space Allocation: DATA Component Generic unit ===> Volume serial ===> PRD928 Units ===> TRKS Primary ===> 1 Secondary ===> 1 Reuseable ===> YES Key length ===> 5 Key position ===> 0 Average Recordsize ===> 198 Maximum Recordsize ===> 198 Expiration date ===> Type ===> UNIQUE Extended allocate ===> YES
Steps:
1. Verify that the value in the "Extended allocate" field is YES. If it is not, type YES in the field. 2. Press <Enter>. Since you specified a value of YES in the Extended allocate field, FileAID displays an additional allocation attributes screen as shown in Figure 3-4 on page 3-5. Note: The value displayed in the Volume serial field will not be the same value shown in this example. The value you see is unique to your installation and is the same as the model dataset (FASAMP.EMPLOYEE).
3-5
Step:
1. Press <Enter>. File-AID displays the JCL Specification screen as illustrated in Figure 35 on page 3-6.
Figure 3-4. Allocate VSAM Cluster Screen (continued)
---------------------
Control Interval - percent free ===> 0 Control Area - percent free ===> 0 Specify Allocation options: Region share option System share option Write check Erase on delete Imbedded index Replicated index Load option Spanned records Specify Mass Storage Options: Stage option ===> STAGE Destage wait ===> NO ===> ===> ===> ===> ===> ===> ===> ===> 3 3 NO NO NO NO RECOV NO
Data C/I size ===> 2048 Index C/I size ===> 2048 Buffer space ===> 6144 (1; 2; 3; 4) (3; 4) (Y = Yes; N = (Y = Yes; N = (Y = Yes; N = (Y = Yes; N = (S = Speed; R (Y = Yes; N =
Specify Passwords: (Fill in or leave blank for no password protection) Master ===> Control ===> Update ===> Read ===> Code ===> Attempts ===> 0
If any errors occur, issue the HELP command (PF1) once to see a long message describing the error and twice to access the File-AID tutorial describing the return code. If errors occur during IDCAMS invocation, File-AID displays an IDCAMS error screen when you issue the VIEW command.
3-6
Steps:
1. Type JCL in the COMMAND field. 2. Type an asterisk (*) in the Sysout class field. 3. If necessary, change information in the JOB statement information fields to represent a valid JOB statement for you at your site: Your JOB statement information stays set from function to function and session to session until you change it on any JCL Specification screen in File-AID. 4. Press <Enter>. File-AID generates the JCL and displays it on the ISPF/EDIT screen as illustrated in Figure 3-6 on page 3-7.
Figure 3-5. JCL Specification Screen
JCL Specification
-------------------------------
JOB Statement Information: ===> //useridA JOB (ACCOUNT),your name, ===> // CLASS=x,MSGCLASS=x,NOTIFY=userid ===> ===>
Use JCL command to edit generated JCL Use SUBMIT command to submit batch job Use END to return to main panel without submitting job
3-7
Steps:
1. Type SUB in the COMMAND field. 2. Press <Enter>. File-AID submits the JCL for background execution and redisplays the ISPF/EDIT screen. A message at the bottom of the display indicates that File-AID has successfully submitted the job. 3. (optional) Use your sites job output display facilities to review the results of the VSAM allocation job.
Figure 3-6. VSAM Utility - EDIT Screen (SUBMIT Command)
EDIT ---- SYS94124.T141416.RA000.USERID9.R0043070 ------------ COLUMNS 001 072 SCROLL ===> CSR COMMAND ===> SUB ****** ***************************** TOP OF DATA ****************************** 000001 //USERID9A JOB (ACCOUNT),your name, 000002 // CLASS=A,MSGCLASS=A,NOTIFY=USERID9 000003 //* YOU ARE VIEWING JCL THAT FILE-AID HAS GENERATED TO PERFORM 000004 //* THE REQUIRED FUNCTION. YOU CAN CHANGE THIS JCL IF DESIRED AND USE 000005 //* THE SUBMIT PRIMARY COMMAND TO SUBMIT THE JOB. THE CREATE OR REPLACE 000006 //* PRIMARY COMMAND CAN BE USED TO KEEP THIS JOBSTREAM FOR FUTURE USE. 000007 //* USE THE END COMMAND TO EXIT THE FUNCTION WITHOUT SUBMITTING THE JOB 000008 //JS10 EXEC PGM=IDCAMS 000009 //SYSPRINT DD SYSOUT=* 000010 //SYSIN DD * 000011 DEFINE CLUSTER 000012 (NAME(USERID9.FASAMP.EMPLOYE1) 000013 BUFFERSPACE(6144) 000014 INDEXED 000015 KEYS(5 0) 000016 OWNER(USERID9) 000017 RECORDSIZE(198 198) 000018 REUSE 000019 SHAREOPTIONS(3 3) 000020 STAGE) 000021 DATA(NAME(USERID9.FASAMP.EMPLOYE1.DATA) -
Steps:
1. Enter the END command (press PF3) TWO OR THREE TIMES until the File-AID Primary Option Menu reappears.
3-8
4-1
C ha p 4
File-AID enables you to edit a file created through any standard MVS access method (including IAM files). You can edit the entire dataset or a selected subset of records. You can supply record layouts and edit your data in four display modes: Character Formatted Vertical formatted. Unformatted (not available for DBCS terminals).
This chapter discusses several of the primary commands and line commands that you can use in the Edit function. Refer to the File-AID/MVS Online Reference Manual (SPF and XE) for a complete list of the primary and line commands that are supported in the Edit function.
Character Mode
The character edit mode provides full-screen editing of the data. You can use line commands, similar to ISPF line commands, to move (M), copy (C), insert (I), delete (D), repeat (R), and exclude (X) records. From character mode, you can use the FMT primary command to redisplay the data in formatted mode, the VFMT primary command to redisplay the data in Vertical Formatted mode, or UNFMT primary command to redisplay the data in Unformatted mode.
Formatted Mode
The formatted edit mode lets you edit data using a record layout. This mode presents data one record at a time and formats each record field-by-field. Record layouts can be either COBOL (FD: 01 level) or PL/I (Declare). Cross references (XREFs) are used to define multiple record layouts for datasets with varying record types. From formatted mode, you can use the CHAR primary command to redisplay the data in character mode , the VFMT primary command to redisplay the data in Vertical Formatted mode, or UNFMT primary command to redisplay the data in Unformatted mode
Unformatted Mode
The unformatted browse mode provides a full-screen display of your data one record at a time without record layout formatting. File-AID displays 70 characters of data per line until all data for the record is shown or the screen is filled. Unformatted mode is accessed by selecting Browse or Edit mode U (Unformatted) or entering the UNFMT primary command from Character, Formatted, or Vertical Formatted mode of Browse or Edit. From Unformatted mode, use the CHAR primary command to redisplay the data in Character mode, the FMT primary command to redisplay the data in Formatted mode, or VFMT primary command to redisplay the data in Vertical Formatted mode. Note: Unformatted mode is not available for DBCS terminals.
4-2
-----------------------
Specify Edit Information: Dataset name or HFS path Member name Volume serial Disposition Create audit trail
===> FASAMP.EMPLOYE1 ===> (Blank or pattern for member list) ===> (If dataset is not cataloged) (SHR or OLD) ===> OLD (Y = Yes; N = No) ===> Y
Specify Record Layout and XREF Information: (S = Single; X = XREF; N = None) Record layout usage ===> S Record layout dataset ===> FASAMP.LAYOUTS Member name ===> EMPLOYEE (Blank or pattern for member list) XREF dataset name ===> Member name ===> (Blank or pattern for member list) Specify Selection Criteria Information: Selection criteria usage ===> N Selection criteria DSN ===> Member ===> (E = Existing; T = Temporary; M = Modify; Q = Quick; N = None) (Blank or pattern for member list)
Steps:
1. Type a C in the Edit Mode field. 2. Type FASAMP.EMPLOYE1 in the Edit dataset name field. Note: If you did not create the new cluster FASAMP.EMPLOYE1 in Chapter 3, Allocating a VSAM Cluster, use the dataset FASAMP.EMPLOYEE.
3. Type OLD in the Disposition field. The value of OLD prevents other users from accessing the dataset while you are editing it. 4. Type a Y in the Create audit trail field. File-AID lets you specify whether or not you want to create an audit trail dataset, which stores the before and after images of any changed, new, and deleted records.
Full-Screen Editing
4-3
File-AID provides the opportunity for you to print the audit trail report at the end of the Edit session. For information on audit trail dataset allocation, naming conventions, and how to print the dataset, refer to File-AID/MVS Online Reference Manual (SPF and XE). 5. Type an S in the Record layout usage field. The S value tells File-AID to use a single record layout dataset to describe the edit dataset. 6. Type FASAMP.LAYOUTS in the Record layout dataset field and EMPLOYEE in the Member name field. 7. Type an N in the Selection criteria usage field. 8. Press <Enter>. If you specified your new cluster, USERID9.FASAMP.EMPLOYE1, FileAID displays the Edit screen as shown in Figure 4-2 on page 4-4. Note: If you did not create a new VSAM cluster, and specified dataset FASAMP.EMPLOYEE, skip the next few pages and resume with Invoking Formatted Mode on page 4-8.
4-4
Steps:
1. Type COPY in the COMMAND field. 2. Press <Enter>. File-AID displays the Edit COPY screen as shown in Figure 4-3 on page 4-5.
Figure 4-2. Character Edit - COPY Command
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 ----------------- COLUMNS 00001 00071 SCROLL ===> PAGE COMMAND ===> COPY ****** ***************************** TOP OF DATA ******************************
Full-Screen Editing
4-5
Current dataset: USERID9.FASAMP.EMPLOYE1 Enter "FROM" dataset: Dataset name ===> FASAMP.EMPLOYEE Member ===> (Blank/pattern for member list) Volume serial ===> (If not cataloged)
Steps:
1. Type FASAMP.EMPLOYEE in the Dataset name field. 2. Press <Enter>. File-AID executes the copy process, reads the records of your FASAMP.EMPLOYEE file into your current edit session, and displays the Edit screen as illustrated in Figure 4-4.
Result of COPY
Figure 4-4. Character Mode Edit - After COPY of FASAMP.EMPLOYEE
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 --------------------- DATASET COPIED COMMAND ===> SCROLL ===> PAGE ****** ***************************** TOP OF DATA ****************************** ==NEW> 00090 MARTIN EDWARD M AIRPLANE MANUFACTURER 42789012 ==NEW> 00100 MULSTROM ROBERTA A HOLLYWOOD SEAMSTRESS 34657365 ==NEW> 00200 JACKSON JOSEPH C ORATOR 27558717 ==NEW> 10000 ANDREWS GEORGE ACTOR 57631203 ==NEW> 15000 MURPHY RONALD L PAINTER 98765432 ==NEW> 18034 SCHNEIDER ELLEN C NURSE 34155954 ==NEW> 21035 JONES GEORGE B COUNTRY SINGER 46381345 ==NEW> 25100 ROBERTS WILLIAM R POLITICIAN 87956332 ==NEW> 27007 ALLEN JOYCE M AUTHOR 78345833 ==NEW> 30001 RICHARDS REX W RODEO CLOWN 63276453 ==NEW> 31000 SAVAGE JONATHON C ELECTRICIAN 34856799
4-6
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 --------------------- DATASET COPIED SCROLL ===> PAGE COMMAND ===> RESET ****** ***************************** TOP OF DATA ****************************** ==NEW> 00090 MARTIN EDWARD M AIRPLANE MANUFACTURER 42789012 ==NEW> 00100 MULSTROM ROBERTA A HOLLYWOOD SEAMSTRESS 34657365
Steps:
1. Type RESET in the COMMAND field. 2. Press <Enter>. File-AID redisplays the Edit screen with the sequence number field column replacing the NEW flags as shown in Figure 4-6.
RESET result
Figure 4-6. After RESET Command - ==NEW> Markers Removed
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 ----------------- COLUMNS 00001 00071 COMMAND ===> SCROLL ===> PAGE ****** ***************************** TOP OF DATA ****************************** 000001 00090 MARTIN EDWARD M AIRPLANE MANUFACTURER 42789012 000002 00100 MULSTROM ROBERTA A HOLLYWOOD SEAMSTRESS 34657365 000003 00200 JACKSON JOSEPH C ORATOR 27558717 000004 10000 ANDREWS GEORGE ACTOR 57631203 000005 15000 MURPHY RONALD L PAINTER 98765432 000006 18034 SCHNEIDER ELLEN C NURSE 34155954 000007 21035 JONES GEORGE B COUNTRY SINGER 46381345 000008 25100 ROBERTS WILLIAM R POLITICIAN 87956332 000009 27007 ALLEN JOYCE M AUTHOR 78345833 000010 30001 RICHARDS REX W RODEO CLOWN 63276453 000011 31000 SAVAGE JONATHON C ELECTRICIAN 34856799 000012 34010 SMITH JANET AIRLINE ATTENDANT 55778298 000013 34011 JACOBS DIANA DOCTOR 22536839 000014 36010 SIMPSON ALEX CARTOONIST 12345678 000015 39310 BARNETT EDWARD E SALESMAN 54378914 000016 39500 WILLIAMS EDITH A DESIGNER 98765432 000017 41000 RICHARDSON MARJORIE M PROGRAMMER ANALYST 34658365 000018 41400 MOORE THOMAS M SYSTEMS ADMINISTRATOR 22637364 000019 42017 BENNETT WILLIAM D SALES SUPPORT 14657355 000020 44018 WILHELM HEINRICH L DIPLOMAT 46657335
Full-Screen Editing
4-7
Protecting Keys
Since this is a keyed file, all newly inserted records have the key field unprotected to let you enter a new key value. Once you have set new key values, you can use the P (Protect) line command to lock the key fields. The P (Protect) line command sets key protection on for keyed records preventing the inadvertant overtyping of key values. To protect all the new keys, use the P99 (Protect 99 lines) line command.
Figure 4-7. Protect New Keys - P99 Line Command
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 ------------COMMAND ===> ****** ***************************** TOP OF DATA ****** EDWARD M AIRPLANE MANUF P99 01 00090 MARTIN 000002 00100 MULSTROM ROBERTA A HOLLYWOOD SEAM 000003 00200 JACKSON JOSEPH C ORATOR
Steps:
1. Type P99 in the line command area for line 1. 2. Press <Enter>. File-AID redisplays the Edit screen with keys protected.
P99 result
After the P99 line command you can see that the keys (first five characters of each record) are highlighted and protected.
Figure 4-8. After P99 Line Command - Keys are Highlighted and Protected
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 ----------------- COLUMNS 00001 00071 COMMAND ===> SCROLL ===> PAGE ****** ***************************** TOP OF DATA ****************************** 000001 00090 MARTIN EDWARD M AIRPLANE MANUFACTURER 42789012 000002 00100 MULSTROM ROBERTA A HOLLYWOOD SEAMSTRESS 34657365 000003 00200 JACKSON JOSEPH C ORATOR 27558717 000004 10000 ANDREWS GEORGE ACTOR 57631203 000005 15000 MURPHY RONALD L PAINTER 98765432 000006 18034 SCHNEIDER ELLEN C NURSE 34155954 000007 21035 JONES GEORGE B COUNTRY SINGER 46381345 000008 25100 ROBERTS WILLIAM R POLITICIAN 87956332 000009 27007 ALLEN JOYCE M AUTHOR 78345833 000010 30001 RICHARDS REX W RODEO CLOWN 63276453 000011 31000 SAVAGE JONATHON C ELECTRICIAN 34856799 000012 34010 SMITH JANET AIRLINE ATTENDANT 55778298 000013 34011 JACOBS DIANA DOCTOR 22536839 000014 36010 SIMPSON ALEX CARTOONIST 12345678 000015 39310 BARNETT EDWARD E SALESMAN 54378914 000016 39500 WILLIAMS EDITH A DESIGNER 98765432 000017 41000 RICHARDSON MARJORIE M PROGRAMMER ANALYST 34658365 000018 41400 MOORE THOMAS M SYSTEMS ADMINISTRATOR 22637364 000019 42017 BENNETT WILLIAM D SALES SUPPORT 14657355 000020 44018 WILHELM HEINRICH L DIPLOMAT 46657335
4-8
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 ------------COMMAND ===> ****** ***************************** TOP OF DATA ****** EDWARD M AIRPLANE MANUF FMT 01 00090 MARTIN 000002 00100 MULSTROM ROBERTA A HOLLYWOOD SEAM 000003 00200 JACKSON JOSEPH C ORATOR
Steps:
1. Type FMT in line 1. 2. Press <Enter>. File-AID redisplays the record in the formatted display mode as illustrated in Figure 4-10.
Figure 4-10. Edit - Formatted Display Mode - Overtype Values to Change Data
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 ----------------- COLUMNS 00001 00101 COMMAND ===> SCROLL ===> PAGE RECORD: 1 EMPLOYEE-MASTER-FILE LENGTH: 198 ---- FIELD NUMBER/NAME ------ -FORMAT- ----+----1----+----2----+----3----+----4 1 EMP-NUMBER 5/AN 00090 2 EMP-LAST-NAME 15/AN MARTIN 3 EMP-FIRST-NAME 10/AN EDWARD 4 EMP-MID-INIT 1/AN M 5 FILLER 2/AN 6 EMP-TITLE 30/AN AIRPLANE MANUFACTURER 7 EMP-PERSONAL-INFO SYNC 23/GRP 8 EMP-NATL-ID-NUMBER 9/NUM 427890125 9 FILLER 1/AN 10 EMP-DATE-OF-BIRTH 6/AN 101954 11 EMP-DOB-REDEF REDEFINES EMP-DATE-OF-BIRTH 11 EMP-DOB-REDEF SYNC 6/GRP 12 EMP-DOB-MM 2/NUM 10 13 EMP-DOB-DD 2/NUM 19 14 EMP-DOB-YY 2/NUM 54 15 EMP-HIRE-DATE 6/AN 920101 16 EMP-MARITAL-STATUS 1/AN M 17 EMP-WITHOLD-INFO SYNC 15/GRP 18 EMP-LIFE-INS-WITHOLD-AMT DISPLAY 30000} 6/SNUM -3000.00
Full-Screen Editing
4-9
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 ------------COMMAND ===> REDEF OFF RECORD: 1 EMPLOYEE-MASTER-FILE ---- FIELD NUMBER/NAME ------ -FORMAT- ----+----1----+1 EMP-NUMBER 5/AN 00090 2 EMP-LAST-NAME 15/AN MARTIN
Steps:
1. Type REDEF OFF in the COMMAND field. 2. Press <Enter>. File-AID redisplays the screen and suppresses the display of the EMPDOB-REDEF group and elementary subordinate items as illustrated in Figure 4-17.
Figure 4-12. Edit - Formatted Mode - After REDEF OFF Command
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 ----------------- COLUMNS 00001 00101 COMMAND ===> SCROLL ===> PAGE RECORD: 1 EMPLOYEE-MASTER-FILE LENGTH: 198 ---- FIELD NUMBER/NAME ------ -FORMAT- ----+----1----+----2----+----3----+----4 1 EMP-NUMBER 5/AN 00090 2 EMP-LAST-NAME 15/AN MARTIN 3 EMP-FIRST-NAME 10/AN EDWARD 4 EMP-MID-INIT 1/AN M 5 FILLER 2/AN 6 EMP-TITLE 30/AN AIRPLANE MANUFACTURER 7 EMP-PERSONAL-INFO SYNC 23/GRP 8 EMP-NATL-ID-NUMBER 9/NUM 427890125 9 FILLER 1/AN 10 EMP-DATE-OF-BIRTH 6/AN 101954 15 EMP-HIRE-DATE 6/AN 920101 16 EMP-MARITAL-STATUS 1/AN M 17 EMP-WITHOLD-INFO SYNC 15/GRP 18 EMP-LIFE-INS-WITHOLD-AMT DISPLAY 30000} 6/SNUM -3000.00 19 EMP-NATL-TAX-WITHOLD-PCT 3/PS -74.00 20 EMP-REGION-TAX-WITHOLD-PCT 3/PS 25.00 21 EMP-LOCAL-TAX-WITHOLD-PCT 3/PS 5.00
4-10
command displays the hidden structure while hiding the currently displayed definition of the data area. For example (see Figure 4-10 on page 4-8 for reference), DISPLAY REDEF 11, redisplays the hidden redefines structure EMP-DOB-REDEF and suppresses the display of the redefined field EMP-DATE-OF-BIRTH.
Full-Screen Editing
4-11
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 ------------COMMAND ===> HOLD RECORD: 1 EMPLOYEE-MASTER-FILE ---- FIELD NUMBER/NAME ------ -FORMAT- ----+----1----+1 EMP-NUMBER 5/AN 00090 2 EMP-LAST-NAME 15/AN MARTIN
Steps:
1. Type HOLD in the COMMAND field. 2. Press <Enter>. File-AID displays the HIDE and HOLD Settings window as illustrated in Figure 4-14.
Figure 4-14. HIDE and HOLD Settings window
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 --------------- COLUMNS 000001 000098 C +------------- HIDE and HOLD Settings -------------+ SCROLL ===> CSR R | Row 1 to 9 of 34 | LENGTH: 198 - | Command ===> Scroll ===> CSR | ---2----+----3----+----4 * | | ************************ 1 | Line Commands: H - HOLD, X - HIDE, R - RESET | 2 | | 3 | NUM FIELD NAME STATUS | 4 | ---- -------------------------------- ------ | 5 | _ 1 EMP-NUMBER | EMP-LAST-NAME | TURER 6 | H 2 7 | _ 3 EMP-FIRST-NAME | | _ 4 EMP-MID-INIT | | _ 5 FILLER | | _ 6 EMP-TITLE | EMP-PERSONAL-INFO | | X 7 EMP-NATL-ID-NUMBER | | X 8 FILLER | 1 | X 9 +--------------------------------------------------+ 6/SNUM -3000.00 19 EMP-NATL-TAX-WITHOLD-PCT 3/PS -74.00 20 EMP-REGION-TAX-WITHOLD-PCT 3/PS 25.00 Enter CHAR (character mode), VFMT (vertical format), UNFMT (unformatted)
Steps:
1. Type H in front of field EMP-LAST-NAME. 2. Type X in front of fields EMP-PERSONAL-INFO, EMP-NATL-ID-NUMBER, and FILLER. 3. Press <Enter>. File-AID redisplays the window with the updated STATUS as illustrated in Figure 4-15 on page 4-12. Notice that the list has been reordered with the held field EMP-LAST-NAME on top.
4-12
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 --------------- COLUMNS 000001 000098 C +------------- HIDE and HOLD Settings -------------+ SCROLL ===> CSR R | Row 1 to 9 of 34 | LENGTH: 198 Scroll ===> CSR | ---2----+----3----+----4 - | Command ===> END * | | ************************ 1 | Line Commands: H - HOLD, X - HIDE, R - RESET | 2 | | 3 | NUM FIELD NAME STATUS | 4 | ---- -------------------------------- ------ | 5 | _ 2 EMP-LAST-NAME HOLD | 6 | _ 1 EMP-NUMBER | TURER 7 | _ 3 EMP-FIRST-NAME | | _ 4 EMP-MID-INIT | | _ 5 FILLER | | _ 6 EMP-TITLE | | _ 7 EMP-PERSONAL-INFO HIDE | | _ 8 EMP-NATL-ID-NUMBER HIDE | 1 | _ 9 FILLER HIDE | +--------------------------------------------------+
Steps:
1. Type END in the COMMAND field. 2. Press <Enter>. File-AID redisplays the Edit screen as illustrated in Figure 4-16. Notice that the list has been reordered with the held field on top.
Figure 4-16. Edit - Formatted Mode - After HIDE and HOLD
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 ----------------- COLUMNS 00001 00101 COMMAND ===> SCROLL ===> PAGE RECORD: 1 EMPLOYEE-MASTER-FILE LENGTH: 198 ---- FIELD NUMBER/NAME ------ -FORMAT- ----+----1----+----2----+----3----+----4 2 EMP-LAST-NAME 15/AN MARTIN 1 EMP-NUMBER 5/AN 00090 3 EMP-FIRST-NAME 10/AN EDWARD 4 EMP-MID-INIT 1/AN M 5 FILLER 2/AN 6 EMP-TITLE 30/AN AIRPLANE MANUFACTURER 10 EMP-DATE-OF-BIRTH 6/AN 101954 15 EMP-HIRE-DATE 6/AN 920101 16 EMP-MARITAL-STATUS 1/AN M 17 EMP-WITHOLD-INFO SYNC 15/GRP 18 EMP-LIFE-INS-WITHOLD-AMT DISPLAY 30000} 6/SNUM -3000.00 19 EMP-NATL-TAX-WITHOLD-PCT 3/PS -74.00 20 EMP-REGION-TAX-WITHOLD-PCT 3/PS 25.00 21 EMP-LOCAL-TAX-WITHOLD-PCT 3/PS 5.00 22 EMP-HOME-ADDRESS SYNC 50/GRP 23 EMP-STREET-ADDRESS 25/AN 859 O'FARREL ST. 24 FILLER 1/AN
Full-Screen Editing
4-13
Figure 4-17. Search for INVALID data in field 19 - FIND INVALID /19
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 ------------COMMAND ===> FIND INVALID /19 RECORD: 1 EMPLOYEE-MASTER-FILE ---- FIELD NUMBER/NAME ------ -FORMAT- ----+----1----+2 EMP-LAST-NAME 15/AN MARTIN 1 EMP-NUMBER 5/AN 00090
Steps:
1. Type FIND INVALID /19 in the COMMAND field. 2. Press <Enter>. File-AID finds invalid data in field 19 (EMP-NATL-TAX-WITHOLDPCT) of record number 4. The layout is scrolled to show field 19s data at the top of the display.
4-14
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 -------------------- X'404040' FOUND COMMAND ===> SCROLL ===> PAGE RECORD: 4 EMPLOYEE-MASTER-FILE LENGTH: 198 ---- FIELD NUMBER/NAME ------ -FORMAT- ----+----1----+----2----+----3----+----4 2 EMP-LAST-NAME 15/AN ANDREWS 19 EMP-NATL-TAX-WITHOLD-PCT 3/PS X'404040' 20 EMP-REGION-TAX-WITHOLD-PCT 3/PS 25.00 21 EMP-LOCAL-TAX-WITHOLD-PCT 3/PS 15.00 22 EMP-HOME-ADDRESS SYNC 50/GRP
Full-Screen Editing
4-15
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 ------------COMMAND ===> RESET HIDE HOLD RECORD: 1 EMPLOYEE-MASTER-FILE 2 EMP-LAST-NAME 15/AN ANDREWS 19 EMP-NATL-TAX-WITHOLD-PCT 3/PS X'404040'
Steps:
1. Type RESET HIDE HOLD in the COMMAND field. 2. Press <Enter>. File-AID redisplays the Edit screen as illustrated in Figure 4-20. Notice that the previously held field is no longer on the current screen display. The top field is the field with the invalid data, the result of the FIND command.
Figure 4-20. Edit - Formatted Mode - After RESET HIDE HOLD
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 ---------------- INVALID PACKED SIGN COMMAND ===> SCROLL ===> CSR RECORD: 4 EMPLOYEE-MASTER-FILE LENGTH: 198 ---- FIELD NUMBER/NAME ------ -FORMAT- ----+----1----+----2----+----3----+----4 19 EMP-NATL-TAX-WITHOLD-PCT 3/PS X'404040' 20 EMP-REGION-TAX-WITHOLD-PCT 3/PS 25.00 21 EMP-LOCAL-TAX-WITHOLD-PCT 3/PS 15.00 22 EMP-HOME-ADDRESS SYNC 50/GRP 23 EMP-STREET-ADDRESS 25/AN 375 MERRIVALE W. SQ. 24 FILLER 1/AN 25 EMP-CITY 15/AN SUNNYVALE 26 EMP-STATE-PROV-CNTY SYNC 4/GRP 27 EMP-STATE 2/AN CA 28 FILLER 2/AN 29 EMP-POSTAL-CODE 5/NUM 94134 30 EMP-EMERGENCY-CONTACT SYNC 47/GRP 31 EMP-CONTACT-NAME 25/AN DICK 32 FILLER 2/AN 33 EMP-CON-WORK-PHONE 10/AN 4045552010 34 EMP-CON-HOME-PHONE 10/AN 4045559021 ****************************** BOTTOM OF DATA ********************************* Enter CHAR (character mode), VFMT (vertical format), UNFMT (unformatted)
4-16
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 ------------COMMAND ===> FPRINT RECORD: 4 EMPLOYEE-MASTER-FILE ---- FIELD NUMBER/NAME ------ -FORMAT- ----+----1----+19 EMP-NATL-TAX-WITHOLD-PCT 3/PS X404040 20 EMP-REGION-TAX-WITHOLD-PCT 3/PS 25.00
Steps:
1. Type FPRINT in the COMMAND field. 2. Press <Enter>. File-AID displays the Print Parameters screen illustrated in Figure 4-22.
Figure 4-22. Print Parameters Screen
Print Parameters
-------------------------------
Enter One of the Following Optional Destinations: Destination printer - - - OR - - External JES Node ID Target VM/TSO ident - - - OR - - Sysout writer name - - - OR - - Print dataset name Disposition Volume serial ===> ===> ===> ===> ===> ===> ===> (Local or remote printer) (Predefined JES Node and symbolic ID of intended receiver of output) (Installation assigned output writer) (DSORG=PS, RECFM=V, LRECL=125) (NEW, SHR, MOD, OLD)
Full-Screen Editing
4-17
Figure 4-23. Print Parameters Screen - Put FPRINT Report in NEW Dataset
Print Parameters
-------------------------------
Enter One of the Following Optional Destinations: Destination printer - - - OR - - External JES Node ID Target VM/TSO ident - - - OR - - Sysout writer name - - - OR - - Print dataset name Disposition Volume serial ===> ===> ===> ===> (Local or remote printer) (Predefined JES Node and symbolic ID of intended receiver of output) (Installation assigned output writer)
(DSORG=PS, RECFM=V, LRECL=125) ===> FASAMP.PRINT ===> NEW (NEW, SHR, MOD, OLD) ===>
Steps:
1. Type FASAMP.PRINT in the Print dataset name field. 2. Type NEW in the Disposition field. Since the dataset FASAMP.PRINT does not currently exist, you must specify the disposition of the dataset as NEW. 3. Press <Enter>. Since you are creating a new print file (Disposition equals NEW), FileAID displays the Print Dataset Attributes Specification screen where you must enter additional print attributes as illustrated in Figure 4-24 on page 4-18.
4-18
----------------
Print Dataset Allocation Information: Generic unit ===> Space units ===> TRKS Primary quantity ===> 1 Secondary quantity ===> 1
Steps:
1. Accept the default space allocation values or specify your own values. 2. Press <Enter>. File-AID processes your print request, writing the output to the dataset FASAMP.PRINT. You can then browse the file or copy it to a printer at a later time.
Full-Screen Editing
4-19
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 ---------------- 1 RECORD(S) PRINTED SCROLL ===> PAGE COMMAND ===> CHANGE RECORD: 4 EMPLOYEE-MASTER-FILE LENGTH: 198 ---- FIELD NUMBER/NAME ------ -FORMAT- ----+----1----+----2----+----3----+----4 19 EMP-NATL-TAX-WITHOLD-PCT 3/PS X404040 20 EMP-REGION-TAX-WITHOLD-PCT 3/PS 25.00
Steps:
1. Type CHANGE in the COMMAND field. 2. Press <Enter>. File-AID displays the CHANGE Command screen as shown in Figure 426 on page 4-19.
Figure 4-26. CHANGE Command Prompt Screen
File-AID ----------------COMMAND ===> Specify CHANGE operands: Operator ===> From string ===> To string ===> Modifier ===> NEXT Lines to search ===>
(EQ, NE, LT, GT, LE, GE) (NEXT, ALL, FIRST, LAST, PREV) (NX = Nonexcluded; X = Excluded; Blank = all)
Specify the Following Fields to Limit the Range of Search for this CHANGE: Field name ===> or Field number ===> or Start column ===> End column ===> (Column number(s)) Start range ===> End range ===> (Label or line number) NOTE: You may bypass this screen CHANGE string string2 CHG (op) string C VALID INVALID ANY or * by entering the CHANGE command with operands: (NEXT) (NX) (col-1 (col-2)) (range) (ALL) (X) (/field name) (FIRST) (/field number) (LAST) (PREV)
4-20
Specify CHANGE operands: Operator ===> From string ===> INVALID To string ===> 0 Modifier ===> ALL Lines to search ===>
(EQ, NE, LT, GT, LE, GE) (NEXT, ALL, FIRST, LAST, PREV) (NX = Nonexcluded; X = Excluded; Blank = all)
Specify the Following Fields to Limit the Range of Search for this CHANGE: Field name ===> EMP-NATL-TAX-WITHOLD-PCT or Field number ===> or Start column ===> End column ===> (Column number(s)) Start range ===> End range ===> (Label or line number) NOTE: You may bypass this screen CHANGE string string2 CHG (op) string C VALID INVALID ANY or * by entering the CHANGE command with operands: (NEXT) (NX) (col-1 (col-2)) (range) (ALL) (X) (/field name) (FIRST) (/field number) (LAST) (PREV)
Steps:
1. Type INVALID in the "From string" field. Using the INVALID keyword in the "From string" field tells File-AID to search the specified field for data that does not match its field declaration in the record layout. 2. Type a 0 (zero) in the "To string" field. The value you enter in the "To string" field is the value that you want File-AID to substitute for the "From String" value. In this case, for any value that File-AID finds to be invalid. 3. Type ALL in the Modifier field. The ALL modifier tells File-AID to search all records for the condition you specified. 4. Type EMP-NATL-TAX-WITHOLD-PCT in the "Field name" field. This value tells File-AID which field in the layout to search for invalid values. 5. Press <Enter>. File-AID applies the CHANGE command as illustrated in Figure 4-28.
CHANGE Result
After the CHANGE, File-AID displays record number 4 on the Edit screen with EMP-NATL-TAX-WITHOLD-PCT positioned at the top of the display and a value of 0 (zero) has replaced the invalid value. The cursor is placed on the new 0. The message, EQ INVALID CHANGED, appears in the top right-hand corner of the display. Press PF1 (HELP) for details regarding the number of times File-AID applied the change you specified.
Full-Screen Editing
4-21
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 ----------------- EQ INVALID CHANGED COMMAND ===> SCROLL ===> PAGE RECORD: 4 EMPLOYEE-MASTER-FILE LENGTH: 198 ---- FIELD NUMBER/NAME ------ -FORMAT- ----+----1----+----2----+----3----+----4 19 EMP-NATL-TAX-WITHOLD-PCT 3/PS 0 20 EMP-REGION-TAX-WITHOLD-PCT 3/PS 25.00 21 EMP-LOCAL-TAX-WITHOLD-PCT 3/PS 15.00 22 EMP-HOME-ADDRESS SYNC 50/GRP
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 ------------COMMAND ===> UP RECORD: 4 EMPLOYEE-MASTER-FILE ---- FIELD NUMBER/NAME ------ -FORMAT- ----+----1----+19 EMP-NATL-TAX-WITHOLD-PCT 3/PS 0 20 EMP-REGION-TAX-WITHOLD-PCT 3/PS 25.00
Steps:
1. Type UP in the COMMAND field. 2. Press <Enter>. Since you did not specify a specific number of lines to scroll, File-AID repositions the cursor based on the value specified in the SCROLL field located in the upper right corner of the display. File-AID redisplays record number 4 with the first field of the record located at the top of the screen as shown in Figure 4-30.
4-22
Scroll UP Result
In this example, the EMP-NUMBER field name is highlighted to distinguish it as the key field of the record, and therefore, a protected field. The key field data (number 10000 in this example) is protected and may not be changed, protected data is not highlighted. The remainder of the data items are highlighted to distinguish them as unprotected fields which you may change.
Figure 4-30. Formatted Mode - After UP (PAGE) Scroll Command
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 ----------------- COLUMNS 00001 00101 COMMAND ===> SCROLL ===> PAGE RECORD: 4 EMPLOYEE-MASTER-FILE LENGTH: 198 ---- FIELD NUMBER/NAME ------ -FORMAT- ----+----1----+----2----+----3----+----4 ******************************** TOP OF DATA ********************************** 1 EMP-NUMBER 5/AN 10000 2 EMP-LAST-NAME 15/AN ANDREWS 3 EMP-FIRST-NAME 10/AN GEORGE 4 EMP-MID-INIT 1/AN 5 FILLER 2/AN 6 EMP-TITLE 30/AN ACTOR 7 EMP-PERSONAL-INFO SYNC 23/GRP 8 EMP-NATL-ID-NUMBER 9/NUM 576312032 9 FILLER 1/AN 10 EMP-DATE-OF-BIRTH 6/AN 042248 15 EMP-HIRE-DATE 6/AN 920131 16 EMP-MARITAL-STATUS 1/AN S 17 EMP-WITHOLD-INFO SYNC 15/GRP 18 EMP-LIFE-INS-WITHOLD-AMT DISPLAY 00000{ 6/SNUM 0 19 EMP-NATL-TAX-WITHOLD-PCT 3/PS 0 20 EMP-REGION-TAX-WITHOLD-PCT 3/PS 25.00
Full-Screen Editing
4-23
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 ------------COMMAND ===> REPEAT RECORD: 4 EMPLOYEE-MASTER-FILE ---- FIELD NUMBER/NAME ------ -FORMAT- ----+----1----+1 EMP-NUMBER 5/AN 10000 2 EMP-LAST-NAME 15/AN ANDREWS 3 EMP-FIRST-NAME 10/AN GEORGE
Steps:
1. Type REPEAT in the COMMAND field. 2. Press <Enter>. File-AID copies record number 4, inserts the new record (number 5) immediately following the currently displayed record. File-AID redisplays the screen with the message RECORD REPEATED displayed in the top right corner as shown in Figure 4-32.
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 -------------------- RECORD REPEATED COMMAND ===> SCROLL ===> PAGE RECORD: 4 EMPLOYEE-MASTER-FILE LENGTH: 198 ---- FIELD NUMBER/NAME ------ -FORMAT- ----+----1----+----2----+----3----+----4 ******************************** TOP OF DATA ********************************** 1 EMP-NUMBER 5/AN 10000 2 EMP-LAST-NAME 15/AN ANDREWS 3 EMP-FIRST-NAME 10/AN GEORGE 4 EMP-MID-INIT 1/AN 5 FILLER 2/AN 6 EMP-TITLE 30/AN ACTOR 7 EMP-PERSONAL-INFO SYNC 23/GRP 8 EMP-NATL-ID-NUMBER 9/NUM 576312032 9 FILLER 1/AN 10 EMP-DATE-OF-BIRTH 6/AN 042248 15 EMP-HIRE-DATE 6/AN 920131 16 EMP-MARITAL-STATUS 1/AN S 17 EMP-WITHOLD-INFO SYNC 15/GRP 18 EMP-LIFE-INS-WITHOLD-AMT DISPLAY 00000{ 6/SNUM 0 19 EMP-NATL-TAX-WITHOLD-PCT 3/PS 0 20 EMP-REGION-TAX-WITHOLD-PCT 3/PS 25.00
4-24
You can use the INSERT primary command to create a new formatted data record. If you use the FORWARD (FWD, RIGHT) command from a record you create with the INSERT command, File-AID adds the edited record to the dataset and creates a new initialized input record. This is called INPUT mode. You must enter values in one or more fields of an INPUT record in order for the record to be added. INPUT mode ends when you issue any other command except scroll FWD. Key fields of inserted and repeated records are unprotected so that you can enter values for the key of the new record.
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 ------------COMMAND ===> FWD RECORD: 4 EMPLOYEE-MASTER-FILE ---- FIELD NUMBER/NAME ------ -FORMAT- ----+----1----+1 EMP-NUMBER 5/AN 10000 2 EMP-LAST-NAME 15/AN ANDREWS 3 EMP-FIRST-NAME 10/AN GEORGE
Steps:
1. Type FWD in the COMMAND field. 2. Press <Enter>. File-AID scrolls to record number 5 as shown in Figure 4-34.
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 ----------------- COLUMNS 00001 00101 COMMAND ===> SCROLL ===> PAGE RECORD: 5 EMPLOYEE-MASTER-FILE LENGTH: 198 ---- FIELD NUMBER/NAME ------ -FORMAT- ----+----1----+----2----+----3----+----4 ******************************** TOP OF DATA ********************************** 1 EMP-NUMBER 5/AN 10000 2 EMP-LAST-NAME 15/AN ANDREWS 3 EMP-FIRST-NAME 10/AN GEORGE 4 EMP-MID-INIT 1/AN 5 FILLER 2/AN 6 EMP-TITLE 30/AN ACTOR 7 EMP-PERSONAL-INFO SYNC 23/GRP 8 EMP-NATL-ID-NUMBER 9/NUM 576312032 9 FILLER 1/AN 10 EMP-DATE-OF-BIRTH 6/AN 042248 15 EMP-HIRE-DATE 6/AN 920131 16 EMP-MARITAL-STATUS 1/AN S 17 EMP-WITHOLD-INFO SYNC 15/GRP 18 EMP-LIFE-INS-WITHOLD-AMT DISPLAY 00000{ 6/SNUM 0 19 EMP-NATL-TAX-WITHOLD-PCT 3/PS 0 20 EMP-REGION-TAX-WITHOLD-PCT 3/PS 25.00 21 EMP-LOCAL-TAX-WITHOLD-PCT
Full-Screen Editing
4-25
Steps:
1. Since record number 4 was copied, record number 5 contains the same values. Type over the existing values with new data exactly as shown above in Figure 4-35. 2. Press <Enter>.
4-26
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 ------------COMMAND ===> PROTECT RECORD: 5 EMPLOYEE-MASTER-FILE ---- FIELD NUMBER/NAME ------ -FORMAT- ----+----1----+1 EMP-NUMBER 5/AN 10001 2 EMP-LAST-NAME 15/AN SMITH 3 EMP-FIRST-NAME 10/AN MARY
Steps:
1. Type PROTECT in the COMMAND field. Since the default value of the PROTECT command is ON, you do not have to enter the ON parameter with the command. 2. Press <Enter>. File-AID prohibits you from editing the key field for the currently displayed record.
PROTECT Result
Since you invoked the PROTECT command on record number 5, the key field (EMP-NUMBER) and its data are protected. As illustrated in Figure 4-37, the field name is highlighted to distinguish it as a protected field. The other data items remain unprotected, as distinguished by the highlighting.
Figure 4-37. After PROTECT - EMP-NUMBER is Protected
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 ----------------- COLUMNS 00001 00101 COMMAND ===> SCROLL ===> PAGE RECORD: 5 EMPLOYEE-MASTER-FILE LENGTH: 198 ---- FIELD NUMBER/NAME ------ -FORMAT- ----+----1----+----2----+----3----+----4 ******************************** TOP OF DATA ********************************** 1 EMP-NUMBER 5/AN 10001 2 EMP-LAST-NAME 15/AN SMITH 3 EMP-FIRST-NAME 10/AN MARY 4 EMP-MID-INIT 1/AN 5 FILLER 2/AN 6 EMP-TITLE 30/AN ACTRESS 7 EMP-PERSONAL-INFO SYNC 23/GRP 8 EMP-NATL-ID-NUMBER 9/NUM 536340982
Full-Screen Editing
4-27
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 ------------COMMAND ===> KEY RECORD: 5 EMPLOYEE-MASTER-FILE ---- FIELD NUMBER/NAME ------ -FORMAT- ----+----1----+1 EMP-NUMBER 5/AN 10001 2 EMP-LAST-NAME 15/AN SMITH 3 EMP-FIRST-NAME 10/AN MARY
Steps:
1. Type KEY in the COMMAND field. 2. Press <Enter>. File-AID displays the Key Specification screen (as illustrated in Figure 4-39 ) where you specify the value that you want File-AID to locate in the EMP-NUMBER.
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 ----------------- COLUMNS 00001 00005 COMMAND ===> SCROLL ===> PAGE KEY START POS 1 KEY LENGTH 5 KEY VALUE SPECIFICATION ---- FIELD NUMBER/NAME ------ -FORMAT- ----+----1----+----2----+----3----+----4 ******************************** TOP OF DATA ********************************** 1 EMP-NUMBER 5/AN 10001 ****************************** BOTTOM OF DATA *********************************
Use RIGHT, LEFT commands to browse through keys Press ENTER when the key value has been fully specified Use CAN command to terminate KEY SPECIFICATION without processing the key
4-28
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 --------------COMMAND ===> KEY START POS 1 KEY LENGTH 5 KEY VALUE SPECIFICATION ---- FIELD NUMBER/NAME ------ -FORMAT- ----+----1----+--******************************** TOP OF DATA ************ 1 EMP-NUMBER 5/AN 34010 ****************************** BOTTOM OF DATA ***********
Steps:
1. Type 34010 over the displayed key field value 10001. 2. Press <Enter>. File-AID locates employee number 34010 in record number 13 and displays that record as shown in Figure 4-41 on page 4-28.
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 -------------- KEY OR KEY NEXT FOUND COMMAND ===> SCROLL ===> PAGE RECORD: 13 EMPLOYEE-MASTER-FILE LENGTH: 198 ---- FIELD NUMBER/NAME ------ -FORMAT- ----+----1----+----2----+----3----+----4 ******************************** TOP OF DATA ********************************** 1 EMP-NUMBER 5/AN 34010 2 EMP-LAST-NAME 15/AN SMITH 3 EMP-FIRST-NAME 10/AN JANET 4 EMP-MID-INIT 1/AN 5 FILLER 2/AN 6 EMP-TITLE 30/AN AIRLINE ATTENDANT 7 EMP-PERSONAL-INFO SYNC 23/GRP 8 EMP-NATL-ID-NUMBER 9/NUM 557782984 9 FILLER 1/AN 10 EMP-DATE-OF-BIRTH 6/AN 112359 15 EMP-HIRE-DATE 6/AN 920411 16 EMP-MARITAL-STATUS 1/AN S 17 EMP-WITHOLD-INFO SYNC 15/GRP 18 EMP-LIFE-INS-WITHOLD-AMT DISPLAY 40000{ 6/SNUM 4000.00 19 EMP-NATL-TAX-WITHOLD-PCT 3/PS 30.00 20 EMP-REGION-TAX-WITHOLD-PCT 3/PS 15.00
Full-Screen Editing
4-29
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 --------------COMMAND ===> CHAR RECORD: 13 EMPLOYEE-MASTER-FILE ---- FIELD NUMBER/NAME ------ -FORMAT- ----+----1----+--******************************** TOP OF DATA ************ 1 EMP-NUMBER 5/AN 34010 2 EMP-LAST-NAME 15/AN SMITH
Steps:
1. Type CHAR in the COMMAND field. 2. Press <Enter>. File-AID redisplays the dataset in character format as shown in Figure 4-43.
Figure 4-43. Edit - Character Mode
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 ----------------- COLUMNS 00001 00071 COMMAND ===> SCROLL ===> PAGE ****** ***************************** TOP OF DATA ****************************** 000001 00090 MARTIN EDWARD M AIRPLANE MANUFACTURER 42789012 000002 00100 MULSTROM ROBERTA A HOLLYWOOD SEAMSTRESS 34657365 000003 00200 JACKSON JOSEPH C ORATOR 27558717 ==CHG> 10000 ANDREWS GEORGE ACTOR 57631203 ==NEW> 10001 SMITH MARY ACTRESS 53634098 000006 15000 MURPHY RONALD L PAINTER 98765432 000007 18034 SCHNEIDER ELLEN C NURSE 34155954 000008 21035 JONES GEORGE B COUNTRY SINGER 46381345 000009 25100 ROBERTS WILLIAM R POLITICIAN 87956332 ==CHG> 27007 ALLEN JOYCE M AUTHOR 78345833 000011 30001 RICHARDS REX W RODEO CLOWN 63276453 000012 31000 SAVAGE JONATHON C ELECTRICIAN 34856799 JANET AIRLINE ATTENDANT 55778298 000013 3 4010 SMITH 000014 34011 JACOBS DIANA DOCTOR 22536839 000015 36010 SIMPSON ALEX CARTOONIST 12345678 000016 39310 BARNETT EDWARD E SALESMAN 54378914 000017 39500 WILLIAMS EDITH A DESIGNER 98765432 000018 41000 RICHARDSON MARJORIE M PROGRAMMER ANALYST 34658365 000019 41400 MOORE THOMAS M SYSTEMS ADMINISTRATOR 22637364 000020 42017 BENNETT WILLIAM D SALES SUPPORT 14657355 000021 44018 WILHELM HEINRICH L DIPLOMAT 46657335
4-30
If the cursor is located on a data value in formatted mode, the cursor is displayed on the same byte in character mode. Use the MSG ON command to see the help line showing valid mode switching commands on the last line of your screen.
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 --------------COMMAND ===> RESET ****** ***************************** TOP OF DATA ******** 000001 00090 MARTIN EDWARD M AIRPLANE MANUFAC 000002 00100 MULSTROM ROBERTA A HOLLYWOOD SEAMST
Steps:
1. HOME the cursor. 2. Type RESET in the COMMAND field. 3. Press <Enter>. File-AID clears the display of the results from all previously entered commands as illustrated in Figure 4-45.
Figure 4-45. Edit - Character Mode - After RESET Command
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 ----------------- COLUMNS 00001 00071 COMMAND ===> SCROLL ===> PAGE ****** ***************************** TOP OF DATA ****************************** 000001 00090 MARTIN EDWARD M AIRPLANE MANUFACTURER 42789012 000002 00100 MULSTROM ROBERTA A HOLLYWOOD SEAMSTRESS 34657365 000003 00200 JACKSON JOSEPH C ORATOR 27558717 000004 10000 ANDREWS GEORGE ACTOR 57631203 000005 10001 SMITH MARY ACTRESS 53634098 000006 15000 MURPHY RONALD L PAINTER 98765432 000007 18034 SCHNEIDER ELLEN C NURSE 34155954 000008 21035 JONES GEORGE B COUNTRY SINGER 46381345 000009 25100 ROBERTS WILLIAM R POLITICIAN 87956332 000010 27007 ALLEN JOYCE M AUTHOR 78345833 000011 30001 RICHARDS REX W RODEO CLOWN 63276453 000012 31000 SAVAGE JONATHON C ELECTRICIAN 34856799 000013 34010 SMITH JANET AIRLINE ATTENDANT 55778298 000014 34011 JACOBS DIANA DOCTOR 22536839 000015 36010 SIMPSON ALEX CARTOONIST 12345678
Full-Screen Editing
4-31
Assigning Labels
A line label refers to the location of a line in a dataset. A line label is specified as a period followed by a 1-5 character alphabetic string entered in a sequence number field. You can assign a label to any line. You can then use the labels at a later time to delimit the range of some commands including: CHANGE, FIND, and SORT.
Figure 4-46. Edit - Assigning Line Labels .A and .B
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 ----------------- COLUMNS 00001 00071 COMMAND ===> SCROLL ===> PAGE ****** ***************************** TOP OF DATA ****************************** 000001 00090 MARTIN EDWARD M AIRPLANE MANUFACTURER 42789012 000002 00100 MULSTROM ROBERTA A HOLLYWOOD SEAMSTRESS 34657365 JOSEPH C ORATOR 27558717 .A 03 00200 JACKSON 000004 10000 ANDREWS GEORGE ACTOR 57631203 000005 10001 SMITH MARY ACTRESS 53634098 000006 15000 MURPHY RONALD L PAINTER 98765432 000007 18034 SCHNEIDER ELLEN C NURSE 34155954 000008 21035 JONES GEORGE B COUNTRY SINGER 46381345 000009 25100 ROBERTS WILLIAM R POLITICIAN 87956332 JOYCE M AUTHOR 78345833 .B 10 27007 ALLEN 000011 30001 RICHARDS REX W RODEO CLOWN 63276453 000012 31000 SAVAGE JONATHON C ELECTRICIAN 34856799 000013 34010 SMITH JANET AIRLINE ATTENDANT 55778298 000014 34011 JACOBS DIANA DOCTOR 22536839
Steps:
1. Type .A in the sequence number field of line 3. 2. Type .B in the sequence number field of line 10. 3. Press <Enter>. You use these labels as part of the syntax of the CHANGE command syntax as illustrated in Figure 4-47.
For example, the command CHANGE NE XXX 'XXX' 1 3 changes columns 1 thru 3 to XXX if they are not equal to XXX.
4-32
Figure 4-47. CHANGE Command - Using column and line label ranges
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 --------------COMMAND ===> C NE Z .A .B 15 45 ALL ****** ***************************** TOP OF DATA ******** 000001 00090 MARTIN EDWARD M AIRPLANE MANUFAC 000002 00100 MULSTROM ROBERTA A HOLLYWOOD SEAMST
Steps:
1. Type C NE ' ' 'Z' .A .B 15 45 ALL in the COMMAND field. The syntax of this CHANGE command consists of the CHANGE command keyword, a relational operator, the "from" and "to" values, and the range within which the change must occur. Ranges for records (lines) to change and columns are optional. The CHANGE command in this example changes all non-blank (NE ) values to the letter Z between column number 15 and 45 starting at line label .A and ending at line label .B.. 2. Press <Enter>. File-AID redisplays the screen and identifies those lines that have been changed by ===CHG> label in the sequence number fields as shown in Figure 4-48 on page 4-32.
CHANGE Result
Figure 4-48. Edit - After CHANGE Command
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 --------------------- NE CHANGED COMMAND ===> SCROLL ===> PAGE ****** ***************************** TOP OF DATA ****************************** 000001 00090 MARTIN EDWARD M AIRPLANE MANUFACTURER 42789012 000002 00100 MULSTROM ROBERTA A HOLLYWOOD SEAMSTRESS 34657365 ==CHG> 00200 JACKSON ZZZZZZ Z ZZZZZZ 27558717 ==CHG> 10000 ANDREWS ZZZZZZ ZZZZZ 57631203 ==CHG> 10001 SMITH ZZZZ ZZZZZZZ 53634098 ==CHG> 15000 MURPHY ZZZZZZ Z ZZZZZZZ 98765432 ==CHG> 18034 SCHNEIDER ZZZZZ Z ZZZZZ 34155954 ==CHG> 21035 JONES ZZZZZZ Z ZZZZZZZ ZZZZER 46381345 ==CHG> 25100 ROBERTS ZZZZZZZ Z ZZZZZZZZZZ 87956332 ==CHG> 27007 ALLEN ZZZZZ Z ZZZZZZ 78345833 000011 30001 RICHARDS REX W RODEO CLOWN 63276453 000012 31000 SAVAGE JONATHON C ELECTRICIAN 34856799 000013 34010 SMITH JANET AIRLINE ATTENDANT 55778298 000014 34011 JACOBS DIANA DOCTOR 22536839 000015 36010 SIMPSON ALEX CARTOONIST 12345678
Full-Screen Editing
4-33
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 --------------COMMAND ===> UNDO ****** ***************************** TOP OF DATA ******** 000001 00090 MARTIN EDWARD M AIRPLANE MANUFAC 000002 00100 MULSTROM ROBERTA A HOLLYWOOD SEAMST ==CHG> 00200 JACKSON ZZZZZZ Z ZZZZZZ ==CHG> 10000 ANDREWS ZZZZZZ ZZZZZ
Steps:
1. Type UNDO in the COMMAND field. 2. Press <Enter>. File-AID redisplays the screen with the dataset restored to the values prior to the CHANGE command. File-AID indicates the number of changes that were undone in the message located in the top right corner of the display as shown in Figure 4-50 on page 4-33.
UNDO Result
Figure 4-50. Edit - Character Mode After UNDO Command
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 ----------------- 108 CHANGES UNDONE COMMAND ===> SCROLL ===> PAGE ****** ***************************** TOP OF DATA ****************************** 000001 00090 MARTIN EDWARD M AIRPLANE MANUFACTURER 42789012 000002 00100 MULSTROM ROBERTA A HOLLYWOOD SEAMSTRESS 34657365 =UNDO> 00200 JACKSON JOSEPH C ORATOR 27558717 =UNDO> 10000 ANDREWS GEORGE ACTOR 57631203 =UNDO> 10001 SMITH MARY ACTRESS 53634098 =UNDO> 15000 MURPHY RONALD L PAINTER 98765432 =UNDO> 18034 SCHNEIDER ELLEN C NURSE 34155954 =UNDO> 21035 JONES GEORGE B COUNTRY SINGER 46381345 =UNDO> 25100 ROBERTS WILLIAM R POLITICIAN 87956332 =UNDO> 27007 ALLEN JOYCE M AUTHOR 78345833 000011 30001 RICHARDS REX W RODEO CLOWN 63276453 000012 31000 SAVAGE JONATHON C ELECTRICIAN 34856799 000013 34010 SMITH JANET AIRLINE ATTENDANT 55778298 000014 34011 JACOBS DIANA DOCTOR 22536839
4-34
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 --------------COMMAND ===> RESET;RESET LABEL ****** ***************************** TOP OF DATA ******** 000001 00090 MARTIN EDWARD M AIRPLANE MANUFAC 000002 00100 MULSTROM ROBERTA A HOLLYWOOD SEAMST =UNDO> 00200 JACKSON JOSEPH C ORATOR =UNDO> 10000 ANDREWS GEORGE ACTOR
Steps:
1. Type RESET;RESET LABEL in the COMMAND field. The semi-colon (;) is a command delimiter permitting you to enter multiple commands with one press of <Enter>. 2. Press <Enter>. The UNDO flags disappear and the labels .A and .B are cleared as shown in Figure 4-52 on page 4-34.
Figure 4-52. Edit - Character Mode - After RESET LABEL
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 ----------------- COLUMNS 00001 00071 COMMAND ===> SCROLL ===> PAGE ****** ***************************** TOP OF DATA ****************************** 000001 00090 MARTIN EDWARD M AIRPLANE MANUFACTURER 42789012 000002 00100 MULSTROM ROBERTA A HOLLYWOOD SEAMSTRESS 34657365 000003 00200 JACKSON JOSEPH C ORATOR 27558717 000004 10000 ANDREWS GEORGE ACTOR 57631203 000005 10001 SMITH MARY ACTRESS 53634098 000006 15000 MURPHY RONALD L PAINTER 98765432 000007 18034 SCHNEIDER ELLEN C NURSE 34155954 000008 21035 JONES GEORGE B COUNTRY SINGER 46381345 000009 25100 ROBERTS WILLIAM R POLITICIAN 87956332 000010 27007 ALLEN JOYCE M AUTHOR 78345833 000011 30001 RICHARDS REX W RODEO CLOWN 63276453 000012 31000 SAVAGE JONATHON C ELECTRICIAN 34856799 000013 34010 SMITH JANET AIRLINE ATTENDANT 55778298 000014 34011 JACOBS DIANA DOCTOR 22536839 000015 36010 SIMPSON ALEX CARTOONIST 12345678 000016 39310 BARNETT EDWARD E SALESMAN 54378914 000017 39500 WILLIAMS EDITH A DESIGNER 98765432 000018 41000 RICHARDSON MARJORIE M PROGRAMMER ANALYST 34658365 000019 41400 MOORE THOMAS M SYSTEMS ADMINISTRATOR 22637364 000020 42017 BENNETT WILLIAM D SALES SUPPORT 14657355 000021 44018 WILHELM HEINRICH L DIPLOMAT 46657335
Full-Screen Editing
4-35
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 ----------------- COLUMNS 00001 00071 COMMAND ===> SCROLL ===> PAGE ****** ***************************** TOP OF DATA ****************************** 000001 00090 MARTIN EDWARD M AIRPLANE MANUFACTURER 42789012 02 00100 MULSTROM ROBERTA A HOLLYWOOD SEAMSTRESS 34657365 C 000003 00200 JACKSON JOSEPH C ORATOR 27558717 000004 10000 ANDREWS GEORGE ACTOR 57631203 000005 10001 SMITH MARY ACTRESS 53634098 RONALD L PAINTER 98765432 A 006 15000 MURPHY 000007 20367 SCHNEIDER ELLEN C NURSE 34155954 000008 21035 JONES GEORGE B COUNTRY SINGER 46381345 WILLIAM R POLITICIAN 87956332 A 009 25100 ROBERTS 000010 27007 ALLEN JOYCE M AUTHOR 78345833 000011 30001 RICHARDS REX W RODEO CLOWN 63276453 JONATHON C ELECTRICIAN 34856799 A3 12 31000 SAVAGE 000013 34010 SMITH JANET AIRLINE ATTENDANT 55778298
Steps:
1. Type a C in line 2. 2. Type an A in the sequence number field of line numbers 6 and 9. 3. Type an A3 in the sequence number field of line number 12. 4. Press <Enter>. File-AID inserts a single copy of the data in line number 2 after line numbers 6 and 9 and three copies of the data after line number 12. The inserted copies and the resulting change to the line numbers are illustrated in Figure 4-54.
4-36
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 ----------------- COLUMNS 00001 00071 COMMAND ===> SCROLL ===> PAGE ****** ***************************** TOP OF DATA ****************************** 000001 00090 MARTIN EDWARD M AIRPLANE MANUFACTURER 42789012 000002 00100 MULSTROM ROBERTA A HOLLYWOOD SEAMSTRESS 34657365 000003 00200 JACKSON JOSEPH C ORATOR 27558717 000004 10000 ANDREWS GEORGE ACTOR 57631203 000005 10001 SMITH MARY ACTRESS 53634098 000006 15000 MURPHY RONALD L PAINTER 98765432 ==SEQ> 00100 MULSTROM ROBERTA A HOLLYWOOD SEAMSTRESS 34657365 000008 20367 SCHNEIDER ELLEN C NURSE 34155954 000009 21035 JONES GEORGE B COUNTRY SINGER 46381345 000010 25100 ROBERTS WILLIAM R POLITICIAN 87956332 ==SEQ> 00100 MULSTROM ROBERTA A HOLLYWOOD SEAMSTRESS 34657365 000012 27007 ALLEN JOYCE M AUTHOR 78345833 000013 30001 RICHARDS REX W RODEO CLOWN 63276453 000014 31000 SAVAGE JONATHON C ELECTRICIAN 34856799 ==SEQ> 00100 MULSTROM ROBERTA A HOLLYWOOD SEAMSTRESS 34657365 ==DUP> 00100 MULSTROM ROBERTA A HOLLYWOOD SEAMSTRESS 34657365 ==DUP> 00100 MULSTROM ROBERTA A HOLLYWOOD SEAMSTRESS 34657365 000018 34010 SMITH JANET AIRLINE ATTENDANT 55778298 000019 34011 JACOBS DIANA DOCTOR 22536839 000020 36010 SIMPSON ALEX CARTOONIST 12345678 000021 39310 BARNETT EDWARD E SALESMAN 54378914
Full-Screen Editing
4-37
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 --------------COMMAND ===> SORT KEYS ****** ***************************** TOP OF DATA ******** 000001 00090 MARTIN EDWARD M AIRPLANE MANUFAC 000002 00100 MULSTROM ROBERTA A HOLLYWOOD SEAMST 000003 00200 JACKSON JOSEPH C ORATOR 000004 10000 ANDREWS GEORGE ACTOR 000005 10001 SMITH MARY ACTRESS 000006 15000 MURPHY RONALD L PAINTER ==SEQ> 00100 MULSTROM ROBERTA A HOLLYWOOD SEAMST
Steps:
1. Type SORT KEYS in the COMMAND field. 2. Press <Enter>. File-AID redisplays the dataset in ascending key (first five characters of each record) order. The number of records sorted is indicated in the message in the top right corner of the display as illustrated in Figure 4-56 on page 4-37.
Figure 4-56. Edit - After SORT KEYS
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 ------------------ 56 RECORDS SORTED COMMAND ===> SCROLL ===> PAGE ****** ***************************** TOP OF DATA ****************************** 000001 00090 MARTIN EDWARD M AIRPLANE MANUFACTURER 42789012 000002 00100 MULSTROM ROBERTA A HOLLYWOOD SEAMSTRESS 34657365 ==DUP> 00100 MULSTROM ROBERTA A HOLLYWOOD SEAMSTRESS 34657365 ==DUP> 00100 MULSTROM ROBERTA A HOLLYWOOD SEAMSTRESS 34657365 ==DUP> 00100 MULSTROM ROBERTA A HOLLYWOOD SEAMSTRESS 34657365 ==DUP> 00100 MULSTROM ROBERTA A HOLLYWOOD SEAMSTRESS 34657365 ==DUP> 00100 MULSTROM ROBERTA A HOLLYWOOD SEAMSTRESS 34657365 000008 00200 JACKSON JOSEPH C ORATOR 27558717 000009 10000 ANDREWS GEORGE ACTOR 57631203
or
SORT /field-name A/D /field-name A/D
where "from" and "to" are column locations of the field(s) to be used as sort fields and /field-name is the name of field in a supplied record layout. A/D indicates ascending (A) or descending (D) sequence; if you do not specify either A or D, File-AID assumes an A (ascending) sequence order. If a keyed file is sorted on a field other than the key field, you are not able to save your changes until all records are in key sequence. In this case, use the SORT KEY command to return the records to key sequence before saving your changes. The default parameter for SORT is KEYS for a keyed file. Thus the commands SORT and SORT KEYS are the same.
4-38
For RRDS and BDAM files the SORT command sorts records in relative record number (RRN or RBN) order.
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 --------------COMMAND ===> ****** ***************************** TOP OF DATA ******** 000001 00090 MARTIN EDWARD M AIRPLANE MANUFAC 000002 00100 MULSTROM ROBERTA A HOLLYWOOD SEAMST ROBERTA A HOLLYWOOD SEAMST DD P> 00100 MULSTROM ==DUP> 00100 MULSTROM ROBERTA A HOLLYWOOD SEAMST ==DUP> 00100 MULSTROM ROBERTA A HOLLYWOOD SEAMST ==DUP> 00100 MULSTROM ROBERTA A HOLLYWOOD SEAMST ROBERTA A HOLLYWOOD SEAMST DD P> 00100 MULSTROM 000008 00200 JACKSON JOSEPH C ORATOR
Steps:
1. Type DD (delete block) in the sequence number field of line numbers 3 and 7. 2. Press <Enter>. File-AID deletes the lines of data between the delete block commands as illustrated in Figure 4-58 on page 4-38.
Figure 4-58. After Duplicates Have Been Deleted
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 ----------------- COLUMNS 00001 00071 COMMAND ===> SCROLL ===> PAGE ****** ***************************** TOP OF DATA ****************************** 000001 00090 MARTIN EDWARD M AIRPLANE MANUFACTURER 42789012 000002 00100 MULSTROM ROBERTA A HOLLYWOOD SEAMSTRESS 34657365 000003 00200 JACKSON JOSEPH C ORATOR 27558717 000004 10000 ANDREWS GEORGE ACTOR 57631203 000005 10001 SMITH MARY ACTRESS 53634098 000006 15000 MURPHY RONALD L PAINTER 98765432 000007 20367 SCHNEIDER ELLEN C NURSE 34155954 000008 21035 JONES GEORGE B COUNTRY SINGER 46381345 000009 25100 ROBERTS WILLIAM R POLITICIAN 87956332 000010 27007 ALLEN JOYCE M AUTHOR 78345833 000011 30001 RICHARDS REX W RODEO CLOWN 63276453 000012 31000 SAVAGE JONATHON C ELECTRICIAN 34856799 000013 34010 SMITH JANET AIRLINE ATTENDANT 55778298 000014 34011 JACOBS DIANA DOCTOR 22536839
Full-Screen Editing
4-39
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 --------------COMMAND ===> VFMT ****** ***************************** TOP OF DATA ******** 000001 00090 MARTIN EDWARD M AIRPLANE MANUFAC 000002 00100 MULSTROM ROBERTA A HOLLYWOOD SEAMST 000003 00200 JACKSON JOSEPH C ORATOR
Steps:
1. Type VFMT in the COMMAND field. 2. Press <Enter>. File-AID redisplays the Edit screen in vertical formatted mode as shown in Figure 4-60 on page 4-39.
Figure 4-60. Edit - Vertical Formatted Mode
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 ----------------- COLUMNS 00001 00033 COMMAND ===> SCROLL ===> PAGE EMP-NUMBER EMP-LAST-NAME EMP-FIRST-NAME EMP-MID-INIT FILLER 5/AN 15/AN 10/AN 1/AN 2/AN (1-5) (6-20) (21-30) (31-31) (32-33) 1--------- 2-------------- 3------------- 4----------- 5------****** ***************************** TOP OF DATA ****************************** 000001 00090 MARTIN EDWARD M 000002 00100 MULSTROM ROBERTA A 000003 00200 JACKSON JOSEPH C 000004 10000 ANDREWS GEORGE 000005 10001 SMITH MARY 000006 15000 MURPHY RONALD L 000007 20367 SCHNEIDER ELLEN C 000008 21035 JONES GEORGE B 000009 25100 ROBERTS WILLIAM R 000010 27007 ALLEN JOYCE M 000011 30001 RICHARDS REX W 000012 31000 SAVAGE JONATHON C 000013 34010 SMITH JANET 000014 34011 JACOBS DIANA 000015 36010 SIMPSON ALEX 000016 39310 BARNETT EDWARD E 000017 39500 WILLIAMS EDITH A
where field-list is a list of up to 10 field numbers or field-number ranges (for example, DISPLAY ONLY 1 2 5-8 15-20).
4-40
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 --------------COMMAND ===> DISPLAY 1 2 18 ONLY EMP-NUMBER EMP-LAST-NAME EMP-FIRST-NAME EMP-MID5/AN 15/AN 10/AN 1/AN (1-5) (6-20) (21-30) (31-31) 1--------- 2-------------- 3------------- 4------****** ***************************** TOP OF DATA ******** 000001 00090 MARTIN EDWARD M
Steps:
1. Type DISPLAY 1 2 18 ONLY in the COMMAND field. 2. Press <Enter>. File-AID redisplays the screen with columns 1, 2, and 18 only as illustrated in Figure 4-62 on page 4-40.
Figure 4-62. Edit - Vertical Mode - Fields 1 2 and 18 Only
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 ----------------- COLUMNS 00001 00092 COMMAND ===> SCROLL ===> PAGE EMP-NUMBER EMP-LAST-NAME EMP-LIFE-INS-WITHOLD-AMT 5/AN 15/AN 6/SNUM (1-5) (6-20) (87-92) 1--------- 2-------------- 18---------------------****** ***************************** TOP OF DATA ****************************** 000001 00090 MARTIN -3000.00 000002 00100 MULSTROM 8000.00 000003 00200 JACKSON 0 000004 10000 ANDREWS 0 000005 10001 SMITH 0 000006 15000 MURPHY 5000.00 000007 20367 SCHNEIDER 5000.00 000008 21035 JONES 0 000009 25100 ROBERTS 5000.00 000010 27007 ALLEN 5000.00 000011 30001 RICHARDS 3000.00 000012 31000 SAVAGE 5000.00 000013 34010 SMITH 4000.00 000014 34011 JACOBS 400.00 000015 36010 SIMPSON 5000.00 000016 39310 BARNETT 5000.00 000017 39500 WILLIAMS 0
Full-Screen Editing
4-41
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 --------------COMMAND ===> CHANGE ANY /18 0 ALL EMP-NUMBER EMP-LAST-NAME EMP-LIFE-INS-WITHOLD-AMT 5/AN 15/AN 6/SNUM (1-5) (6-20) (87-92) 1--------- 2-------------- 18---------------------****** ***************************** TOP OF DATA ********* 000001 00090 MARTIN -3000.00 000002 00100 MULSTROM 8000.00
Steps:
1. Type CHANGE ANY /18 0 ALL in the COMMAND field. The CHANGE command in this example changes any value in field number 18 (EMPLIFE-INS-WITHOLD-AMT) of all records to a value of 0 (zero). 2. Press <Enter>.
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 ----------- /18 EQ ANY VALUE(S) Chan COMMAND ===> SCROLL ===> PAGE EMP-NUMBER EMP-LAST-NAME EMP-LIFE-INS-WITHOLD-AMT 5/AN 15/AN 6/SNUM (1-5) (6-20) (87-92) 1--------- 2-------------- 18---------------------****** ***************************** TOP OF DATA ****************************** ==CHG> 00090 MARTIN 0 ==CHG> 00100 MULSTROM 0 ==CHG> 00200 JACKSON 0 ==CHG> 10000 ANDREWS 0 ==CHG> 10001 SMITH 0 ==CHG> 15000 MURPHY 0 ==CHG> 20367 SCHNEIDER 0 ==CHG> 21035 JONES 0 ==CHG> 25100 ROBERTS 0 ==CHG> 27007 ALLEN 0 ==CHG> 30001 RICHARDS 0 ==CHG> 31000 SAVAGE 0
4-42
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 --------------- COLUMNS 000001 000033 COMMAND ===> VPRINT EMP-NUMBER EMP-LAST-NAME EMP-FIRST-NAME EMP-MID-INIT FILLER 5/AN 15/AN 10/AN 1/AN 2/AN (1-5) (6-20) (21-30) (31-31) (32-33) 1--------- 2-------------- 3------------- 4----------- 5------****** ***************************** TOP OF DATA ****************************** 000001 00090 MARTIN EDWARD M 000002 00100 MULSTROM ROBERTA A 000003 00200 JACKSON JOSEPH C 000004 10000 ANDREWS GEORGE 000005 10001 SMITH MARY 000006 15000 MURPHY RONALD L 000007 20367 SCHNEIDER ELLEN C 000008 21035 JONES GEORGE B 000009 25100 ROBERTS WILLIAM R 000010 27007 ALLEN JOYCE M 000011 30001 RICHARDS REX W 000012 31000 SAVAGE JONATHON C 000013 34010 SMITH JANET 000014 34011 JACOBS DIANA 000015 36010 SIMPSON ALEX 000016 39310 BARNETT EDWARD E 000017 39500 WILLIAMS EDITH A
Steps:
1. Type VPRINT in the COMMAND field. 2. Press <Enter>. File-AID displays the Print Parameters screen illustrated in Figure 4-66. See Directing The FPRINT Report to a Dataset or SYSOUT on page 4-16 for information of specifying Print Parameters.
Full-Screen Editing
4-43
Print Parameters
-------------------------------
Enter One of the Following Optional Destinations: Destination printer - - - OR - - External JES Node ID Target VM/TSO ident - - - OR - - Sysout writer name - - - OR - - Print dataset name Disposition Volume serial ===> ===> ===> ===> ===> ===> ===> (Local or remote printer) (Predefined JES Node and symbolic ID of intended receiver of output) (Installation assigned output writer) (DSORG=PS, RECFM=V, LRECL=125) (NEW, SHR, MOD, OLD)
File-AID - Edit - USERID9.FASAMP.EMPLOYE1 --------------COMMAND ===> END EMP-NUMBER EMP-LAST-NAME EMP-LIFE-INS-WITHOLD-AMT 5/AN 15/AN 6/SNUM (1-5) (6-20) (87-92) 1--------- 2-------------- 18---------------------****** ***************************** TOP OF DATA ********* 000001 00090 MARTIN 0 000002 00100 MULSTROM 0
Steps:
1. Type END in the COMMAND field. 2. Press <Enter>. File-AID displays the Disposition of Audit Trail screen as shown in Figure 4-68 on page 4-44.
4-44
-------------------------
(PK = Print dataset and keep PD = Print dataset and delete D = Delete dataset without printing)
===> 'USERID9.FILEAID.AUDT.D940504.T165047'
Audit trail description ===> Enter a description of your edit session ===> on these two lines. Specify Batch JCL Information: Sysout class ===> * Specify JOB Statement Information: ===> //useridA JOB (ACCOUNT),your name, ===> // CLASS=x,MSGCLASS=x,NOTIFY=userid ===> ===> Use JCL command to edit generated JCL Use ENTER to submit batch job Use END to keep audit trail without printing
Steps:
1. Type PD in the Audit trail disposition field. 2. Verify that the JOB statement shown is valid for your site. Use a hold Sysout class to enable online viewing of the report. 3. Press <Enter>. File-AID submits the audit trail batch job. 4. When the job completes, use your online Sysout browsing facilities to examine the report.
5-1
C ha p 5
The File-AID Compare function compares any two similar files and produces reports showing any differences. Special features let you use existing keys or your own sort fields to synchronize the files. You can also supply record layouts to the Compare function that can be used for: Reporting differences field by field Specifying certain fields to be excluded from the compare Specifying sync keys using field names. You may optionally use standard File-AID selection criteria to select only a subset of records to be compared. Other features let you control the format and level of results reporting and to limit the number of records compared or the number of differences to report. Like many other File-AID utilities, you can specify online or batch processing of your compare.
Steps:
1. From the File-AID Primary Option Menu (not shown here), select File-AID option 10. 2. Press <Enter>. File-AID displays the Compare - OLD Dataset Specification screen as illustrated in Figure 5-1 on page 5-2.
5-2
File-AID ---------- Compare - OLD Dataset Specification ----------------------COMMAND ===> Compare Mode ===> F (F = Formatted; U = Unformatted; L = Load Library)
Specify OLD Dataset Information: Dataset name or HFS path ===> 'userid0.FASAMP.COMPARE' Member name ===> (Blank or pattern for member list) Volume serial ===> (If dataset is not catalogued) Specify Record Layout and XREF Information: (S = Single; X = XREF; N = None) Record layout usage ===> S Record layout dataset ===> 'userid0.FASAMP.LAYOUTS' Member name ===> EMPLOYEE (Blank or pattern for member list) XREF dataset name ===> Member name ===> (Blank or pattern for member list) Specify Selection Criteria Information: Selection criteria usage ===> N Selection dataset name ===> Member name ===> (E = Existing; T = Temporary; M = Modify; Q = Quick; N = None) (Blank or pattern for member list)
Steps:
1. Type an F in the Compare Mode field. 2. Type FASAMP.COMPARE in the "OLD" Dataset name field. 3. Type an S in the Record layout usage field. 4. Type 'userid0.FASAMP.LAYOUTS' in the Record layout dataset field. 5. Type EMPLOYEE in the Member name field. 6. Press <Enter>. File-AID displays the Compare - NEW Dataset Specification screen as illustrated in Figure 5-2 on page 5-3.
Comparing Files
5-3
File-AID ---------- Compare - NEW Dataset Specification ----------------------COMMAND ===> Compare Mode: FORMATTED OLD Dataset Name: USERID0.FASAMP.COMPARE Specify NEW Dataset Information: Dataset name or HFS path ===> 'userid0.FASAMP.EMPLOYEE' Member name ===> (Blank or pattern for member list) Volume serial ===> (If dataset is not catalogued) OLD Record Layout Usage: SINGLE Specify Record Layout and XREF Information: Record layout dataset ===> 'userid0.FASAMP.LAYOUTS' Member name ===> EMPLOYEE (Blank or pattern for member list) XREF dataset name ===> Member name ===> (Blank or pattern for member list) Specify Selection Criteria Information: Selection criteria usage ===> N Selection dataset name ===> Member name ===> (E = Existing; T = Temporary; M = Modify; Q = Quick; N = None) (Blank or pattern for member list)
Steps:
1. Type FASAMP.EMPLOYEE in the "NEW" Dataset name field. 2. Press <Enter>. File-AID displays the Compare - Execution Options screen as illustrated in Figure 5-3 on page 5-4.
5-4
File-AID ---------- Compare - Execution Options ------------------------------COMMAND ===> Specify Execution Options: Process online or batch ===> O Specify Compare Criteria Information: Compare criteria usage ===> N Compare criteria dataset ===> Member name ===> (O = Online; B = Batch) (E = Existing; T = Temporary/New; M = Modify; Q = Quick; N = None) (Blank or pattern for member list)
Specify optional File-AID/Data Solutions Change Criteria to age dates, convert currencies, translate, generate, encrypt or otherwise modify data from OLD file userid0.FASAMP.COMPARE Use change criteria ===> N (Y = Yes; N = No; M = Modify) Change criteria file ===> Member name ===> (Blank or pattern for member list) Maximum invalid fields ===> ALL (ALL or number of invalid fields)
Steps:
1. Press <Enter>. File-AID displays the Compare - Criteria Options screen as illustrated in Figure 5-4 on page 5-5.
Comparing Files
5-5
Compare Type
S (Sorted/Keyed) R (ReadAhead) 1 (1-TO-1) is the default compare type for a keyed file. is the default for a non-keyed file. For a 1-TO-1 record compare, specify 1 (one) in the Compare type file. FileAID compares "OLD" record 1 to "NEW" record 1, "OLD" record 2 to "NEW" record 2, etc.
File-AID ---------- Compare - Criteria Options ------------------------------COMMAND ===> Specify Initial Compare Options: Compare type ===> S (S = Sorted/Keyed; R = ReadAhead; 1 = 1-to-1)
Read-ahead record count ===> 100 (If type = R, specify read-ahead count) Read-ahead sequence ===> E (E= Enforce; I = Ignore) Records to compare Differences to compare ===> ALL (All or maximum number of records) ===> ALL (All or maximum number of differences) (Y = Yes; N = No) (Y = Yes; N = No)
Associate Corresponding ===> Y (Associate like field names? Y=Yes; N=No) Ignore Prefix OLD file ===> NEW file ===> Ignore Suffix OLD file ===> NEW file ===>
Steps:
1. Type Y in the Modify print defaults field. 2. Press <Enter>. File-AID displays the Compare - Print Options screen as illustrated in Figure 5-5 on page 5-6.
5-6
Note: Even if you specify No for the above four options, a Summary Report is generated.
Figure 5-5. Compare - Print Options (Page 1) Screen
File-AID ------------ Compare - Print Options (Page 1 ) ----------------------COMMAND ===> Specify initial print options: Print format Max differences to report Print Print Print Print CHANGED INSERTED DELETED MATCHED (a ===> F ===> ALL (F = Formatted; H = Hex; C = Char; M = Mixed) (All or maximum number to report) N N N N = = = = No) No) No) No)
records ===> Y (Y = Yes; records ===> N (Y = Yes; records ===> N (Y = Yes; records ===> N (Y = Yes; Summary Report is ALWAYS generated)
Steps:
1. Press <Enter>. File-AID displays the Compare - Print Options (Page 2) screen as illustrated in Figure 5-6 on page 5-7.
Comparing Files
5-7
N (No)
Specify print options for formatted reports: Formatted Report Option ===> C ( E = Entire Report; A = All Associated Fields; C = Compared Fields Only) ( A = Print All Fields; C = Print Changed Fields Only) ( Y = Yes; N = No)
===> A ===> N
Steps:
1. Type C in the Formatted Report Option field. 2. Press <Enter>. File-AID displays the Compare - Formatted Criteria screen as illustrated in Figure 5-3 on page 5-4
5-8
Sync/Key Specification
Entering an S in the Cmd field for a particular field displays the Sorted Sync/Key Specification pop-up. This pop-up enables you to specify the key order and direction for the selected field (or position). If comparing like formatted keyed files, File-AID automatically knows where the key field is and you do not need to specify any sync key information. Sync key information is used to detect more precisely when new records have been added and old records deleted. You can specify any elementary item(s) to be used as the key field(s). You can identify the sync key(s) using a record layout (F - Formatted) or without a layout (U - Unformatted).
Reset Status
Entering an R in the Cmd field for a field resets the Status Display field (to blanks).
Figure 5-7. Compare - Formatted Criteria Screen
File-AID ----------- Compare - Formatted Criteria ---------------------------COMMAND ===> SCROLL ===> PAGE OLD FILE - PFHKFL0.FASAMP.COMPARE --------------------------------------------Cmd Field Name Format Status Display EMPLOYEE-MASTER-FILE GRP 198 _ EMP-NUMBER C 5 SYNCKEY,ORDER=001,ASCENDING _ EMP-LAST-NAME C 15 COMPARISON FIELD _ EMP-FIRST-NAME C 10 COMPARISON FIELD _ EMP-MID-INIT C 1 COMPARISON FIELD _ FILLER C 2 COMPARISON FIELD _ EMP-TITLE C 30 COMPARISON FIELD EMP-PERSONAL-INFO GRP 23 _ EMP-NATL-ID-NUMBER Z 9 COMPARISON FIELD _ FILLER C 1 COMPARISON FIELD _ EMP-DATE-OF-BIRTH C 6 COMPARISON FIELD EMP-DOB-REDEF REDEFINE EMP-DATE-OF-BIRTH EMP-DOB-REDEF GRP 6 _ EMP-DOB-MM Z 2 COMPARISON FIELD _ EMP-DOB-DD Z 2 COMPARISON FIELD _ EMP-DOB-YY Z 2 COMPARISON FIELD _ EMP-HIRE-DATE C 6 COMPARISON FIELD _ EMP-MARITAL-STATUS C 1 COMPARISON FIELD Cmd: S = Sync/Key, T = Tolerance, P = Print, C = Compare, R = Reset
Step:
1. Press <Enter> to select the default compare of all fields.
Comparing Files
5-9
You may:
Use ENTER to execute COMPARE. Use END to return to previous panel. Use SAVE to save your criteria. Use VIEW to inspect your criteria. Use CANCEL to exit COMPARE (SAVE will not be issued).
Steps:
1. Type VIEW in the Command field to display the Compare criteria. 2. Press <Enter> to select the default compare of all fields. Figure 5-9 through Figure 5-11 display the current Compare Criteria. Press <PF8> to scroll forward through the criteria.
Figure 5-9. Compare - View Criteria Screen (Page 1 of 3)
Menu Utilities Compilers Help -----------------------------------------------------------------------------BROWSE userid0.FILEAID.CC.D01064.T160701 Line 00000000 Col 001 080 Command ===> Scroll ===> CSR ********************************* Top of Data ********************************* * * COMPARE OPTIONS 0000 COMPARE_MODE=FORMATTED 0000 COMPARE_TYPE=SORTED 0000 RECORDS_TO_COMPARE=ALL 0000 DIFFERENCES_TO_COMPARE=ALL 0000 USE_DATA_SOLUTIONS_CHANGE_CRITERIA=NO 0000 DATA_SOLUTIONS_MAXIMUM_INVALID_FIELDS=ALL * * PRINT OPTIONS 0000 PRINT_FORMAT=FORMATTED 0000 MAX_DIFFERENCES_TO_REPORT=ALL 0000 RECORD_TYPES_TO_PRINT=CHANGED 0000 FORMATTED_REPORT_STYLE=COMPARED 0000 COMPARED_FIELDS_PRINT_OPTION=ALL 0000 FIELD_STATISTICS_REPORT=NO * * OUTPUT OPTIONS * NOT SPECIFIED
5-10
Step:
1. Press <PF3> (END) when you are finished browsing the compare criteria.
Comparing Files
5-11
Executing Compare
File-AID redisplays the Compare - Criteria Build Complete screen as shown in Figure 512. At this point, you can choose to save the new compare criteria by entering the SAVE primary command and File-AID prompts you to enter Compare Criteria dataset information. In this example, press <Enter> to execute the comparison. When online processing is requested, compare processing occurs in the foreground of your terminal.
Figure 5-12. Compare - Criteria Build Complete Screen
File-AID ------------- Compare - Criteria Build Complete COMMAND ===> ---------------------
You may:
Use ENTER to execute COMPARE. Use END to return to previous panel. Use SAVE to save your criteria. Use VIEW to inspect your criteria. Use CANCEL to exit COMPARE (SAVE will not be issued).
Steps:
1. Press <Enter> to select the default compare of all fields.
5-12
Step:
1. Enter DOWN MAX and LEFT MAX to display the last page of the report, which shows the COMPARE SUMMARY REPORT (see Figure 5-14 on page 5-13).
Comparing Files
5-13
Step:
1. Press <PF3> (END) to exit the report.
5-14
===> Y
(Y = Yes; N = No)
Use ENTER to perform above action and return to the initial Compare screen Use END to exit without PRINT
Steps:
1. Type a Y in the Print Compare Report field to print the compare report. 2. Press <Enter>. File-AID displays the Print Parameters screen as illustrated in Figure 5-16.
Figure 5-16. Print Parameters Screen
File-AID ------------------COMMAND ===> Number of lines/page Sysout class Number of copies Print Parameters -------------------------------
Enter One of the Following Optional Destinations: Destination printer - - - OR - - External JES Node ID Target VM/TSO ident - - - OR - - Sysout writer name - - - OR - - Print dataset name Disposition Volume serial ===> ===> ===> ===> ===> ===> OLD ===> (Local or remote printer) (Predefined JES Node and symbolic ID of intended receiver of output) (Installation assigned output writer) (DSORG=PS; RECFM=V; LRECL=125) (NEW; SHR; MOD; OLD)
Step:
1. Press <Enter> after making any necessary adjustments to the print parameters. File-AID redisplays the Compare - OLD Dataset Specification screen as shown in Figure 5-17.
Comparing Files
5-15
Specify OLD Dataset Information: Dataset name or HFS path ===> 'userid0.FASAMP.COMPARE' Member name ===> (Blank or pattern for member list) Volume serial ===> (If dataset is not catalogued) Specify Record Layout and XREF Information: Record layout usage ===> S (S = Single; X = XREF; N = None) Record layout dataset ===> 'userid0.FASAMP.LAYOUTS' Member name ===> EMPLOYEE (Blank or pattern for member list) XREF dataset name ===> Member name ===> (Blank or pattern for member list) Specify Selection Criteria Information: Selection criteria usage ===> N Selection dataset name ===> Member name ===> (E = Existing; T = Temporary; M = Modify; Q = Quick; N = None) (Blank or pattern for member list)
Step:
1. Continue with Load Library Compare on page 5-16 or enter the END command (press PF3) to redisplay the File-AID Primary Option Menu.
5-16
The training datasets ...FASAMP.LOADLIB1 and ...FASAMP.LOADLIB1 contain the before and after records respectively.
Figure 5-18. Compare - OLD Dataset Specification Screen
File-AID ---------- Compare - OLD Dataset Specification ----------------------COMMAND ===> Compare Mode ===> L (F = Formatted; U = Unformatted; L = Load Library)
Specify OLD Dataset Information: Dataset name or HFS path ===> 'userid0.FASAMP.LOADLIB1' Member name ===> * (Blank or pattern for member list) Volume serial ===> (If dataset is not catalogued) Specify Record Layout and XREF Information: Record layout usage ===> N Record layout dataset ===> Member name ===> XREF dataset name ===> Member name ===> Specify Selection Criteria Information: Selection criteria usage ===> N Selection dataset name ===> Member name ===>
(S = Single; X = XREF; N = None) (Blank or pattern for member list) (Blank or pattern for member list) (E = Existing; T = Temporary; M = Modify; Q = Quick; N = None) (Blank or pattern for member list)
Steps:
1. Type an L in the Compare Mode field. 2. Type FASAMP.LOADLIB1 in the "OLD" Dataset name field. 3. Specify an * for member name to include all modules. 4. Type an N in the Record layout usage field. 5. Press <Enter>. File-AID displays the Compare - NEW Dataset Specification screen as illustrated in Figure 5-19 on page 5-17.
Comparing Files
5-17
File-AID ---------- Compare - NEW Dataset Specification ----------------------COMMAND ===> Compare Mode: LOAD LIBRARY OLD Dataset Name: USERID0.FASAMP.LOADLIB1 Specify NEW Dataset Information: Dataset name or HFS path ===> 'userid0.FASAMP.LOADLIB2' Member name ===> (Blank or pattern for member list) Volume serial ===> (If dataset is not catalogued) OLD Record Layout Usage: SINGLE Specify Record Layout and XREF Information: Record layout dataset ===> Member name ===> XREF dataset name ===> Member name ===> Specify Selection Criteria Information: Selection criteria usage ===> N Selection dataset name ===> Member name ===>
(Blank or pattern for member list) (Blank or pattern for member list) (E = Existing; T = Temporary; M = Modify; Q = Quick; N = None) (Blank or pattern for member list)
Steps:
1. Type FASAMP.LOADLIB2 in the "NEW" Dataset name field. 2. Press <Enter>. File-AID displays the Compare - Execution Options screen as illustrated in Figure 5-20 on page 5-18.
5-18
File-AID ---------- Compare - Execution Options ------------------------------COMMAND ===> Specify Execution Options: Process online or batch ===> O Specify Compare Criteria Information: Compare criteria usage ===> N Compare criteria dataset ===> Member name ===> (O = Online; B = Batch) (E = Existing; T = Temporary/New; M = Modify; Q = Quick; N = None) (Blank or pattern for member list)
File-AID/Data Solutions Change Criteria may be used in Formatted Compare. If you want to age dates, convert currencies, translate, generate, encrypt or otherwise modify OLD file on fly, on entry panel use Mode=F.
Steps:
1. Press <Enter>. File-AID displays the Compare - Load Library Criteria screen as illustrated in Figure 5-21 on page 5-20.
Comparing Files
5-19
Load Module Size Compare load module sizes. Entry Point Link Attributes Link Date
CSECT Date
IDR ZAP Data Text
Compare zap identification information. Compare CSECT content, such as instructions or constants.
5-20
File-AID ----------------- Compare - Load Library Criteria -------------------COMMAND ===> Use S _ S S _ Use _ _ _ _ _ _ "S" to select member compare criteria: Module Name Load Module Size Entry Point Link Attributes Link Date "S" to select CSECT compare criteria: CSECT Name CSECT Size Language CSECT Date IDR ZAP Data Text ===> 100 (All or maximum number of differences for a CSECT) (Y = Yes; N = No) (Y = Yes; N = No)
Steps:
1. Type S in the Entry Point field. 2. Type S in the Link Attributes field. 3. Type Y in the Modify print defaults field. 4. Press <Enter>. File-AID displays the Compare - Load Library Print Options screen as illustrated in Figure 5-22 on page 5-21.
Comparing Files
5-21
Print member summary report Y (Yes) prints a summary of differences by member. Print changed members Print inserted members Print deleted members Print matched members
Even if you suppress printing the CHANGED, INSERTED, DELETED, and MATCHED members, Compare always generates a Summary Report.
(Y = Yes; members ===> Y members ===> N (Y = Yes; members ===> N (Y = Yes; members ===> N (Y = Yes; Summary Report is ALWAYS generated)
Specify Member Name Report Print Options: Print member name report ===> Y Member name report columns ===> 8
Steps:
1. Type Y in the Print detail report field. 2. Type Y in the Print member summary report field. 3. Type Y in the Print CHANGED members field. 4. Type Y in the Print member name report field. 5. Press <Enter>. File-AID displays the Compare - Criteria Build Complete screen as illustrated in Figure 5-23 on page 5-22.
5-22
You may:
Use ENTER to execute COMPARE. Use END to return to previous panel. Use SAVE to save your criteria. Use VIEW to inspect your criteria. Use CANCEL to exit COMPARE (SAVE will not be issued).
Steps:
1. Type VIEW in the Command field to display the Compare criteria. 2. Press <Enter> to select the default compare of all fields. Figure 5-24 displays the current Compare Criteria.
Figure 5-24. Compare - View Criteria Screen
Menu Utilities Compilers Help ------------------------------------------------------------------------------BROWSE userid0.FILEAID.CC.D01066.T153225 Line 00000000 Col 001 080 Command ===> Scroll ===> CSR ********************************* Top of Data ********************************** * * COMPARE OPTIONS 0000 COMPARE_MODE=LOAD_LIBRARY 0000 MEMBER= 0000 LOAD_LIBRARY_MEMBER_CRITERIA=NAME,EPA,ATTRIBUTES 0000 LOAD_LIBRARY_TEXT_COMPARE_THRESHOLD=00100 0000 LOAD_LIBRARY_CSECT_SELECTION_LIST_TYPE=NONE * * PRINT OPTIONS 0000 RECORD_TYPES_TO_PRINT=CHANGED 0000 PDS_COMPARE=BOTH 0000 MEMBER_NAME_REPORT_COLUMNS=8 0000 LOAD_LIBRARY_MEMBER_SUMMARY_REPORT=YES ******************************** Bottom of Data ********************************
Step:
1. Press <PF3> (END) when you are finished viewing the compare load library criteria.
Comparing Files
5-23
Executing Compare
File-AID redisplays the Compare - Criteria Build Complete screen as shown in Figure 525. At this point, you can choose to save the new compare criteria by entering the SAVE primary command and File-AID prompts you to enter Compare Criteria dataset information. In this example, press <Enter> to execute the comparison. When online processing is requested, compare processing occurs in the foreground of your terminal.
Figure 5-25. Compare - Criteria Build Complete Screen
File-AID ------------- Compare - Criteria Build Complete COMMAND ===> ---------------------
You may:
Use ENTER to execute COMPARE. Use END to return to previous panel. Use SAVE to save your criteria. Use VIEW to inspect your criteria. Use CANCEL to exit COMPARE (SAVE will not be issued).
Steps:
1. Press <Enter> to select the default compare of all fields.
5-24
**** E N D O F R E File-AID 8.8 LOAD LIBRARY MEMBER SUMMARY REPORT USERID-userid0 DATE "OLD" DSN: userid0.FASAMP.LOADLIB1 "NEW" DSN: use ================================================================================
Step:
1. Enter DOWN MAX and LEFT MAX to display the last page of the report, which shows the COMPARE SUMMARY REPORT (see Figure 5-14 on page 5-13).
Comparing Files
5-25
Step:
1. Press <PF3> (END) to exit the report.
5-26
===> Y
(Y = Yes; N = No)
Use ENTER to perform above action and return to the initial Compare screen Use END to exit without PRINT
Steps:
1. Type a Y in the Print Compare Report field to print the compare report. 2. Press <Enter>. File-AID displays the Print Parameters screen as illustrated in Figure 5-16.
Figure 5-29. Print Parameters Screen
File-AID ------------------COMMAND ===> Number of lines/page Sysout class Number of copies Print Parameters -------------------------------
Enter One of the Following Optional Destinations: Destination printer - - - OR - - External JES Node ID Target VM/TSO ident - - - OR - - Sysout writer name - - - OR - - Print dataset name Disposition Volume serial ===> ===> ===> ===> ===> ===> OLD ===> (Local or remote printer) (Predefined JES Node and symbolic ID of intended receiver of output) (Installation assigned output writer) (DSORG=PS; RECFM=V; LRECL=125) (NEW; SHR; MOD; OLD)
Step:
1. Press <Enter> after making any necessary adjustments to the print parameters. File-AID redisplays the Compare - OLD Dataset Specification screen as shown in Figure 5-30.
Comparing Files
5-27
Specify OLD Dataset Information: Dataset name or HFS path ===> 'userid0.FASAMP.LOADLIB1' Member name ===> * (Blank or pattern for member list) Volume serial ===> (If dataset is not catalogued) Specify Record Layout and XREF Information: Record layout usage ===> N Record layout dataset ===> Member name ===> XREF dataset name ===> Member name ===> Specify Selection Criteria Information: Selection criteria usage ===> N Selection dataset name ===> Member name ===>
(S = Single; X = XREF; N = None) (Blank or pattern for member list) (Blank or pattern for member list) (E = Existing; T = Temporary; M = Modify; Q = Quick; N = None) (Blank or pattern for member list)
Step:
1. Enter the END command (press PF3) to redisplay the File-AID Primary Option Menu.
5-28
6-1
C ha p 6
The M suboption (PDS Find/Change and Member List Processing) gives you an easy to use FIND command to isolate a list of members matching your criteria. For PDS datasets you may use the CHANGE command to perform changes across all or selected members.
Step:
1. From the File-AID Primary Option Menu (not shown here), select File-AID option3.6 to access the Search/Update utility entry screen (Figure 6-1 on page 6-2). Note: When viewing a list of datasets presented by the File-AID 3.4 Catalog utility or 3.7 VTOC utility, you can select a dataset for Search/Update processing by issuing the line command 6.
6-2
Search/Update Utility
---------------------------
Member - PDS Find/Change and Member list processing Browse - Browse globally Update - Preview and Update globally
Specify Search/Update Dataset Information: Dataset name ===> FASAMP.JCL Disposition ===> SHR Volume serial ===> Process online or batch ===> O
(OLD or SHR) (If not cataloged) (O = Online; B = Batch) (Option U online) (Y = Yes; N = No) (Y = Yes; N = No) (All or number of changes) (Options M and B) (Existing; Temp; Mod; Quick; None) (Blank or pattern for member list)
Specify Execution Information: Create audit trail ===> N Preview and confirm update ===> Y Maximum changes ===> ALL Specify Selection Criteria Information: Selection criteria usage ===> N Selection dataset name ===> Member name ===>
When option U is requested, selection criteria usage is ignored. The Search/Update utility automatically provides temporary unformatted selection criteria for defining your change. For option M (PDS Find/Change) online, you may use selection criteria to limit the initial member list to only those members which contain matching records. For all options, you may set the "Process online or batch" field to perform your Search/Update request online (O) at your terminal, or to generate JCL for File-AID/Batch execution as a background (B) job in MVS. When running option U (Update) online, special processing options you may request include: An audit trail report of changes applied A preview of your changes (which you may optionally print after viewing) A limit to the number of changes you wish to preview or apply. Full support for updating Panvalet and Librarian libraries is available in the U (Update) option. When you select online processing, you may see a preview of the change statements. Updating is always performed in batch as a background job in MVS. File-AID automatically generates the correct JCL for the appropriate update utility. If you just wish to scan Panvalet or Librarian libraries, you may choose either the M option to work with a member list matching your FIND command entries, or the B option to generate a display or report summarizing the members matching your selection criteria.
6-3
Search/Update Utility
---------------------------
Member - PDS Find/Change and Member list processing Browse - Browse globally Update - Preview and Update globally
Specify Search/Update Dataset Information: Dataset name ===> FASAMP.JCL Disposition ===> SHR (OLD or SHR) Volume serial ===> (If not cataloged) Process online or batch ===> O (O = Online; B = Batch) (Option U online) (Y = Yes; N = No) (Y = Yes; N = No) (All or number of changes) (Options M and B) (Existing; Temp; Mod; Quick; None) (Blank or pattern for member list)
Specify Execution Information: Create audit trail ===> N Preview and confirm update ===> Y Maximum changes ===> ALL Specify Selection Criteria Information: Selection criteria usage ===> Q Selection dataset name ===> Member name ===>
Steps:
1. Type M in the OPTION field. 2. Enter FASAMP.JCL in the Dataset name field. 3. Enter the Disposition as SHR. 4. Make sure processing option is O (online). 5. Type Q in the selection criteria usage field. Q (Quick) requests temporary unformatted field selection criteria only. 6. Press <Enter>.
6-4
File-AID ----------------- PDS Processing Options ----------------------------COMMAND ===> Dataset: USERID9.FASAMP.JCL Process in JCL format ===> N (Y = Yes; N = No)
Specify Member Selection Options (Blank for All Members) Member name mask ===> Member name range ===> to ===> Last modified userid ===> to ===> Creation date ===> to ===> Modification date ===> to ===>
(YY/MM/DD) (YY/MM/DD)
Step:
1. You want all members (the default), just press <Enter> to continue to the next screen.
If a member mask like FASAMP.JCL(CNV*) was specified on the entry screen, the mask, CNV*, would automatically be transferred to the "Member name mask" field, ready for selection.
6-5
If you are scanning JCL members and your selection criteria is looking for multiple conditions within a logical JCL statement (for example, a DD statement containing both DISP=OLD and UNIT=TAPE), use "Process in JCL format" = Y. Use a member name of * (asterisk) on the entry screen to select all members and to bypass the PPO screen. For example, FASAMP.JCL(*).
---
Use END command to continue, use CANCEL command to return to main screen. Cmd --___ ___ ___ ___ ___ ___ ___ ___ ___ ___ ___ ___ ___ ___ ___ ___ AND /OR Position Length --- -------- -----_____ 1____ AND _____ _____ AND _____ _____ AND _____ _____ AND _____ _____ AND _____ _____ AND _____ _____ AND _____ _____ AND _____ _____ AND _____ _____ AND _____ _____ AND _____ _____ AND _____ _____ AND _____ _____ AND _____ _____ AND _____ _____ RO -CO EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ Data Value ---------------------------------------------------PGM=FILEAID_________________________________________ ____________________________________________________ ____________________________________________________ ____________________________________________________ ____________________________________________________ ____________________________________________________ ____________________________________________________ ____________________________________________________ ____________________________________________________ ____________________________________________________ ____________________________________________________ ____________________________________________________ ____________________________________________________ ____________________________________________________ ____________________________________________________ ____________________________________________________
Steps:
1. On the first line type 1 in the Position column. 2. Type CO in the RO column. 3. Type PGM=FILEAID in the Data Value area. 4. Use the END command or PF key (default PF3) to proceed with PDS scanning and member list generation.
6-6
After using a CO (Contains) relational operator, you can specify a Position value as relative to the location of the matching string (for example, Position +5 means the fifth byte after the first byte of the matched string). Valid RO include: EQ, NE, LT, LE, GT, GE, BT (Between), NB (Not Between), CO (Contains), NC (Not Contains), NV (Not Valid), and VA (Valid). Data Value is assumed to be mixed case text (matches any case in data), as if data type T (Text) is specified. If data string contains special characters or embedded blanks, enclose the string in single (') or double quotes ("). If the special character is a comma, use double quotes. For exact case searches, enclose the string in quotes and use the C (Character) data type (for example, C'John Smith'). You can use CO or EQ relational operators to look for multiple strings by separating the strings with commas (for example, ABC,DEF,GHI looks for ABC or DEF or GHI at the specified position). For BT or NB, use a colon (:) to delimit the endpoints of the range. BT includes the endpoints. NB excludes the endpoints. For example, BT C'A:C' means a value between A and C. Valid Data Value types include: T (text) C (text) P (packed decimal) X (hex) N (numeric) B (binary) Any case Explicit case Numeric values (for example, P'1', P'-50', P'1,22,333')
Hex value (for example, X'F1F2' X'C1C2C3') Display format (for example, N'11' = X'F1F1') Numeric value of binary field (for example, B'16' is equivalent to X00000010) One byte of 8 bits or 2 hexadecimal digits (for example, M11110000 and M'F0' are equivalent).
M (mask)
Japanese Data: DBCS and single byte Katakana data is accepted as data values for C (Character) and T (Text) data types. File-AID removes leading or trailing shift characters from DBCS data unless the value is enclosed in double quotes. When the KANA install option is specified for the Character Set Table in the Batch Product Option Variables, C (Character) and T (Text) identifiers are both treated as casesenstitive C (Character) data.
6-7
File-AID - PDS Find/Change - USERID9.FASAMP.JCL ----------- ROW 1 TO 15 OF 15 COMMAND ===> SCROLL ===> PAGE Use FIND or CHANGE command to process across the following members. (Omit FIND/CHANGE operands for a prompt panel.) Use RESET command to get a full member list. Use E, S, B or X line commands to Edit, Browse or eXclude members. -------------------------------------------------------------------------------S NAME HITS VV.MM CREATED CHANGED SIZE INIT MOD ID BATVTOC 1 01.00 95/02/06 95/02/06 11:08 23 23 0 USERID9 1 01.00 95/02/06 95/02/06 11:08 22 22 0 USERID9 S COPY 1 01.00 95/02/06 95/02/06 11:08 37 37 0 USERID9 X CVT6XMAP 1 01.00 95/02/06 95/02/06 11:08 22 22 0 USERID9 X CVT70SEL 1 01.00 95/02/06 95/02/06 11:08 21 21 0 USERID9 X CVT70XRF DROP 1 01.00 95/02/06 95/02/06 11:08 20 20 0 USERID9 DUMP 1 01.00 95/02/06 95/02/06 11:08 18 18 0 USERID9 JCLCNVRT 1 01.00 95/02/06 95/02/06 11:08 23 23 0 USERID9 LIST 1 01.00 95/02/06 95/02/06 11:08 17 17 0 USERID9 PRINT 1 01.00 95/02/06 95/02/06 11:08 18 18 0 USERID9 SKELETON 1 01.00 95/02/06 95/02/06 11:08 23 23 0 USERID9 SPACE 1 01.00 95/02/06 95/02/06 11:08 20 20 0 USERID9 TALLY 1 01.00 95/02/06 95/02/06 11:08 21 21 0 USERID9 UPDATE 1 01.00 95/02/06 95/02/06 11:08 27 27 0 USERID9 USER 1 01.00 95/02/06 95/02/06 11:08 31 31 0 USERID9 ******************************* BOTTOM OF DATA ********************************
Steps:
1. Use the S (Select for PDF/Edit) line command in the S column to the left of member COPY. 2. Use the X (Exclude) line command to the left of the members: CVT6XMAP, CVT70SEL, and CVT70XRF. 3. Press <Enter>.
6-8
Standard ISPF-like UP/DOWN scrolling is supported as is the use of the LOCATE mem and SELECT mem primary commands. You can sort the list using the SORT command with one of the following parameters: VV.MM, CREATED, CHANGED, SIZE, INIT, MOD, ID (for example, SORT CHANGED).
Steps:
1. Notice the //JOBLIB DD and the DSN=????????.FA.VVRRMM.LOAD string. Later in this example you specify a CHANGE to this DSN. 2. Use the END primary command (PF3) to return to the member list.
Figure 6-6. Search/Update Utility - Edit Session From Member List
EDIT ---- USERID9.FASAMP.JCL(COPY) - 01.00 ------------------- COLUMNS 001 072 SCROLL ===> PAGE COMMAND ===> END ****** ***************************** TOP OF DATA ****************************** 000001 //??????A JOB (####,CCCC),'YOUR USERNAME', 000002 // CLASS=A,TIME=2,MSGCLASS=A,NOTIFY=?????? 000003 //* 000004 //* THIS IS A SAMPLE JOB TO COPY AN INPUT DATASET TO AN OUTPUT DATASET. 000005 //* ONLY THOSE RECORDS WHICH MEET THE FOLLOWING CRITERIA WILL BE COPIED 000006 //* AND PRINTED. 000007 //* - IF POSITION 1 IS EQUAL TO '3' 000008 //* - IF POSITION 56 IS EQUAL TO 'A' OR 'B' 000009 //* 000010 //JOBLIB DD DSN=????????.FA.VVRRMM.LOAD,DISP=SHR 000011 //STEP1 EXEC PGM=FILEAID 000012 //SYSPRINT DD SYSOUT=* 000013 //SYSLIST DD SYSOUT=* 000014 //SYSTOTAL DD SYSOUT=* 000015 //SYSUDUMP DD SYSOUT=* 000016 //DD01 DD DSN=??????.FASAMP.INVFILE,DISP=SHR 000017 //DD01O DD DSN=??????.FASAMP.INVCOPY,DISP=(NEW,CATLG,DELETE), 000018 // UNIT=####,SPACE=(TRK,(1,1)) 000019 //SYSIN DD * 000020 $$DD01 COPY RDW=3,IF=(1,EQ,C'3'),IF=(56,EQ,C'A,B'),PRINT=0 000021 /*
6-9
File-AID - PDS Find/Change - USERID9.FASAMP.JCL ----------- ROW 1 TO 12 OF 12 SCROLL ===> PAGE COMMAND ===> CHANGE Use FIND or CHANGE command to process across the following members. (Omit FIND/CHANGE operands for a prompt panel.) Use RESET command to get a full member list. Use E, S, B or X line commands to Edit, Browse or eXclude members. -------------------------------------------------------------------------------S NAME HITS VV.MM CREATED CHANGED SIZE INIT MOD ID BATVTOC 1 01.00 95/02/06 95/02/06 11:08 23 23 0 USERID9 COPY 1 01.00 95/02/06 95/02/06 11:08 22 22 0 USERID9 DROP 1 01.00 95/02/06 95/02/06 11:08 20 20 0 USERID9 DUMP 1 01.00 95/02/06 95/02/06 11:08 18 18 0 USERID9 JCLCNVRT 1 01.00 95/02/06 95/02/06 11:08 23 23 0 USERID9 LIST 1 01.00 95/02/06 95/02/06 11:08 17 17 0 USERID9 PRINT 1 01.00 95/02/06 95/02/06 11:08 18 18 0 USERID9 SKELETON 1 01.00 95/02/06 95/02/06 11:08 23 23 0 USERID9 SPACE 1 01.00 95/02/06 95/02/06 11:08 20 20 0 USERID9 TALLY 1 01.00 95/02/06 95/02/06 11:08 21 21 0 USERID9 UPDATE 1 01.00 95/02/06 95/02/06 11:08 27 27 0 USERID9 USER 1 01.00 95/02/06 95/02/06 11:08 31 31 0 USERID9 ******************************* BOTTOM OF DATA ********************************
Steps:
1. Type CHANGE in the command line 2. Press <Enter>.
6-10
File-AID ------------------COMMAND ===> From string To string Start column Relational operator
-----------------------------
===> ????????.FA.VVRRMM.LOAD ===> SYS9.FA.V8R8M0.LOAD ===> ===> CO End column ===> (CO, EQ, NE, LT, LE, GE, GT) (Y = Yes; N = No) (Y = Yes; N = No) (Y = Yes; N = No; A = Add) (ALL or number of changes)
Confirm changes ===> Y Condense member list ===> N PDS statistics ===> Y Maximum changes ===> ALL
You may bypass this screen by entering the CHANGE command with operands: C(HANGE) string-1 string-2 ((NO)CONFirm) ((NO)CONDense) (col-1 (col-2)) Max(n) EXAMPLES: c c c c abc xyz c'Abc' c'xyz' a,b,c xyz a,b,c xyz change change change change abc (upper or lower case) to XYZ Abc (exactly as entered) to xyz a or b or c (upper or lower case) to XYZ a,b,c (upper or lower case) to XYZ
Steps:
1. Type ????????.FA.VVRRMM.LOAD in the "From string" 2. Type SYS9.FA.V8R8M0.LOAD in the "To string" 3. Type CO in the "Relational operator" field 4. Type Y in the "Confirm changes" field 5. Type N in the "Condense member list" field 6. Type Y in the "PDS Statistics" field 7. Type ALL in the "Maximum changes" field 8. Press <Enter>.
6-11
BROWSE -- USERID9.D95089.T120922.FILEAID ----------- LINE 00000000 COL 001 080 SCROLL ===> CSR COMMAND ===> END ER041-Records-read=263 listed=9 with 9 changes ==>USERID9.FASAMP.JCL OPENED AS PO,RECFM=FB,LRECL=80,BLKSIZE=3120,VOL=PRD912 ********************************MEMBER BATVTOC ******************************** //JOBLIB DD DSN=SYS9.FA.V8R8M0.LOAD,DISP=SHR ********************************MEMBER COPY ******************************** //JOBLIB DD DSN=SYS9.FA.V8R8M0.LOAD,DISP=SHR ********************************MEMBER DROP ******************************** //JOBLIB DD DSN=SYS9.FA.V8R8M0.LOAD,DISP=SHR ********************************MEMBER DUMP ******************************** //JOBLIB DD DSN=SYS9.FA.V8R8M0.LOAD,DISP=SHR ********************************MEMBER PRINT ******************************** //JOBLIB DD DSN=SYS9.FA.V8R8M0.LOAD,DISP=SHR ********************************MEMBER SPACE ******************************** //JOBLIB DD DSN=SYS9.FA.V8R8M0.LOAD,DISP=SHR ********************************MEMBER TALLY ******************************** //JOBLIB DD DSN=SYS9.FA.V8R8M0.LOAD,DISP=SHR ********************************MEMBER UPDATE ******************************** //JOBLIB DD DSN=SYS9.FA.V8R8M0.LOAD,DISP=SHR ********************************MEMBER USER ******************************** //JOBLIB DD DSN=SYS9.FA.V8R8M0.LOAD,DISP=SHR ******************************** BOTTOM OF DATA ********************************
Step:
1. Use the END primary command (PF3) in the COMMAND field to continue to the Confirm Update screen.
6-12
File-AID -------------- Search/Update Confirm Update COMMAND ===> ER041-Records-read=263 listed=9 with 9 changes Ready to perform update Perform update Print previewed changes Maximum changes Instructions: ===> Y ===> N ===> ALL
------------------------
Use ENTER to perform above actions and return to the initial screen Use END to exit without UPDATE or PRINT CAUTION: DISP=SHR was specified. Other users may be editing this file and some of your changes may be lost.
Step:
1. Press <Enter> to perform the update and return to the member list.
6-13
File-AID - PDS Find/Change - USERID9.FASAMP.JCL ----------- ROW 1 TO 12 OF 12 SCROLL ===> PAGE COMMAND ===> END ER042-Records-read=263 updated=9 with 9 changes (Omit FIND/CHANGE operands for a prompt panel.) Use RESET command to get a full member list. Use E, S, B or X line commands to Edit, Browse or eXclude members. -------------------------------------------------------------------------------S NAME HITS VV.MM CREATED CHANGED SIZE INIT MOD ID BATVTOC 1 01.00 95/02/06 95/02/06 11:08 23 23 0 USERID9 COPY 1 01.00 95/02/06 95/02/06 11:08 22 22 0 USERID9 DROP 1 01.00 95/02/06 95/02/06 11:08 20 20 0 USERID9 DUMP 1 01.00 95/02/06 95/02/06 11:08 18 18 0 USERID9 JCLCNVRT 0 01.00 95/02/06 95/02/06 11:08 23 23 0 USERID9 LIST 0 01.00 95/02/06 95/02/06 11:08 17 17 0 USERID9 PRINT 1 01.00 95/02/06 95/02/06 11:08 18 18 0 USERID9 SKELETON 0 01.00 95/02/06 95/02/06 11:08 23 23 0 USERID9 SPACE 1 01.00 95/02/06 95/02/06 11:08 20 20 0 USERID9 TALLY 1 01.00 95/02/06 95/02/06 11:08 21 21 0 USERID9 UPDATE 1 01.00 95/02/06 95/02/06 11:08 27 27 0 USERID9 USER 1 01.00 95/02/06 95/02/06 11:08 31 31 0 USERID9 ******************************* BOTTOM OF DATA ********************************
Step:
1. Use the END primary command (PF3) to return to the Search/Update entry screen.
6-14
Search/Update Utility
Member - PDS Find/Change and Member list processing Browse - Browse globally Update - Preview and Update globally
Specify Search/Update Dataset Information: Dataset name ===> FASAMP.JCL Disposition ===> SHR Volume serial ===> Process online or batch ===> O
(OLD or SHR) (If not cataloged) (O = Online; B = Batch) (Option U online) (Y = Yes; N = No) (Y = Yes; N = No) (All or number of changes) (Options M and B) (Existing; Temp; Mod; Quick; None) (Blank or pattern for member list)
Specify Execution Information: Create audit trail ===> N Preview and confirm update ===> Y Maximum changes ===> ALL Specify Selection Criteria Information: Selection criteria usage ===> Q Selection dataset name ===> Member name ===>
Steps:
1. Type a B in the OPTION field. 2. Press <Enter>.
6-15
File-AID ----------------- PDS Processing Options ----------------------------COMMAND ===> Dataset: USERID9.FASAMP.JCL Include record information Process in JCL format ===> N ===> N (Y = Yes; N = No) (Y = Yes; N = No)
Specify Member Selection Options (Blank for All Members) Member name mask ===> to ===> U Member name range ===> D Last modified userid ===> to ===> Creation date ===> to ===> Modification date ===> to ===> Display member selection list ===> Y (Y = Yes; N = No)
(YY/MM/DD) (YY/MM/DD)
Steps:
1. Type a D in the "Member name" range (from) and U in the corresponding "to" field. 2. Type a Y in the "Display member selection list" field. The "Display member selection list" field displays only for Search/Update options B (Browse) and U (Update) and in the Copy utility (3.3) and Print functions (5.x). You may set a default (Y/N) for this field in the 0.4 Processing Parameters function. 3. Press <Enter>.
6-16
File-AID Member S/X - USERID9.FASAMP.JCL ------------------ ROW 1 TO 12 OF 12 SCROLL ===> PAGE COMMAND ===> END S/X NAME VV.MM CREATED CHANGED SIZE INIT MOD ID DROP 01.01 95/02/06 95/03/30 12:16 20 20 0 USERID9 DUMP 01.01 95/02/06 95/03/30 12:16 18 18 0 USERID9 JCLCNVRT 01.00 95/02/06 95/02/06 11:08 23 23 0 USERID9 LIST 01.00 95/02/06 95/02/06 11:08 17 17 0 USERID9 PRINT 01.01 95/02/06 95/03/30 12:16 18 18 0 USERID9 01.00 95/02/06 95/02/06 11:08 14 14 0 USERID9 XX SAMPLE01 SAMPLE02 01.00 95/02/06 95/02/06 11:08 17 17 0 USERID9 01.00 95/02/06 95/02/06 11:08 23 23 0 USERID9 XX SKELETON SPACE 01.01 95/02/06 95/03/30 12:16 20 20 0 USERID9 TALLY 01.01 95/02/06 95/03/30 12:16 21 21 0 USERID9 UPDATE 01.01 95/02/06 95/03/30 12:16 27 27 0 USERID9 USER 01.01 95/02/06 95/03/30 12:16 31 31 0 USERID9 ******************************* BOTTOM OF DATA ********************************
Steps:
1. Type XX line commands to the left of the SAMPLE01 and SKELETON members. 2. Use the END command or PF key (PF3) to continue processing.
6-17
-----
Use END command to continue, use CANCEL command to return to main screen. AND Cmd /OR Position Length RO Data Value --- --- -------- ------ -- ---------------------------------------------------___ 1 CO TPGM=FILEAID ************************** END OF SELECTION CRITERIA **************************
Step:
1. Use the END command (PF3) to continue processing.
Use the CANCEL command to stop Browse processing and return to the Search/Update Utility screen. Note: The CANCEL command clears all temporary criteria entries.
6-18
BROWSE -- USERID9.D94136.T105329.FILEAID ----------- LINE 00000000 COL 001 080 SCROLL ===> PAGE COMMAND ===> END FA223- Records read = 58, selected = 9, error records skipped = 0 ==>USERID9.FASAMP.JCL OPENED AS PO,RECFM=FB,LRECL=80,BLKSIZE=3120,VOL=PRD904 ********************************MEMBER DROP ******************************** //STEP1 EXEC PGM=FILEAID ********************************MEMBER DUMP ******************************** //STEP1 EXEC PGM=FILEAID ********************************MEMBER JCLCNVRT******************************** //STEP1 EXEC PGM=FILEAID ********************************MEMBER LIST ******************************** //STEP1 EXEC PGM=FILEAID ********************************MEMBER PRINT ******************************** //STEP1 EXEC PGM=FILEAID ********************************MEMBER SPACE ******************************** //STEP1 EXEC PGM=FILEAID ********************************MEMBER TALLY ******************************** //STEP1 EXEC PGM=FILEAID ********************************MEMBER UPDATE ******************************** //STEP1 EXEC PGM=FILEAID ********************************MEMBER USER ******************************** //STEP1 EXEC PGM=FILEAID ******************************** BOTTOM OF DATA ********************************
Step:
1. Use the END command (PF3) to return to the Search/Update Utility screen.
6-19
Search/Update Utility
---------------------------
Member - PDS Find/Change and Member list processing Browse - Browse globally Update - Preview and Update globally
Specify Search/Update Dataset Information: Dataset name ===> FASAMP.JCL(*) Disposition ===> SHR Volume serial ===> Process online or batch ===> O
(OLD or SHR) (If not cataloged) (O = Online; B = Batch) (Option U online) (Y = Yes; N = No) (Y = Yes; N = No) (All or number of changes) (Options M and B) (Existing; Temp; Mod; Quick; None) (Blank or pattern for member list)
Specify Execution Information: Create audit trail ===> N Preview and confirm update ===> Y Maximum changes ===> ALL Specify Selection Criteria Information: Selection criteria usage ===> N Selection dataset name ===> Member name ===>
Steps:
1. Type a U in the OPTION field. 2. Type (*) at the end of the Dataset name to indicate processing of all members and to bypass the presentation of the PPO screen. 3. Verify that the Process online or batch option is O. 4. Verify that the Create Audit Trail option is N. 5. Verify that the Preview and Confirm update option is Y. 6. Verify that the Maximum changes value is ALL. 7. Type an N in the selection criteria usage field. Press <Enter>. Selection criteria usage is ignored when using option U. Option U automatically provides temporary change criteria screens.
6-20
E (edit)
RA (replace all)
EA (edit all)
The selection and change criteria you define remains in memory until you exit from the Search/Update utility. As you see in Figure 6-18, the selection from the Browse example is still in memory. You must define a change when using the U (update) option. You use the I (Insert) line command to insert a new criteria line so that you can specify your change.
Figure 6-18. Search/Update Utility - Change Criteria Screen
------
Use END to continue, CANCEL to return to main screen. Relational Operator R (Replace) overlays existing data. E (Edit) shifts existing data. When preceded by CO (Contains), R or E changes first occurrence of search value in each record, RA or EA changes all occurrences. AND Cmd /OR Position Length RO Search Value / Update Value --- --- -------- ------ -- ---------------------------------------------------1 CO TPGM=FILEAID I ************************** END OF SELECTION CRITERIA **************************
Steps:
1. Use the I line command to insert a new criteria line. 2. Press <Enter>.
6-21
------
Use END to continue, CANCEL to return to main screen. Relational Operator R (Replace) overlays existing data. E (Edit) shifts existing data. When preceded by CO (Contains), R or E changes first occurrence of search value in each record, RA or EA changes all occurrences. AND Cmd /OR Position Length RO --- --- -------- ------ -___ 1 CO ___ ______ _____ E ************************** Search Value / Update Value ---------------------------------------------------TPGM=FILEAID PGM=FILEAID8 END OF SELECTION CRITERIA **************************
Steps:
1. On line 2, specify E in the RO column and PGM=FILEAID8 in the Search Value / Update Value area. 2. Use the END command (PF3) to continue processing.
6-22
Preview Changes
Since you requested a preview of your changes (Preview and Confirm Update = Y), FileAID scans all (or selected) members of your PDS looking for matching records. All matching records are then copied to a temporary work file where they are updated based on your change criteria. You are then placed into an ISPF Browse session on the work file to preview the results of your changes. If the work file is too small to hold all previewed records, use option 0.1 System Parameters to increase the size of your File-AID work file. Your file is not updated until you "Confirm Update" your changes after viewing the preview. After reviewing the preview of your changes, use the END command to access the Confirm Update screen (see Figure 6-21 on page 6-23).
Figure 6-20. Search/Update Utility - Preview Changes Screen
BROWSE -- USERID9.D94132.T092156.FILEAID ----------- LINE 00000000 COL 001 080 SCROLL ===> PAGE COMMAND ===> END ER041-Records-read=374 listed=15 with 15 changes ==>USERID9.FASAMP.JCL OPENED AS PO,RECFM=FB,LRECL=80,BLKSIZE=3120,VOL=PRD912 ********************************MEMBER BATVTOC ******************************** //STEP1 EXEC PGM=FILEAID8 ********************************MEMBER COPY ******************************** //STEP1 EXEC PGM=FILEAID8 ********************************MEMBER CVT6XMAP******************************** //STEP1 EXEC PGM=FILEAID8,REGION=3M ********************************MEMBER CVT70SEL******************************** //STEP1 EXEC PGM=FILEAID8,REGION=4M ********************************MEMBER CVT70XRF******************************** //STEP1 EXEC PGM=FILEAID8,REGION=4M ********************************MEMBER DROP ******************************** //STEP1 EXEC PGM=FILEAID8 ********************************MEMBER DUMP ******************************** //STEP1 EXEC PGM=FILEAID8 ********************************MEMBER JCLCNVRT******************************** //STEP1 EXEC PGM=FILEAID8 ********************************MEMBER LIST ******************************** //STEP1 EXEC PGM=FILEAID8 ********************************MEMBER PRINT ******************************** //STEP1 EXEC PGM=FILEAID8
Steps:
1. Review the preview of your changes. 2. Use the END command (PF3) to see the Confirm Update screen.
6-23
File-AID -------------- Search/Update Confirm Update COMMAND ===> END ER041-Records-read=374 listed=15 with 15 changes Ready to perform update Perform update Print previewed changes Maximum changes Instructions: ===> Y ===> N ===> ALL
------------------------
Use ENTER to perform above actions and return to the initial screen Use END to exit without UPDATE or PRINT CAUTION: DISP=SHR was specified. Other users may be editing this file and some of your changes may be lost.
Steps:
1. Use the END command (PF3) to cancel the change and to return to the Search/Update Utility screen. Note the message, UPDATE CANCELLED, in the top right corner of the screen as shown in Figure 6-22 on page 6-24.
6-24
Search/Update Utility
Member - PDS Find/Change and Member list processing Browse - Browse globally Update - Preview and Update globally
Specify Search/Update Dataset Information: Dataset name ===> FASAMP.JCL(*) Disposition ===> SHR Volume serial ===> Process online or batch ===> B
(OLD or SHR) (If not cataloged) (O = Online; B = Batch) (Option U online) (Y = Yes; N = No) (Y = Yes; N = No) (All or number of changes) (Options M and B) (Existing; Temp; Mod; Quick; None) (Blank or pattern for member list)
Specify Execution Information: Create audit trail ===> N Preview and confirm update ===> Y Maximum changes ===> ALL Specify Selection Criteria Information: Selection criteria usage ===> N Selection dataset name ===> Member name ===>
Steps:
1. Change the Process online or batch option to B. 2. Press <Enter>.
6-25
------
Use END command to continue, use CANCEL command to return to main screen. Relational Operator R (Replace) overlays existing data. E (Edit) shifts existing data. When preceded by CO (Contains), R or E changes first occurrence of search value in each record, RA or EA changes all occurrences. AND Cmd /OR Position Length RO --- --- -------- ------ -___ 1 CO ___ +0 EA ************************** Search Value / Update Value ---------------------------------------------------TPGM=FILEAID CPGM=FILEAID8 END OF SELECTION CRITERIA **************************
Step:
1. Use the END command (PF3) to continue.
6-26
File-AID ---------------- - SEARCH - JCL Specification COMMAND ===> JCL JCL Information for Batch Processing: Sysout class ===> *
-----------------------
JOB Statement Information: ===> //USERID9 JOB (0100,PMGT),your name,CLASS=A, ===> // MSGCLASS=R,NOTIFY=USERID9 ===> ===>
Use JCL command to edit generated JCL Use SUBMIT command to submit batch job Use END to return to main - SEARCH panel without submitting job
Steps:
1. Type JCL on the command line to view the generated JCL. Note: If you intend to save this JCL, be sure to change the //DD01SC DD statement. Change DISP=(OLD,DELETE) to DISP=SHR to ensure that your temporary change criteria is not deleted when you submit the job. 2. Press <Enter>. 3. After viewing the generated JCL, use the END command repeatedly until the File-AID Primary Option Menu screen is displayed.
7-1
C ha p 7
File-AID has a powerful utility for copying all or a selected subset of records from any MVS file. The "From" file and the "To" file can be different file types (for example, from VSAM to PDS member). The Copy utility provides this ability and has special features for copying partitioned data sets (PDS) including member selection based on ISPF statistics like "last changed date". The Copy utility lets you optionally use standard File-AID selection criteria during the Copy. You may use existing selection criteria defined with the Selection utility (Option 6), or dynamically create temporary selection criteria. In this chapter, you practice using the Copy utility to selectively copy (and rename) PDS members based on member name and data content.
Step:
1. From the File-AID Primary Option Menu (not shown here), select File-AID option 3.3 to access the Copy Utility entry screen (Figure 7-1 on page 7-2).
7-2
Copy Utility
---------------------------------
Specify "FROM" Dataset or HFS Path Information: Dataset or path ===> FASAMP.JCL Volume serial ===> (If not cataloged) Specify "TO" Dataset Information: Dataset or path ===> FASAMP.LAYOUTS Volume serial ===> (If not cataloged) Disposition ===> OLD (OLD, MOD, NEW) Specify Execution Information: Process online or batch ===> B Specify Selection Criteria Information: Selection criteria usage ===> T Selection criteria dataset ===> Member name ===>
(O = Online; B = Batch) (E = Existing; T = Temporary; M = Modify; Q = Quick; N = None) (Blank or pattern for member list)
7-3
Steps:
1. Make sure the FROM dataset name is FASAMP.JCL (no member name). 2. Overtype the TO dataset name to read FASAMP.LAYOUTS. 3. Type B in the Process online or batch field. 4. Type T in the Selection criteria usage field. 5. Press <Enter>.
7-4
7-5
File-AID ----------------- PDS Processing Options ----------------------------COMMAND ===> FROM Dataset: USERID9.FASAMP.JCL Copy entire member Copy empty members Process in JCL format ===> Y ===> N ===> N (Y N (Y (Y = = = = Yes; No, selected records only) Yes; N = No) Yes; N = No)
TO Dataset: USERID9.FASAMP.LAYOUTS Replace like-named members ===> Y Rename copied members mask ===> ???????X
(Y = Yes; N = No)
Specify Member Selection Options (Blank for All Member name mask ===> Member name range ===> SPACE Last modified userid ===> Creation date ===> Modification date ===> Display member selection list ===> N
(YY/MM/DD) (YY/MM/DD)
(Y = Yes; N = No)
Steps:
1. Type ???????X in the Rename copied members mask field. A question mark (?) means to keep original member name character. 2. Type SPACE in the "Member name range" (from) and USER in the "to" field. 3. Type an N in the Display member selection list field. 4. Press <Enter>.
7-6
Steps:
1. Type 3 on the OPTION line to Edit unformatted selection criteria. 2. Press <Enter>.
Figure 7-3. Copy Utility - TEMPORARY Selection Criteria Menu Screen
File-AID - Selection Criteria Menu - TEMPORARY -------------------------------OPTION ===> 3 - Status 1 OPTIONS - Enter selection criteria options default 2 FORMATTED - Edit formatted selection criteria 0 sets 3 UNFORMATTED - Edit unformatted selection criteria 0 sets Member list description ===> ______________________________ Long ===> ______________________________________________________________ Description ===> ______________________________________________________________
VIEW command to display selection criteria summary SAVE command to write selection criteria request END to continue processing CANCEL to return to main panel
7-7
Steps:
1. On the first line type 1 in the Position column. 2. Type CO in the RO column. 3. Type PGM=FILEAID in the Data Value area. 4. Press <Enter>. 5. Use the END command or PF key (default PF3) to return to the selection criteria menu.
Figure 7-4. Copy Utility - Unformatted Field Selection Criteria Screen
---
Use END command to continue, use CANCEL command to return to main screen. Cmd --___ ___ ___ ___ ___ ___ ___ ___ ___ ___ ___ ___ ___ ___ ___ ___ AND /OR Position Length --- -------- -----_____ 1____ AND _____ _____ AND _____ _____ AND _____ _____ AND _____ _____ AND _____ _____ AND _____ _____ AND _____ _____ AND _____ _____ AND _____ _____ AND _____ _____ AND _____ _____ AND _____ _____ AND _____ _____ AND _____ _____ AND _____ _____ RO -CO EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ Data Value ---------------------------------------------------PGM=FILEAID_________________________________________ ____________________________________________________ ____________________________________________________ ____________________________________________________ ____________________________________________________ ____________________________________________________ ____________________________________________________ ____________________________________________________ ____________________________________________________ ____________________________________________________ ____________________________________________________ ____________________________________________________ ____________________________________________________ ____________________________________________________ ____________________________________________________ ____________________________________________________
7-8
File-AID - Selection Criteria Menu - TEMPORARY -------------------------------OPTION ===> END - Status 1 OPTIONS - Enter selection criteria options default 2 FORMATTED - Edit formatted selection criteria 0 sets 3 UNFORMATTED - Edit unformatted selection criteria 1 sets Member list description ===> ______________________________ Long ===> ______________________________________________________________ Description ===> ______________________________________________________________
VIEW command to display selection criteria summary SAVE command to write selection criteria request END to continue processing CANCEL to return to main panel
Step:
1. Use the END command (PF3) to proceed with PDS scanning and member copying (or batch JCL generation).
7-9
File-AID ---------------- COPY - JCL Specification COMMAND ===> JCL JCL Information for Batch Processing: Sysout class ===> *
---------------------------
JOB Statement Information: ===> //USERID9A JOB (ACCT,INFO),'FILE-AID',CLASS=A, ===> // MSGCLASS=A,NOTIFY=USERID9 ===> ===>
Use JCL command to edit generated JCL Use SUBMIT command to submit batch job Use END to return to main COPY panel without submitting job
Steps:
1. Type JCL on the command line to view the generated JCL. 2. Press <Enter>.
7-10
Step:
1. After viewing the generated JCL, use the END command repeatedly until the File-AID Primary Option Menu screen is displayed.
Figure 7-7. Copy Utility - Generated JCL for Batch Processing
EDIT ---- SYS94138.T152845.RA000.USERID9.R0039174 ------------ COLUMNS 001 072 SCROLL ===> CSR COMMAND ===> END ****** ***************************** TOP OF DATA ****************************** 000001 //USERID9A JOB (ACCT,INFO),'FILE-AID',CLASS=A, 000002 // MSGCLASS=A,NOTIFY=USERID9 000003 //* YOU ARE VIEWING JCL THAT FILE-AID HAS GENERATED TO PERFORM 000004 //* THE REQUIRED FUNCTION. YOU CAN CHANGE THIS JCL IF DESIRED AND USE 000005 //* THE SUBMIT PRIMARY COMMAND TO SUBMIT THE JOB. THE CREATE OR REPLACE 000006 //* PRIMARY COMMAND CAN BE USED TO KEEP THIS JOBSTREAM FOR FUTURE USE. 000007 //* USE THE END COMMAND TO EXIT THE FUNCTION WITHOUT SUBMITTING THE JOB 000008 //FASTEP EXEC PGM=FILEAID 000009 //STEPLIB DD DISP=SHR,DSN=CW.COMMON.FA.ALPHA.LOADLIB 000010 //SYSPRINT DD SYSOUT=* 000011 //SYSLIST DD SYSOUT=* 000012 //DD01 DD DSN=USERID9.FASAMP.JCL, 000013 // DISP=SHR 000014 //DD01O DD DSN=USERID9.FASAMP.LAYOUTS, 000015 // DISP=OLD 000016 //DD01SC DD DSN=USERID9.FILEAID.SC.D940518.T155703(SELECT), 000017 // DISP=(OLD,DELETE) 000018 //SYSIN DD * 000019 $$DD01 COPYMEM CEM=NO,RLM=YES,NEWMEMS=???????X, 000020 MEMBER=(SPACE,TALLY,UPDATE,USER)
8-1
C ha p 8
3.4 Catalog Utility: Scans the catalog for datasets matching your dataset name mask (high-level qualifier required). The advantages provided by the File-AID Catalog utility include: More flexibility in using pattern characters in a search name Unlimited action regardless of type of dataset listed, including VSAM information display, Browse and Edit (with File-AID), and Delete. 3.7 VTOC Utility: Scans volumes for datasets matching your dataset name mask (pattern allowed in high-level qualifier (for example, *.FASAMP.EMP*). Datasets need not be cataloged. In this chapter, you practice using these utilities and learn about the line commands (for example, I (Info), 1 (File-AID Browse), and R (Rename)) that enable you to work with the list of datasets you generate.
8-2
File-AID 8.8 ------------OPTION ===> 3 0 1 2 3 5 6 7 8 9 10 C T X PARAMETERS BROWSE EDIT UTILITIES PRINT SELECTION XREF VIEW REFORMAT COMPARE CHANGES TUTORIAL EXIT -
Specify ISPF and File-AID parameters USERID Display file contents PF KEYS Create or change file contents TERMINAL File-AID/SPF extended utilities TIME Print file contents JULIAN Create or change selection criteria DATE Create or change record/layout cross reference View interpreted record layout Convert file from one format to another Compare file contents Display summary of File-AID changes Display information about File-AID Terminate File-AID and return to ISPF
Use END to terminate File-AID Online Technical Support available at: frontline.compuware.com
Copyright (c) 1982 - 2001, by Compuware Corporation. All rights reserved. Unpublished rights reserved under the Copyright Laws of the United States. Type LEGAL on the command line for Copyright/Trade Secret Notice.
Step:
1. From the File-AID Primary Option Menu (Figure 8-1), select File-AID option 3 to view the File-AID Extended Utilities menu.
8-3
Extended Utilities
------------------------------
- Display and modify directory entries; display load module CSECT maps; Browse, Delete, Rename PDS members DATASET - Display dataset information; allocate non-VSAM datasets and GDGs; catalog, uncatalog, delete, or rename datasets COPY - Copy entire datasets; copy selected records; copy PDS members based on name, statistics and/or content CATALOG - Display generic catalog entries or VSAM datasets on a volume in list form and do dataset list processing VSAM - Allocate, display, delete, modify, or rename VSAM clusters, alternate indexes, or paths; manage IAM files SEARCH/UPDATE - FIND and CHANGE across PDS members. Search for and/or update data globally in any type of dataset. VTOC - Display and process datasets on a volume(s) INTERACTIVE BATCH SUBMIT XMLGEN - Execute File-AID/Batch - Build batch jobstreams - Generate an XML tagged document from data file All rights reserved.
Step:
1. From the File-AID Extended Utilities menu (Figure 8-2), select option 4 to access the Catalog Utility entry screen.
8-4
Catalog Utility
-------------------------------
V - Produce volume list of VSAM datasets (non-ICF catalogs only) BLANK - Generic catalog search Generic Catalog Search Function: Search name ===> ____________ (Q = Quick; S = Short; L = Long) Format option ===> L Clusters only ===> Y (Y = Yes; N = No) Volume Dataset List Function: Volume serial ===> Translate DSN ===> N (Required for option V) (Y = Yes; N = No)
Catalog to Search if other than Default System Catalog: Catalog name ===> Catalog password ===> (If catalog is password protected) Display confirm delete ===> Y (Y = Yes; N = No)
Steps:
1. Leave the OPTION field blank. 2. Leave the Search name field blank. 3. Set Format option field to L (long).
8-5
4. Press <Enter>. File-AID generates the list of datasets and displays them on the Catalog Utility Dataset List screen as shown in Figure 8-4 on page 8-6.
+ (Plus)
The Search Name is reset to blanks when you exit the Catalog utility. The V option (Produce volume list of VSAM) is used primarily for sites having pre-ICF catalogs.
8-6
File-AID ------------- Catalog Utility Dataset COMMAND ===> ----- D A T A S E T N A M E -------------USERID9.FASAMP.COMPARE USERID9.FASAMP.EMPLOYEE USERID9.FASAMP.EMPLOYE2 USERID9.FASAMP.EMPMAST USERID9.FASAMP.INVFILE USERID9.FASAMP.INVFILE2 USERID9.FASAMP.JCL USERID9.FASAMP.LAYOUTS USERID9.FASAMP.ORDRFILE USERID9.FASAMP.RFMTDEF USERID9.FASAMP.SEGFILE USERID9.FASAMP.SELCRIT USERID9.FASAMP.SEQBLK USERID9.FASAMP.XREF
List
--- 22 DATASETS SELECTED SCROLL ===> CSR Org Volume Fmt Trks %Us Xt VS PRD928 F 1 100 1 VS PRD928 F 1 100 1 PS PRD927 FB 1 0 1 PS PRD927 FB 1 100 1 PS PRD927 VB 1 100 1 PS PRD927 VB 1 0 1 PO PRD927 FB 2 100 1 PO PRD927 FB 1 100 1 PS PRD927 VB 1 100 1 PO PRD927 VB 1 100 1 PS PRD927 VB 1 100 1 PO PRD927 VB 1 100 1 PS PRD904 FB 3 33 1 PO PRD927 VB 1 100 1
Step:
1. Press PF1 (HELP) two times. File-AID contains comprehensive tutorials about each screen and command. Pressing PF1 (HELP) displays the tutorial describing your current screen. If a short message is displayed in the upper right corner (for example, 22 DATASETS SELECTED), the first time you press PF1, File-AID displays the long message associated with the short message. The long message appears on screen line three or sometimes in a message window near the lower portion of your screen. The second time you press PF1, File-AID invokes the related tutorial screen that describes the current function or message. From the tutorial, you can either select a specific topic when choices are provided or just press <Enter> from each tutorial screen to sequentially view the information.
8-7
File-AID -------------- CATALOG - DATASET SELECTION LISTS ------------ TUTORIAL OPTION ===> +-------------------------------------+ | DATASET SELECTION LIST PROCESSING | +-------------------------------------+ DATASET SELECTION LISTS allow specific primary commands and line commands. Note: When the Catalog Utility is invoked by specifying a pattern for a DSN, the only valid line command is S, to select a dataset for processing. The following topics are presented in sequence or may be selected by number: 1 - SCROLLING through dataset selection lists Primary commands 2 - F (FIND).....scroll to dataset name containing search text 3 - L (LOCATE)...scroll to dataset starting with search text 4 - P (PRINT)....print the list Line commands-----------------------------------------------------5 - B (BROWSE) 10 - I (INFO-long) 15 - 1 (File-AID Browse) 6 - C (CATLG) 11 - M (MODIFY) 16 - 2 (File-AID Edit) 7 - D (DELETE) 12 - R (RENAME) 17 - 6 (File-AID Search /Update) 8 - E (EDIT) 13 - S (INFO-short or Select) 9 - F (FREE) 14 - U (UNCATLG)
Steps:
1. Review the primary and line commands shown in the tutorial in Figure 8-5. Notice that line command 1 invokes File-AID Browse, 2 invokes File-AID Edit and 6 is FileAID Search/Update. 2. Use the END command (press PF3) to return to the list of your datasets.
8-8
File-AID ------------- Catalog Utility Dataset List --- 22 DATASETS SELECTED ER052-Selected 22 from 42 entries read from catalog--0 in error. COMMAND ===> SCROLL ===> CSR ----- D A T A S E T N A M E -------------- Org Volume Fmt Trks %Us Xt VS PRD928 F 1 100 1 I USERID9.FASAMP.COMPARE USERID9.FASAMP.EMPLOYEE VS PRD928 F 1 100 1 USERID9.FASAMP.EMPLOYE2 PS PRD927 FB 1 0 1 USERID9.FASAMP.EMPMAST PS PRD927 FB 1 100 1 USERID9.FASAMP.INVFILE PS PRD927 VB 1 100 1 USERID9.FASAMP.INVFILE2 PS PRD927 VB 1 0 1 USERID9.FASAMP.JCL PO PRD927 FB 2 100 1 USERID9.FASAMP.LAYOUTS PO PRD927 FB 1 100 1 USERID9.FASAMP.ORDRFILE PS PRD927 VB 1 100 1 USERID9.FASAMP.RFMTDEF PO PRD927 VB 1 100 1 USERID9.FASAMP.SEGFILE PS PRD927 VB 1 100 1 USERID9.FASAMP.SELCRIT PO PRD927 VB 1 100 1 USERID9.FASAMP.SEQBLK PS PRD904 FB 3 33 1 USERID9.FASAMP.XREF PO PRD927 VB 1 100 1 USERID9.ISPF.ISPPROF PO PRD802 FB 4 50 1 USERID9.JCL PO PRD902 FB 34 100 1 USERID9.LOGON.CLIST PO PRD921 VB 1 100 1 USERID9.SPFLOG1.LIST PS PRD926 VA 8 0 1 USERID9.SPF1.LIST PS PRD918 FBA 2 100 1 USERID9.SPF2.LIST PS PRD915 FBA 16 0 1 USERID9.SUPERC.LIST PS PRD912 FBA 1 100 1
Steps:
1. If necessary, use the command FIND FASAMP.COMPARE, to scroll the list of datasets so that your userid.FASAMP.COMPARE dataset is visible in the list of datasets. 2. Write down the VOLUME number of the ...FASAMP.COMPARE dataset in the space below this sentence. You use this volume in a later example. VOLUME = ________ <-- Write VOLSER here 3. Place an I to the left of the ...FASAMP.COMPARE dataset. 4. Press <Enter>. File-AID displays information about FASAMP.COMPARE on the VSAM Information screen shown in Figure 8-7 on page 8-9.
8-9
File-AID ------ VSAM Information - (Page 1 of 2) ---------------------------COMMAND ===> END Catalog: CATALOG.TSO2.VPRD915 Cluster: USERID9.FASAMP.COMPARE Data: USERID9.FASAMP.COMPARE.DATA Data Volume: PRD928 Index: USERID9.FASAMP.COMPARE.INDEX Index Volume: PRD928 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - Data Component Information: Current Allocation Options: Device type: 3390 Load option: RECOVERY Organization: KSDS Write check: NO KSDS key length: 5 Buffer space: 6144 KSDS key location: 0 Erase on delete: NO Average record size: 211 Imbedded index: NO Maximum record size: 211 Replicated index: NO Allocated Space: Unit Primary Secondary Reuse option: YES Data: TRACKS 1 1 Share option: 3-3 Index: TRACKS 1 1 Spanned records: NO Dataset Date Information: MSS Binding: STAGED Creation date: 1994/05/09 MSS-Destage wait: NO Expiration date: Key ranges present: NO Modification date: 1994/05/09 AIX-unique keys: Modification time: 05:48 PM GMT AIX-upgrade: Use ENTER to go to page 2, END to return to utility menu
Step:
1. Use the END command (press PF3) THREE TIMES to return to the Extended Utilities menu.
8-10
Extended Utilities
------------------------------
- Display and modify directory entries; display load module CSECT maps; Browse, Delete, Rename PDS members DATASET - Display dataset information; allocate non-VSAM datasets and GDGs; catalog, uncatalog, delete, or rename datasets COPY - Copy entire datasets; copy selected records; copy PDS members based on name, statistics and/or content CATALOG - Display generic catalog entries or VSAM datasets on a volume in list form and do dataset list processing VSAM - Allocate, display, delete, modify, or rename VSAM clusters, alternate indexes, or paths; manage IAM files SEARCH/UPDATE - FIND and CHANGE across PDS members. Search for and/or update data globally in any type of dataset. VTOC - Display and process datasets on a volume(s) INTERACTIVE BATCH SUBMIT XMLGEN - Execute File-AID/Batch - Build batch jobstreams - Generate an XML tagged document from data file All rights reserved.
Step:
1. From the File-AID Extended Utilities menu (Figure 8-8), select option 7 to access the VTOC Utility entry screen.
8-11
VTOC Utility
--------------------------------
I - List volume information M - Map VTOC entries in pack location sequence (CCCCC-HH) BLANK - List VTOC entries in dataset name sequence Volume Selection Information: Volume serial ===> Unit name ===> Volume status ===> Generic Search Function: Search dataset name ===> Max number of names ===> 1000
Catalog to use if other than Default System Catalog: Catalog name ===> Catalog password ===> (If catalog is password protected) Display confirm delete ===> Y (Y = Yes, N = No)
8-12
VTOCDSN (List VTOC entries in dataset name sequence) Produces a list of datasets for one volume or a list of all datasets matching the search name pattern on a range of volumes.
8-13
VTOC Utility
--------------------------------
I - List volume information M - Map VTOC entries in pack location sequence (CCCCC-HH) BLANK - List VTOC entries in dataset name sequence Volume Selection Information: Volume serial ===> xxxxxx Unit name ===> Volume status ===> Generic Search Function: Search dataset name ===> Max number of names ===>
Catalog to use if other than Default System Catalog: Catalog name ===> Catalog password ===> (If catalog is password protected) Display confirm delete ===> Y (Y = Yes, N = No)
Steps:
1. Leave the OPTION field blank. 2. Specify the Volume serial as the value you noted earlier in Selecting a Dataset for Processing on page 8-8. 3. Type +.FASAMP.COMPARE.* in the Search dataset name field. 4. Press <Enter> . File-AID lists the datasets for the specified volume as shown in Figure 8-11 on page 8-14.
8-14
File-AID ----------- Utility VTOC List for XXX926 (3390) -- ROW 1 TO 8 OF 8 COMMAND ===> SCROLL ===> CSR VTOC: 69 Tracks ( 23 %used) 2640 Free DSCBS 8 Datasets VOL: 50085 Tracks ( 90 %used) 15 Tracks/cylinder 15 ALT Tracks FREE: 306 Cyls (MAX= 133) 5026 Trks (MAX= 2004) 130 Free Xtnts Selected Datasets: 8 Tracks, using 0 % of volume --------- D A T A S E T N A M E ---------- ORG Trks %Used XTS= Status XXX010.FASAMP.COMPARE.DATA VS 1 ? 1 XXX010.FASAMP.COMPARE.INDEX VS 1 ? 1 XXX022.FASAMP.COMPARE.DATA VS 1 ? 1 XXX022.FASAMP.COMPARE.INDEX VS 1 ? 1 XXX028.FASAMP.COMPARE.DATA VS 1 ? 1 XXX028.FASAMP.COMPARE.INDEX VS 1 ? 1 XXX029.FASAMP.COMPARE.DATA VS 1 ? 1 XXX029.FASAMP.COMPARE.INDEX VS 1 ? 1 ******************************* BOTTOM OF DATA *********************************
Step:
1. Use the END command (press PF3) THREE TIMES to display the File-AID Primary Option Menu.
9-1
C ha p 9
File-AID has a utility similar to ISPFs 3.1 Library Utility for displaying and managing PDS and PDSE members. Special features for load modules let you display and change the link-edit attributes and to view CSECT information in name or address order. The FileAID 3.1 Library utility provides these capabilities and other features for managing partitioned data sets (PDS).
Step:
1. From the File-AID Primary Option Menu (not shown here), select File-AID option 3.1 to access the Library Utility entry screen (Figure 9-1).
Figure 9-1. Library Utility Entry Screen
Library Utility
A - Map CSECTs in address order N - Map CSECTs in name order I - Display directory entry of member blank - Display member list Dataset name Member name New name ===> 'SYS1.LINKLIB' ===> ===>
9-2
Dataset name Standard File-AID dataset name entry is supported including using wildcard character in the dataset name (for example, FASAMP.*) Member name (required for all but blank option) If a member name is specified, it must be a valid full member name, no pattern characters are allowed. New name (required and used only by R (Rename)) Disposition (SHR or OLD) If the disposition is OLD for a load module library, the S (list directory) option displays (and allows update to some of) the load modules link-edit attributes. Process Option Specify whether to process your Library utility request O (Online) or B (Batch). Batch processing is valid only for load library processing.
9-3
Library Utility
A - Map CSECTs in address order N - Map CSECTs in name order I - Display directory entry of member blank - Display member list Dataset name Member name New name ===> 'SYS1.LINKLIB' ===> ===>
Steps:
1. Leave the OPTION field blank. 2. Type the dataset name 'SYS1.LINKLIB'. 3. Verify the value of the Disposition field is SHR. 4. Press <Enter>.
9-4
Specify Member Selection Options (Blank for All Members) Member name mask ===> IEB* Member name range ===> to ===> Member Rmode ===> Member Amode ===>
Steps:
1. Type IEB* in the Member name mask field. 2. Press <Enter>.
9-5
File-AID Library Utility - SYS1.LINKLIB ---------------- 2804 MEMBERS SELECTED SCROLL ===> CSR COMMAND ===> L IEBCOP A/N = CSECT Map; I = Directory Entry; D = Delete; R = Rename; B = Browse -----------------------------------------------------------------------------Name Rename Size TTR Alias-of AC EP R/M A/M Attributes IEBCOMPR 005508 01780E 94 0048C0 24 24 FO IEBCOPY 01B438 02E616 00 00E628 24 24 FO IEBCRANL 000CD0 01751A 43 000000 24 24 FO RF RN RU IEBCREAT 000D80 017523 26 000000 24 24 FO RF RN RU IEBDG 0010E0 01752B 42 000000 24 24 FO RN RU IEBDGCUP 000418 017534 00 000000 24 24 FO RN RU IEBDGMSG 000FB8 017601 26 000000 24 24 FO RF RN RU IEBEDIT 001FB8 018C04 27 000000 24 24 FO RU IEBFDANL 000D00 01760A 43 000000 24 24 FO RF RN RU IEBFDTBL 000A80 017613 94 000000 24 24 FO RF RN RU IEBGENER 009270 02F505 00 003298 24 24 FO IEBIMAGE 00BC18 018C0E 00 000000 24 24 FO RU IEBISAM 0004D0 01AE17 26 000000 24 24 FO RN RU IEBISC 000658 01AE1F 26 000000 24 24 FO RN RU IEBISF 0007B0 01AE28 26 000000 24 24 FO RN RU IEBISL 000968 01AF04 26 000000 24 24 FO RN RU IEBISPL 0007D8 01AF0D 94 000000 24 24 FO RN RU IEBISU 000770 01AF16 94 0003F0 24 24 FO RN RU IEBPTPCH 005CA8 017904 00 0053A0 24 24 FO
Steps:
1. Type L IEBCOP in the COMMAND field. L is an abbreviation for LOCATE. If the member name is not found, the list is scrolled to show the nearest members to the specified name. 2. Press <Enter>.
9-6
Steps:
1. Type an A to the left of the IEBCOPY member name. 2. Press <Enter>.
Figure 9-5. Library Utility. Viewing CSECTS in Address Order (The A Line Command).
File-AID Library Utility - SYS1.LINKLIB --------- ROW 1,202 TO 1,222 OF 2,804 COMMAND ===> SCROLL ===> CSR A/N = CSECT Map; I = Directory Entry; D = Delete; R = Rename; B = Browse -----------------------------------------------------------------------------S Name Rename Size TTR Alias-of AC EP R/M A/M Attributes IEBCOMPR 005508 01780E 94 0048C0 24 24 FO 01B438 02E616 00 00E628 24 24 FO A IEBCOPY IEBCRANL 000CD0 01751A 43 000000 24 24 FO RF RN RU IEBCREAT 000D80 017523 26 000000 24 24 FO RF RN RU IEBDG 0010E0 01752B 42 000000 24 24 FO RN RU IEBDGCUP 000418 017534 00 000000 24 24 FO RN RU IEBDGMSG 000FB8 017601 26 000000 24 24 FO RF RN RU IEBEDIT 001FB8 018C04 27 000000 24 24 FO RU IEBFDANL 000D00 01760A 43 000000 24 24 FO RF RN RU IEBFDTBL 000A80 017613 94 000000 24 24 FO RF RN RU IEBGENER 009270 02F505 00 003298 24 24 FO IEBIMAGE 00BC18 018C0E 00 000000 24 24 FO RU IEBISAM 0004D0 01AE17 26 000000 24 24 FO RN RU IEBISC 000658 01AE1F 26 000000 24 24 FO RN RU IEBISF 0007B0 01AE28 26 000000 24 24 FO RN RU IEBISL 000968 01AF04 26 000000 24 24 FO RN RU IEBISPL 0007D8 01AF0D 94 000000 24 24 FO RN RU S 000 0 01 16 94 0003 0 24 24 O
9-7
You may scroll DOWN and UP. You may use the FIND command to locate CSECTS or dates. You may issue the P (print) primary command to direct the display to a printer or dataset. When File-AID detects long program names in a PDS/E load object, it uses a two-line display per SD (Section Defintion) or LD (external Label Definition) entry. For readability, SD entries contain the SD name followed by hypens. For a PDSE, File-AID identifies the BINDER version and the date is displayed in Julian format with a four-digit year. The END command is used to exit the display. You are done with this example so return to the File-AID Primary Option Menu now.
Step:
1. Use the END command (press PF3) THREE TIMES to redisplay the File-AID Primary Option Menu.
Figure 9-6. Library Utility - CSECT Information - Address Order
File-AID ADDRESS List of SYS1.LINKLIB(IEBCOPY) ----------- FUNCTION COMPLETED SCROLL ===> CSR COMMAND ===> END IEBCOPY was linked on 93/09/08 by LINKXA - Symbol - Type ADDR Length Tname 1 Tdate 1 Tname 2 Tdate 2 A/R mode ---------- ---- ------ ------ ---------- -------- ---------- -------- -------IEBCOMCA SD 00000 1000 ASM H V2 97/06/30 24/ 24 IDENT 93/09/08 UY92656 IEBMCA LD 00000 PATCHMCA LD 00FC8 IEBCOMCB SD 01000 2000 ASM H V2 97/06/30 24/ 24 IND$C LD 01000 OUTD$C LD 01200 UT3D$C LD 01400 UT4D$C LD 01600 LOADD$C LD 01800 UNLDD$C LD 01A00 BPAMD$C LD 01C00 PRTAREA LD 02000 RDCAREA LD 02200 H1AREA LD 02300 H2AREA LD 02340 DDNTAB LD 0245C STKAREA LD 024E0 STKEND LD 02FF8
9-8
10-1
C ha p 10
Step:
1. From the File-AID Primary Option Menu (not shown here), select File-AID option 8 to access the View Record Layout - Dataset Specification screen (Figure 10-1 on page 10-2).
10-2
Steps:
1. Type the dataset name FASAMP.LAYOUTS. 2. Type the member name EMPLOYEE. 3. Press <Enter>.
Figure 10-1. View Record Layout - Dataset Specification Screen
Specify Record Layout Dataset to View: Dataset name Member name ===> FASAMP.LAYOUTS ===> EMPLOYEE (blank or pattern for member list)
The member specified must contain only data declarations for one or more structures of data beginning at structure level 01. You can specify a data declaration with COBOL or PL/I, but you cannot specify both within a single member. When using a multiple structure member in Browse or Edit, issue the formatted mode command, USE, to see a list of all layouts from which you may select an alternate layout.
Viewing Layouts
10-3
Step:
1. Use the END command (press PF3) TWO TIMES to redisplay the File-AID Primary Option Menu.
Figure 10-2. View Utility - Display of Interpreted Layout
File-AID ---------------------- VIEW LAYOUT --------------- ROW 1 TO 19 OF 38 SCROLL ===> CSR COMMAND ===> END Layout: USERID9.FASAMP.LAYOUTS(EMPLOYEE) FIELD --------- FIELD LEVEL/NAME ---------- -PICTURE- -NUMBER START END LENGTH EMPLOYEE-MASTER-FILE 1 198 198 5 EMP-NUMBER X(5) 1 1 5 5 5 EMP-LAST-NAME X(15) 2 6 20 15 5 EMP-FIRST-NAME X(10) 3 21 30 10 5 EMP-MID-INIT X 4 31 31 1 5 FILLER XX 5 32 33 2 5 EMP-TITLE X(30) 6 34 63 30 5 EMP-PERSONAL-INFO GROUP 7 64 86 23 10 EMP-NATL-ID-NUMBER 9(9) 8 64 72 9 10 FILLER X 9 73 73 1 10 EMP-DATE-OF-BIRTH X(6) 10 74 79 6 10 EMP-DOB-REDEF REDEFINES EMP-DATE-OF-BIRTH 10 EMP-DOB-REDEF GROUP 11 74 79 6 15 EMP-DOB-MM 99 12 74 75 2 15 EMP-DOB-DD 99 13 76 77 2 15 EMP-DOB-YY 99 14 78 79 2 10 EMP-HIRE-DATE X(6) 15 80 85 6 10 EMP-MARITAL-STATUS X 16 86 86 1 5 EMP-WITHOLD-INFO GROUP 17 87 101 15
10-4
11-1
C ha p 11
The Reformat function extends the capabilities of the Copy utility by allowing you to change the format of your file as you are copying it. You define the rules for reformatting by supplying record layouts for the file being copied and for the target file. Typically you start with a layout which matches a data file. Then, make a copy of the layout and make changes to the new version to reflect the new format of your data file. In the new layout you reorganize the source fields by adding new fields, deleting unwanted fields, changing field sizes and/or reordering fields. Next you create a reformat definition using the Reformat function. Then, execute the definition to read your original file and write reformatted records to your new file. You create a reformat definition for the target file by: Using optional field selection criteria to selectively copy and/or reformat records Defining fields to be moved (including numeric format translations) Specifying constant values for new or existing fields After you create a reformat definition, you can execute the Reformat function online or in batch. Japanese Users: Reformat does not support Graphic-defined DBCS data fields.
Steps:
1. Enter a 9 in the OPTION field on the Primary Option Menu (not shown here). 2. Press <Enter>. File-AID displays the first screen of the Reformat function as shown in Figure 11-1 on page 11-2.
11-2
File-AID ------------------------- REFORMAT DEFINITION -----------------------OPTION ===> ___ blank - Create a new or change an existing reformat definition D - Dynamically create and execute a temporary reformat definition E - Execute a previously saved reformat definition Specify Reformat Definition Dataset: Dataset name ===> FASAMP.RFMTDEF Member name ===> EMPNEW Volume serial ===> (If not cataloged) Description ===> Specify Execution Information: Process online or batch ===> O (O = Online; B = Batch)
Steps:
1. Leave OPTION field blank to specify that you want to create a new reformat definition. 2. Enter FASAMP.RFMTDEF in the Dataset name field. The attributes of this dataset are DSORG=PO,RECFM=VB,LRECL=1580,BLKSIZE=7870. 3. Enter EMPNEW in the Member name field. 4. Type an O in the Process online or batch field. 5. Press <Enter>. File-AID displays the Reformat Record Layouts - Create Mode screen as shown inFigure 11-2 on page 11-3.
Reformatting Records
11-3
File-AID ----------------------- Reformat Record Layouts --------- CREATE MODE COMMAND ===> Specify Source Record Layout Record layout usage Record layout dataset Member name XREF dataset name Member name Specify Target Record Layout Record layout usage Record layout dataset Member name XREF dataset name Member name Move corresponding? Ignore prefix Ignore suffix and XREF Information: (S = Single; X = XREF) ===> S ===> FASAMP.LAYOUTS ===> EMPLOYEE (Blank or pattern for member list) ===> ===> (Blank or pattern for member list) and XREF Information: (S = Single; X = XREF) ===> S ===> FASAMP.LAYOUTS ===> EMPLOYE2 (Blank or pattern for member list) ===> ===> (Blank or pattern for member list) (YES or NO)
Steps:
1. Verify that the Record layout usage field in the Source information area of the screen contains a value of S. 2. Type FASAMP.LAYOUTS in the Record layout dataset field. 3. Type EMPLOYEE in the Member name field. 4. Verify that the Record layout usage field in the Target information area of the screen contains a value of S. 5. Type FASAMP.LAYOUTS in the Record layout dataset field. 6. Type EMPLOYE2 in the Member name field. 7. Verify YES in the Move corresponding field. 8. Press <Enter>. File-AID displays the Reformat Definition Editor screen as shown in Figure 11-3 on page 11-5.
11-4
If you use an XREF for either the source or target layout, File-AID presents a list of layout members for you to choose. If you choose a BASE layout for the source, FileAID automatically reformats only those records with the matching record type values. You must not choose a DEFAULT-BASE layout for a target. If you execute in batch, you need to add DD01XR and DD01RL statements to the batch JCL to identify the XREF member and layouts library.
Reformatting Records
11-5
File-AID ---- REFORMAT Definition Editor - DS:USERID9.FASAMP.RFMTDEF(EMPNEW) 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 /EMP-NUMBER 2 EMP-FIRST-NAME AN/15 /EMP-FIRST-NAME 3 EMP-MID-INIT AN/1 /EMP-MID-INIT 4 EMP-LAST-NAME AN/20 /EMP-LAST-NAME 5 EMP-TITLE AN/30 /EMP-TITLE 6 EMP-PERSONAL-INFO GRP/24 7 EMP-NATL-ID-NUMBER NUM/9 9v00 /EMP-NATL-ID-NUMBER Use END Command to Save then End, CANCEL to Cancel, or EX to Execute Reformat
Because we asked for Move Corresponding = Y, target fields are pre-filled with references to corresponding source layout fields by field name. For example, /EMP-NUMBER in the target field EMP-NUMBER means to move data from source field name EMP-NUMBER. When you execute your reformat, moves are performed using the rules of COBOL. If an alphanumeric field is moved to a larger field, blanks are added on the right. If move to a shorter field, data is truncated to the length of the target field.
Scrolling
You can scroll the data in both the source and target windows of the editor independently or at the same time. The location of the cursor determines which window(s) is scrolled. If the cursor is located within the source layout fields, then only the upper window is scrolled. The lower window only scrolls when the cursor is located in the lower window fields. If the cursor is on the command line, both windows scroll.
11-6
File-AID ---- REFORMAT Definition Editor - DS:USERID9.FA COMMAND ===> DOWN Source COBOL - EMPLOYEE-MASTER-FILE ---- USERID9.FASAMP. Num Field Name Format Pic OP Data 0 EMPLOYEE-MASTER-FILE GRP/198
Steps:
1. Position the cursor in the command line (HOME). 2. Press the PF key for DOWN (PF8),
Reformatting Records
11-7
or Type the command DOWN in the COMMAND field and press <Enter>.
File-AID ---- REFORMAT Definition Editor - DS:USERID9.FASAMP.RFMTDEF(EMPNEW) SCROLL ===> PAGE COMMAND ===> DOWN Source COBOL - EMPLOYEE-MASTER-FILE ---- USERID9.FASAMP.LAYOUTS(EMPLOYEE) ----Num Field Name Format Pic OP Data Row 9 of 35 8 EMP-NATL-ID-NUMBER NUM/9 9v00 9 FILLER AN/1 10 EMP-DATE-OF-BIRTH AN/6 11 EMP-DOB-REDEF GRP/6 Redefines EMP-DATE-OF-BIRTH 12 EMP-DOB-MM NUM/2 2v00 13 EMP-DOB-DD NUM/2 2v00 14 EMP-DOB-YY NUM/2 2v00 Target COBOL - EMPLOYEE-MASTER-FILE ---- USERID9.FASAMP.LAYOUTS(EMPLOYE2) ----Num Field Name Format Pic Data Row 9 of 36 8 EMP-NEW-BIRTH-DATE GRP/7 9 EMP-DOB-CENTURY AN/1 '1' 10 EMP-BIRTH-DATE GRP/6 11 EMP-DOB-YY NUM/2 2v00 /14 12 EMP-DOB-MM NUM/2 2v00 /12 13 EMP-DOB-DD NUM/2 2v00 /13 14 EMP-NEW-HIRE-DATE GRP/7 15 EMP-HD-CENTURY AN/1 '1' Use END Command to Save then End, CANCEL to Cancel, or EX to Execute Reformat
Entering Constants
After the DOWN scroll, both layouts are scrolled to show the BIRTH-DATE field (see Figure 11-5). Notice how the target layout re- arranges the date from MMDDYY format to YYMMDD format and inserts a new EMP-DOB-CENTURY field. You assign a constant value of '1' (meaning 19xx) to the new century fields for birth date and hire date.
Steps:
1. Type '1' in EMP-DOB-CENTURY target field Data area. You must surround an alphanumeric field constant with single quotes. 2. Type /14 in EMP-DOB-YY target field Data area. /14 references the EMP-DOB-YY source field. 3. Type /12 in EMP-DOB-MM target field Data area. 4. Type /13 in EMP-DOB-DD target field Data area. 5. Type '1' in EMP-HD-CENTURY target field Data area. 6. Position the cursor in the command line. 7. Press the PF key for DOWN (PF8), or Type the command DOWN in the COMMAND field and press <Enter>.
11-8
File-AID ---- REFORMAT Definition Editor - DS:USERID9.FASAMP.RFMTDEF(EMPNEW) SCROLL ===> PAGE COMMAND ===> DOWN Source COBOL - EMPLOYEE-MASTER-FILE ---- USERID9.FASAMP.LAYOUTS(EMPLOYEE) ----Num Field Name Format Pic OP Data Row 16 of 35 15 EMP-HIRE-DATE AN/6 16 EMP-MARITAL-STATUS AN/1 17 EMP-PERSONAL-INFO GRP/15 18 EMP-LIFE-INS-WITHOLD-AMT NUMS/6 4v02 19 EMP-NATL-TAX-WITHOLD-PCT PS/3 3v02 20 EMP-REGION-TAX-WITHOLD-PCT PS/3 3v02 21 EMP-LOCAL-TAX-WITHOLD-PCT PS/3 3v02 22 EMP-HOME-ADDRESS GRP/50 Target COBOL - EMPLOYEE-MASTER-FILE ---- USERID9.FASAMP.LAYOUTS(EMPLOYE2) ----Num Field Name Format Pic Data Row 17 of 36 16 EMP-HIRE-DATE AN/6 /15 17 EMP-MARITAL-STATUS AN/1 /EMP-MARITAL-STATUS 18 EMP-PERSONAL-INFO GRP/20 19 EMP-PAY-GRADE AN/3 PAY 20 EMP-LIFE-INS-WITHOLD-AMT PS/5 7v02 /EMP-LIFE-INS-WITHOLD-AMT 21 EMP-NATL-TAX-WITHOLD-PCT PS/3 3v02 28.5 22 EMP-NEW-401K-WITHOLD-AMT PS/3 3v02 0 23 EMP-REGION-TAX-WITHOLD-PCT PS/3 3v02 /20 Use END Command to Save then End, CANCEL to Cancel, or EX to Execute Reformat
Steps:
1. Type /15 in EMP-HIRE-DATE target field Data area. /15 references the EMP-HIREDATE source field. 2. Type PAY in the EMP-PAY-GRADE target field Data area. 3. Type 28.5 in the EMP-NATL-TAX-WITHOLD-PCT target field Data area. Numeric field constants are entered as one or more decimal digits (with optional decimal points or signs) and are not quoted. 4. Type 0 in the EMP-NEW-401K-WITHOLD-AMT target field Data area. Numeric fields are automatically initialized to zero if no constant value or field reference is specified. Alphanumeric fields are initialized to blanks. 5. Position the cursor in the command line. 6. Press the PF key for DOWN (PF8), or Type the command DOWN in the COMMAND field and press <Enter>.
Reformatting Records
11-9
File-AID ---- REFORMAT Definition Editor - DS:USERID9.FASAMP.RFMTDEF(EMPNEW) SCROLL ===> PAGE COMMAND ===> DOWN Source COBOL - EMPLOYEE-MASTER-FILE ---- USERID9.FASAMP.LAYOUTS(EMPLOYEE) ----Num Field Name Format Pic OP Data Row 24 of 35 23 EMP-STREET-ADDRESS AN/25 24 FILLER AN/1 25 EMP-CITY AN/15 26 EMP-STATE-PROV-CNTY GRP/4 27 EMP-STATE AN/2 28 FILLER AN/2 29 EMP-POSTAL-CODE NUM/5 5v00 30 EMP-EMERGENCY-CONTACT GRP/47 Target COBOL - EMPLOYEE-MASTER-FILE ---- USERID9.FASAMP.LAYOUTS(EMPLOYE2) ----Num Field Name Format Pic Data Row 25 of 36 24 EMP-LOCAL-TAX-WITHOLD-PCT PS/3 3v02 /EMP-LOCAL-TAX-WITHOLD-PCT 25 EMP-HOME-ADDRESS GRP/51 26 EMP-STREET-ADDRESS AN/25 /EMP-STREET-ADDRESS 27 EMP-CITY AN/15 /EMP-CITY 28 EMP-STATE AN/2 /27 29 EMP-NINE-DIGIT-ZIP GRP/9 30 EMP-POSTAL-CODE NUM/5 5v00 /29 31 EMP-ZIP-CODE-PLUS-4 AN/4 '0000' Use END Command to Save then End, CANCEL to Cancel, or EX to Execute Reformat
Steps:
1. Type /27 in EMP-STATE target field Data area. /27 references the EMP-STATE source field. 2. Type /29 in EMP-POSTAL-CODE target field Data area. 3. Type '0000' in the EMP-ZIP-CODE-PLUS-4 target field Data area. 4. Position the cursor in the command line. 5. Press the PF key for DOWN (PF8), or Type the command DOWN in the COMMAND field and press <Enter>.
11-10
File-AID ---- REFORMAT Definition Editor - DS:USERID9.FASAMP.RFMTDEF(EMPNEW) SCROLL ===> PAGE COMMAND ===> UP MAX Source COBOL - EMPLOYEE-MASTER-FILE ---- USERID9.FASAMP.LAYOUTS(EMPLOYEE) ----Num Field Name Format Pic OP Data Row 32 of 35 31 EMP-CONTACT-NAME AN/25 32 FILLER AN/2 33 EMP-CON-WORK-PHONE AN/10 34 EMP-CON-HOME-PHONE AN/10 ******************************* BOTTOM OF DATA *******************************
Target COBOL - EMPLOYEE-MASTER-FILE ---- USERID9.FASAMP.LAYOUTS(EMPLOYE2) ----Num Field Name Format Pic Data Row 33 of 36 32 EMP-EMERGENCY-CONTACT GRP/45 33 EMP-CONTACT-NAME AN/25 /EMP-CONTACT-NAME 34 EMP-CON-WORK-PHONE AN/10 '8105551212' 35 EMP-CON-HOME-PHONE AN/10 '8105551212' ******************************* BOTTOM OF DATA *******************************
Use END Command to Save then End, CANCEL to Cancel, or EX to Execute Reformat
Steps:
1. Type '8105551212' in the EMP-CON-WORK-PHONE and the EMP-CON-HOMEPHONE target field Data areas. 2. Position the cursor in the COMMAND field. 3. Type the command UP MAX and press <Enter>.
Reformatting Records
11-11
File-AID ---- REFORMAT Definition Editor - DS:USERID9.FASAMP.RFMTDEF(EMPNEW) SCROLL ===> PAGE COMMAND ===> EX 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 GE ' 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 /EMP-NUMBER 2 EMP-FIRST-NAME AN/15 /EMP-FIRST-NAME 3 EMP-MID-INIT AN/1 /EMP-MID-INIT 4 EMP-LAST-NAME AN/20 /EMP-LAST-NAME 5 EMP-TITLE AN/30 /EMP-TITLE 6 EMP-PERSONAL-INFO GRP/24 7 EMP-NATL-ID-NUMBER NUM/9 9v00 999999999 Use END Command to Save then End, CANCEL to Cancel, or EX to Execute Reformat
Steps:
1. Type GE in the OP column to the right of the EMP-NUMBER field. 2. Type ' ' (quote five spaces quote) in the Data column to the right of the GE in the EMP-NUMBER field. If you specify another field test, the two conditions are ANDed; both must be valid before the record is selected for reformatting. 3. Overtype reference/8 with the value 999999999 (nine 9s) in the data area to the right of the target EMP-NATL-ID-NUMBER field to provide a generic value on the output file. 4. Type EX in the COMMAND field. Press <Enter>.
11-12
You may choose to run your reformat in batch. If you do so you may include a DD01SC (Selection criteria) DD to identify a saved selection criteria definition you created with the Selection Criteria function (option 6). At execution time, you have an option to copy all records or only those records matching your selection criteria. Reformatting is only applied to records matching any selection criteria.
Reformatting Records
11-13
Display file after reformat ===> N Specify Input Dataset: Dataset name ===> Member name ===> Volume serial ===> Disposition ===> SHR Specify Output Dataset: Dataset name ===> Member name ===> Volume serial ===> Disposition ===> OLD Copy unselected records ===> Number of records to process ===> 0
(If not cataloged) (OLD, SHR or MOD) (Y = Yes, N = No, drop unselected) (1-9999, 0 = all)
11-14
(zero) (see Figure 11-9 on page 11-11) contains the size of the layout in the Format area (for example, GRP/211 - means length 211).
Figure 11-11. Reformat Execution Screen. Identifying Datasets.
Specify Input Dataset: Dataset name ===> FASAMP.EMPLOYEE Member name ===> Volume serial ===> Disposition ===> SHR Specify Output Dataset: Dataset name ===> FASAMP.EMPLOYE2 Member name ===> Volume serial ===> Disposition ===> OLD Copy unselected records ===> Y Number of records to process ===> 0
(If not cataloged) (OLD, SHR or MOD) (Y = Yes, N = No, drop unselected) (1-9999, 0 = all)
Steps:
1. Type a B in the Display file after reformat field. 2. Enter FASAMP.EMPLOYEE in the input Dataset name field. 3. Enter FASAMP.EMPLOYE2 in the output Dataset name field. 4. Type a Y in the Copy unselected records field. 5. Ensure that there is a 0 (zero) in the "Number of records to process" field. The value 0 tells File-AID to copy all records. 6. Press <Enter>. File-AID executes the Reformat function and displays the dataset in Browse mode as illustrated in Figure 11-12 on page 11-15.
Reformatting Records
11-15
File-AID - Browse - USERID9.FASAMP.EMPLOYE2 ----------------- FILE REFORMATTED SCROLL ===> PAGE COMMAND ===> END RECORD: 1 EMPLOYEE-MASTER-FILE LENGTH: 211 ---- FIELD NUMBER/NAME ------ -FORMAT- ----+----1----+----2----+----3----+----4 1 EMP-NUMBER 5/AN 00090 2 EMP-FIRST-NAME 15/AN EDWARD 3 EMP-MID-INIT 1/AN M 4 EMP-LAST-NAME 20/AN MARTIN 5 EMP-TITLE 30/AN AIRPLANE MANUFACTURER 7 EMP-NATL-ID-NUMBER 9/NUM 999999999 9 EMP-DOB-CENTURY 1/AN 1 11 EMP-DOB-YY 2/NUM 54 12 EMP-DOB-MM 2/NUM 10 13 EMP-DOB-DD 2/NUM 19 15 EMP-HD-CENTURY 1/AN 1 16 EMP-HIRE-DATE 6/AN 920101 17 EMP-MARITAL-STATUS 1/AN M 19 EMP-PAY-GRADE 3/AN PAY 20 EMP-LIFE-INS-WITHOLD-AMT 5/PS -3000.00 21 EMP-NATL-TAX-WITHOLD-PCT 3/PS 28.50 22 EMP-NEW-401K-WITHOLD-AMT 3/PS 0 23 EMP-REGION-TAX-WITHOLD-PCT 3/PS 25.00 24 EMP-LOCAL-TAX-WITHOLD-PCT
Steps:
1. If necessary, use the FMT command to view the data in Formatted Mode. 2. Type DOWN in the COMMAND field. 3. Press <Enter>. 4. Type RIGHT in the COMMAND field. 5. Press <Enter>. 6. Press PF3 (END) several times until the File-AID Primary Option Menu is displayed.
11-16
12-1
C ha p 12
Step:
1. From the File-AID Primary Option Menu (not shown here), select File-AID option 5 to access the Print Selection menu (Figure 12-1 on page 12-2).
12-2
Steps:
1. Type a 1 in the OPTION field to select the Print Data File utility. 2. Press <Enter>. File-AID displays the Print Data File screen as illustrated in Figure 12-2 on page 12-3.
Figure 12-1. Print Selection Menu
----------------------------
- Print in in in in
the contents of a data file: formatted mode using record layout vertical formatted mode using record layout three-line hexadecimal mode single-line character mode
Record/Layout XREF - Print the contents of a record/layout XREF: Print a record/layout XREF Print XREF with referenced record layouts Selection Criteria - Print the contents of selection criteria Record Layout Audit Trail - Print a record layout in formatted mode - Print the contents of an audit trail
3 4 5
12-3
Selection Criteria
You may use standard File-AID selection criteria to select specific records for printing. You can use existing field selection criteria (created using the Selection Criteria function) or create temporary field selection criteria (options T (temporary) or Q (quick)).
Figure 12-2. Print Data File Screen
File-AID --------------------- Print Data File -------------------------------COMMAND ===> Specify Print Information: Print format ===> F Show ===> O (F = Fmt;V = Vfmt;C = Char;H = Hex) (Format, Number, Offset or Picture)
Specify Print Dataset or HFS Path Information: Dataset or path ===> FASAMP.EMPLOYEE Member ===> (Blank or pattern for member list) Volume serial ===> Specify Record Layout and XREF Information: (S = Single; X = XREF; N = None) Record layout usage ===> S Record layout dataset ===> FASAMP.LAYOUTS Member ===> EMPLOYEE (Blank or pattern for member list) XREF dataset ===> Member ===> (Blank or pattern for member list) Specify Selection Criteria Selection criteria usage Selection dataset Member Information: ===> N ===> ===> (E=Use existing; M=Modify existing T=Create temporary; N=None) (Blank or pattern member list)
Steps:
1. Type an F in the Print format field. 2. Type an O in the Show field to request field offsets in the formatted report. 3. Verify the values in the other fields are specified as shown in Figure 12-2. If they are not the same, type over the existing values to change them. 4. Press <Enter>. File-AID displays the PRINT - JCL Specification screen where you specify the print JCL information for batch processing. This screen is shown inFigure 12-3 on page 12-4.
12-4
Steps:
1. Type SUBMIT in the COMMAND field to generate and submit the JCL to perform your print request. 2. Verify your JOB parameters and Sysout class. Use a hold class so that you can browse your report online. 3. Press <Enter>. File-AID processes your print request. You can see the results of your print request online as illustrated in Figure 12-4 on page 12-5.
Figure 12-3. PRINT - JCL Specification Screen (SUBMIT Command)
File-AID ---------------- PRINT - JCL Specification COMMAND ===> SUBMIT JCL Information for Batch Processing: Sysout class ===> *
--------------------------
JOB Statement Information: ===> //USERID9 JOB (0100,PMGT),'your name',CLASS=A, ===> // MSGCLASS=R,NOTIFY=USERID9 ===> ===>
Use JCL command to edit generated JCL Use SUBMIT command to submit batch job Use END to return to main PRINT panel without submitting job
12-5
SDSF OUTPUT DISPLAY USERID9B JOB05403 DSID 103 LINE 2 COLUMNS 01- 80 COMMAND INPUT ===> SCROLL ===> CSR 02 MAR 2001 FILE-AID 8.8 PRINT FACILITY 12:40:29 PAGE 1 File Printed Type FILE CONTENTS REPORT USERID9.FASAMP.EMPLOYEE VSAM KSDS
RECORD:
EMPLOYEE-MASTER-FILE
---- FIELD LEVEL/NAME ------- RELATIVE ----+----1----+----2----+----3----+----4 5 5 5 5 5 5 5 EMP-NUMBER EMP-LAST-NAME EMP-FIRST-NAME EMP-MID-INIT FILLER EMP-TITLE EMP-PERSONAL-INFO SYNC 10 EMP-NATL-ID-NUMBER 10 FILLER 10 EMP-DATE-OF-BIRTH 10 EMP-HIRE-DATE 10 EMP-MARITAL-STATUS 0 5 20 30 31 33 63 63 72 73 79 85 00090 MARTIN EDWARD M AIRPLANE MANUFACTURER 427890125 101954 920101 M
Step:
1. Press PF3 (END) until the File-AID Primary Option Menu is displayed.
12-6
13-1
13
C ha p 13
In Chapter 2, Browsing a Data File you created temporary selection criteria and in Chapter 7, Copying Selected PDS Members you learned about the Copy utility. In this chapter you learn how to create permanent selection criteria with the File-AID Selection utility (option 6). You then use the selection criteria in the File-AID Copy utility (option 3.3) to create test data by extracting a subset of the records of the sample inventory file (FASAMP.INVFILE) to a test file (FASAMP.INVFILE2).
Steps:
1. Enter a 6 in the OPTION field on the File-AID Primary Option Menu (not shown here). 2. Press <Enter>. File-AID displays the Selection Criteria - Dataset Specification screen as illustrated in Figure 13-1 on page 13-2.
13-2
A sample Selection dataset (FASAMP.SELCRIT) is created for you with your other training files. Create a new member "INVSEL" to select inventory file records that have a status of "AVAIL". Use record layouts to define your selection using formatted field selection criteria. When you define or maintain formatted field selection criteria members, you must specify a single record layout or an XREF member.
Figure 13-1. Selection Criteria - Dataset Specification Screen
----------------
Specify Selection Criteria Member to be Created or Edited: Selection dataset name ===> FASAMP.SELCRIT Member name ===> INVSEL (Blank or pattern for member list) Specify Record Layout and XREF Information: (S = Single; X = XREF; N = None) Record layout usage ===> S Record layout dataset Member name XREF dataset name Member name ===> FASAMP.LAYOUTS ===> INVFILE (Blank or pattern for member list) ===> ===> (Blank or pattern for member list)
------------------------------------------------------------------------------This function creates and maintains existing File-AID selection criteria. You can then apply these criteria in other functions (BROWSE, EDIT, COPY, COMPARE, and PRINT). Specify either a record layout dataset and/or an XREF dataset when creating or maintaining formatted selection criteria.
Steps:
1. Type FASAMP.SELCRIT in the selection Dataset name field. 2. Type INVSEL in the selection Member name field. If this member exists, you see the member and are able to specify and save changes. If this is a new member, you define and save a new criteria member. If you leave this field blank or use a mask (for example, MEM*), a member list is displayed from which you can select a member for criteria display and modification. 3. Type S in the Record layout usage field. 4. Type FASAMP.LAYOUTS in the Record layout dataset name field. 5. Type INVFILE in the layout Member name field. 6. Press <Enter>. File-AID displays the Selection Criteria Menu screen as illustrated in Figure 13-2 on page 13-3.
13-3
File-AID - Selection Criteria Menu - USERID9.FASAMP.S OPTION ===> 2 1 2 3 OPTIONS FORMATTED UNFORMATTED - Enter selection criteria options - Edit formatted selection criteria - Edit unformatted selection criteria
Member list description ===> SELECT AVAIL PARTS Long ===> ______________________________________________________________ Description ===> ______________________________________________________________
VIEW command to display selection criteria summary SAVE command to write selection criteria request END to save selection criteria & return to dataset specification CANCEL to cancel changes & return to dataset specification
Steps:
1. Type 2 (Formatted Criteria) in the OPTION field. 2. Type SELECT AVAIL PARTS in the Member list description field. 3. Press <Enter>.
13-4
File-AID --- Formatted Selection Criteria ------------------------------------SCROLL ===> PAGE COMMAND ===> SHOW OFFSET SC010- Valid commands are: INSERT, DELETE, REPEAT, VIEW, SAVE, CANCEL, PROFILE ---- FIELD LEVEL/NAME ------- -FORMAT- RO ----+----1----+----2----+----3----+******************************* TOP OF DATA ******************************** 1 INV-PART-NO 15/AN 2 INV-DESCRIPTION 40/AN (POS 38-40) 3 INV-UNIT-OF-MEASURE 2/AN 4 INV-UNIT-PRICE 4/PS 5 INV-STOCK-INFO(1) OCCURS 2 TIMES SYNC 18/GRP 6 INV-WAREHOUSE(1) 3/AN 7 INV-STATUS(1) 6/AN 8 INV-QTY-DATE(1) SYNC 9/GRP 9 INV-QTY-ON-HAND(1) 3/PS 10 INV-LAST-ORDER-DATE(1) 6/AN 11 INV-BO-QTY-DATE REDEFINES INV-QTY-DATE 11 INV-BO-QTY-DATE(1) SYNC 9/GRP 12 INV-QTY-BACKORDERED(1) 3/PS 13 INV-BACKORDER-DATE(1) 6/AN 5 INV-STOCK-INFO(2) 18/GRP 6 INV-WAREHOUSE(2) 3/AN (1/5) 7 INV-STATUS(2) 6/AN
Steps:
1. Type SHOW OFFSET in the COMMAND field. 2. Press <Enter>.
13-5
File-AID --- Formatted Selection Criteria ----------------- COLUMNS 00001 00111 SCROLL ===> PAGE COMMAND ===> END CRITERIA NUMBER: 1 OF 1 INVENTORY-RECORD LAYOUT LENGTH: 189 ---- FIELD NUMBER/NAME ------ COLUMNS- RO ----+----1----+----2----+----3----+******************************* TOP OF DATA ******************************** 1 INV-PART-NO 0 2 INV-DESCRIPTION 15 52 3 INV-UNIT-OF-MEASURE 55 4 INV-UNIT-PRICE 57 5 INV-STOCK-INFO(1) OCCURS 2 TIMES SYNC 61 6 INV-WAREHOUSE(1) 61 7 INV-STATUS(1) 64 EQ AVAIL 8 INV-QTY-DATE(1) SYNC 70 9 INV-QTY-ON-HAND(1) 70 10 INV-LAST-ORDER-DATE(1) 73 11 INV-BO-QTY-DATE REDEFINES INV-QTY-DATE 11 INV-BO-QTY-DATE(1) SYNC 70 12 INV-QTY-BACKORDERED(1) 70 13 INV-BACKORDER-DATE(1) 73 5 INV-STOCK-INFO(2) 79 6 INV-WAREHOUSE(2) 79 (1/5) 7 INV-STATUS(2) 82
Steps:
1. Type EQ in the RO column next to the field name INV-STATUS(1). 2. Type AVAIL in the data area to define the test "INV-STATUS(1) EQUAL TO AVAIL". 3. Type END in the COMMAND field to return to the Criteria Menu; you do not need to specify any more criteria for this example. 4. Press <Enter>.
13-6
File-AID - Selection Criteria Menu - USERID9.FASAMP.SELCRIT(INVSEL) ----------OPTION ===> END - Status 1 OPTIONS - Enter selection criteria options default 2 FORMATTED - Edit formatted selection criteria 1 sets 3 UNFORMATTED - Edit unformatted selection criteria 0 sets
Member list description ===> SELECT AVAIL PARTS____________ Long ===> ______________________________________________________________ Description ===> ______________________________________________________________
VIEW command to display selection criteria summary SAVE command to write selection criteria request END to save selection criteria & return to dataset specification CANCEL to cancel changes & return to dataset specification
Steps:
1. Type END in the OPTION field. 2. Press <Enter>. File-AID displays the Selection Criteria - Dataset Specification screen (Figure 13-6 on page 13-7) with the message: CRITERIA MEMBER ADDED, if new or CRITERIA MEMBER REPLACED, if member already exists.
13-7
Steps:
1. Enter the END command (or press PF3) to redisplay the Primary Option Menu. 2. Press <Enter>.
Figure 13-6. Selection Criteria Function. CRITERIA MEMBER ADDED Message.
Specify Selection Criteria Member to be Created or Edited: Selection dataset name ===> FASAMP.SELCRIT Member name ===> INVSEL (Blank or pattern for member list) Specify Record Layout and XREF Information: Record layout usage ===> S (S = Single; X = XREF; N = None) Record layout dataset Member name XREF dataset name Member name ===> FASAMP.LAYOUTS ===> INVFILE (Blank or pattern for member list) ===> ===> (Blank or pattern for member list)
------------------------------------------------------------------------------This function creates and maintains existing File-AID selection criteria. You can then apply these criteria in other functions (BROWSE, EDIT, COPY, COMPARE, and PRINT). Specify either a record layout dataset and/or an XREF dataset when creating or maintaining formatted selection criteria.
13-8
Steps:
1. From the File-AID Primary Option Menu (Figure 13-7), select File-AID option 3.3. 2. Press <Enter>. File-AID displays the Copy Utility screen as illustrated in Figure 13-8 on page 13-9.
Figure 13-7. File-AID Primary Option Menu. Selecting 3.3 COPY Utility.
File-AID Release 8.8 ------------OPTION ===> 3.3 0 1 2 3 5 6 7 8 9 10 C T X PARAMETERS BROWSE EDIT UTILITIES PRINT SELECTION XREF VIEW REFORMAT COMPARE CHANGES TUTORIAL EXIT -
Specify ISPF and File-AID parameters USERID Display file contents PF KEYS Create or change file contents TERMINAL File-AID/SPF extended utilities TIME Print file contents JULIAN Create or change selection criteria DATE Create or change record/layout cross reference View interpreted record layout Convert file from one format to another Compare file contents Display summary of File-AID changes Display information about File-AID Terminate File-AID and return to ISPF
Use END to terminate File-AID Online Technical Support available at: frontline.compuware.com
Copyright (c) 1995-2001, by Compuware Corporation. All rights reserved. Unpublished rights reserved under the Copyright Laws of the United States. Type LEGAL on the command line for Copyright/Trade Secret Notice.
13-9
Specifying the "FROM" and "TO" Datasets and Selection Criteria Member
The last dataset you referenced in any File-AID function or utility is automatically displayed in the FROM dataset or path field. The TO dataset or path field retains the last dataset or path you specified in the Copy utility. The Selection Criteria dataset and member you last referenced (in this case, through the Selection Criteria function) is displayed in the lower portion of the screen. You must identify the FROM dataset and the TO dataset and whether or not you want to use selection criteria (Selection criteria usage field). You can choose to run your copy online at your terminal or in batch by specifying the processing option in the Process online or batch field. In this example, specify an E in the Selection criteria usage field to use existing criteria in the online copy process.
Figure 13-8. Copy Utility Screen. Use Existing Selection Criteria.
Copy Utility
---------------------------------
Specify "FROM" Dataset or HFS Path Information: Dataset or path ===> FASAMP.INVFILE Volume serial ===> (If not cataloged) Specify "TO" Dataset or HFS Path Information: Dataset or path ===> FASAMP.INVFILE2 Volume serial ===> (If not cataloged) (OLD, MOD, NEW) Disposition ===> OLD Specify Execution Information: Process online or batch ===> O
(O = Online; B = Batch)
Specify Selection Criteria Information: (E = Existing; T = Temporary; M = Modify; Q = Quick; N = None) Selection criteria usage ===> E Selection dataset name ===> FASAMP.SELCRIT Member name ===> INVSEL (Blank or pattern for member list)
Steps:
1. Type FASAMP.INVFILE in the "FROM" Dataset or path field. 2. Type FASAMP.INVFILE2 in the "TO" Dataset or path field. 3. Type OLD in the Disposition field. 4. Type an O in the Process online or batch field. If you specify to run the copy in batch, File-AID displays the standard JCL Specification screen where you can define the batch processing options. 5. Type an E in the Selection criteria usage field. Note: Make sure you always check this field before you press Enter. The value last used remains set from session to session.
6. Press <Enter>. File-AID executes the copy process immediately and returns with a confirmation message, 17 RECORDS COPIED.
13-10
File-AID --------------------- Copy Utility -------------- 17 RECORDS COPIED COMMAND ===> END ER050-41 records were read from USERID9.FASAMP.INVFILE Specify "FROM" Dataset or HFS Path Information: Dataset or path ===> FASAMP.INVFILE Volume serial ===> (If not cataloged) Specify "TO" Dataset Information: Dataset or path ===> FASAMP.INVFILE2 Volume serial ===> Disposition ===> OLD Specify Execution Information: Process online or batch ===> O
(O = Online; B = Batch)
Specify Selection Criteria Information: (E = Existing; T = Temporary; Selection criteria usage ===> E M = Modify; Q = Quick; N = None) Selection dataset name ===> FASAMP.SELCRIT Member name ===> INVSEL (Blank or pattern for member list)
Steps:
1. Press PF1 (HELP) to view the long message associated with 17 RECORDS COPIED.
ER050-41 records were read from USERID9.FASAMP.INVFILE
2. Enter the END command (press PF3) until the File-AID Primary Option Menu is displayed. (Optional) Use File-AID Browse to view the FASAMP.INVFILE2 dataset in vertical formatted mode using the FASAMP.LAYOUTS record layout member INVFILE. Check that all INV-STATUS (1) fields have a value of AVAIL in them.
14-1
C ha p 14
With the XREF function, you can create a permanent member of a PDS that contains the rules for selecting a record layout. The rules are based on the data conditions found in each record being processed by any of the following File-AID functions: Browse - formatted display mode and FPRINT command Edit - formatted display mode and FPRINT command Print - formatted data record printing Selection - formatted selection criteria specification Reformat - source layout and record selection Compare - formatted field comparison and differences reporting. XREF layouts are compiled when needed by the function. In addition to defining layout member selection rules for multi-record type files, the XREF function can also be used to describe the rules for selecting layouts for a file with records that require different layouts to define each of several possible segments of one record. The procedure for defining segmented record XREF members is discussed in Chapter 16, Segmented Record File Layout Automation. The XREF function uses the actual record layouts themselves to define the rules for selecting a layout when the formatted display of a data record is requested in any FileAID function. Using a formatted display of a record layout as a template, you establish layout selection rules by entering data value(s) in the record type field(s). Optionally, you can specify layout selection conditions with unformatted criteria. XREF layout selection criteria specification is similar to defining record selection criteria in other functions of File-AID (for example, Selection and Search/Update).
Steps:
1. From the File-AID Primary Option Menu, select option 7. 2. Press <Enter>. File-AID displays the Record Layout Cross Reference screen as illustrated in Figure 14-1.
14-2
01 Level Name
ORDER-LINE-DATA-PO ORDER-LINE-DATA-SC OUTSIDE-VENDOR-WORK-ORDER INTERNAL-WORK-ORDER
Field 1
ORDER-TYPE
Field 2
CONTRACT-INDICATOR
PO SC WO WO
Notice that two of the layouts are stored in the same member (ORDERWO) of the sample layouts library (FASAMP.LAYOUTS). You are shown how to identify each of the two structures independently.
Figure 14-1. Record Layout Cross Reference (XREF) Function Entry Screen
-----------------------
Specify Cross Reference Dataset to be Created or Edited: XREF dataset name ===> FASAMP.XREF Member name ===> ORDERXRF (Blank or pattern for member list) Specify Record Layout Information: Record layout dataset ===> FASAMP.LAYOUTS
------------------------------------------------------------------------------This function creates and maintains existing File-AID Record Layout Cross References. These XREFs are used to match record layouts to data records in File-AID functions that use formatting.
Steps:
1. Type FASAMP.XREF in the XREF Dataset name field under the Specify Cross Reference Dataset information section. If you want to create a new XREF dataset, the attributes are:
DSORG=PO,RECFM=VB,LRECL=300,BLKSIZE=x (x = 304 or more)
You may store XREF members and permanent selection criteria members in the same dataset. Any entry you make here is reflected on all File-AID screens where an XREF dataset is permitted. 2. Type ORDERXRF in the Member name field.
14-3
You are creating a new member, ORDERXRF. You can enter the name of an existing member. You can also leave the field blank or specify a pattern to display a list of existing XREF members from which you can select. The member you identify here is reflected on all File-AID screens where an XREF member is permitted. 3. Type FASAMP.LAYOUTS in the Record layout dataset field. This is the name of the library containing the record layouts you reference during XREF creation and XREF usage. The last referenced layout library entered on any FileAID screen is shown as a default. Any entry you make here is reflected on all File-AID screens where a record layout library is referenced. 4. Press <Enter>. File-AID displays the Define XREF screen as illustrated in Figure 14-2.
File-AID ----- Define XREF - ORDERXRF --------------------- ROW 1 TO 12 OF 15 COMMAND ===> SCROLL ===> PAGE XR105-Valid line CMDS: C/M, B/A, I, R, D, EX, S, SF, SU, DEF, BAS, SEG Member list description ===> ______________________________ Long ===> ______________________________________________________________ Description ===> ______________________________________________________________ Generated filler length ===> 0 Cmd --S__ ___ ___ ___ ___ ___ ___ ___ ___ ___ ___ ___ (0 to suppress filler)
Member Beginning Data-Name Description Status ---------- ------------------------------ --------------- ---------------ORD*_______ ______________________________ _______________ __________ ______________________________ _______________ __________ ______________________________ _______________ __________ ______________________________ _______________ __________ ______________________________ _______________ __________ ______________________________ _______________ __________ ______________________________ _______________ __________ ______________________________ _______________ __________ ______________________________ _______________ __________ ______________________________ _______________ __________ ______________________________ _______________ __________ ______________________________ _______________
The optional Beginning Data-Name field is provided for cases when the referenced source layout library member contains multiple 01-level data structures, or is a source language program (COBOL or PL/I) containing an embedded data structure that you want to use for formatting your data records. File-AID examines the source code for the data-name and extracts the data structure at the level of the data-name specified, stopping when an equal or lower level data structure or other non-data declarative source statement is encountered.
14-4
If you do not specify a value in the Beginning Data-Name field for a source member with multiple 01-level data structures, File-AID displays a list of structures from which you can select. Whenever File-AID is unable to clearly determine the structure to use (for example the layout member is a source program), the Source Statement Selection screen is displayed to capture the starting and ending data names or line numbers of the source statements which define the data structure you want to use. The EX (Extract) layout line command is provided to give you direct access to the Source Statement Selection screen to enable source data structure extraction from within a program when starting-data-name or line-number is not adequate for isolating the data structure to use for formatting. Use the Description field to document your comments to help you identify each of the layout usage conditions you define for each layout member. Fields at the top half of the screen capture information about this XREF to help with future identification. One of these fields is the Generated filler length field, which can be used to request that File-AID automatically generate a filler field before each of the layouts when presenting formatted data displays.
Steps:
1. Type S in the Cmd column on the first line of the scrollable member entry area. 2. Type ORD* in the Member name column. A full member name is expected in this field. If you specify an * (asterisk), File-AID displays a list of all members of the layout library. If you leave the member name blank or specify a pattern, File-AID presents the PDS Processing Options (PPO) screen to help you filter the list of members. In this example you specify a pattern (ORD*). The pattern is carried over to the "Member mask" field of the PPO screen. 3. Press <Enter>. File-AID displays the PDS Processing Options screen as illustrated in Figure 14-3 on page 14-6.
14-5
The S (Select Formatted, alias SF) or the SU (Select Unformatted) line command is required for all member entries. A full member name or a pattern is required in the Member field. Editing line commands are provided to help you to build complex XREF members. The editing line commands include: A (After) B (Before) C (Copy a line to A or B marker) D (Delete line) I (Insert) M (Move) R (Repeat)
There are three types of layout members. The layout member type is identified by its status as displayed in the Status column. The status of a layout member is established in one of two ways. Either File-AID defines the status (the default) or you can explicitly set the status of a layout member (invoke the BAS or SEG line command) during XREF definition. There are three status types and commands, including: BAS (Status BASE). A BASE layout defines the beginning of the record and at least one condition has been specified with the Formatted (S) or Unformatted (SU) commands. SEG (Status SEGMENT). A SEGMENT layout defines a segment of the record following the last
displayed BASE or SEGMENT. At least one condition (typically at a position relative to the end of the last displayed BASE or SEGMENT) has been specified with the Formatted (S) or Unformatted (SU) commands.
DEF (Status DEFAULT-BASE). A DEFAULT-BASE layout defines the beginning of the record when
no other BASE record conditions can be matched. No conditions are allowed for a DEFAULTBASE. DEF is not allowed if status is BASE or SEGMENT, you must use the S or SU line commands and delete all conditions to make a layout a DEFAULT-BASE.
Note: Only one layout member may be designated as a DEFAULT-BASE. The DEFAULT-BASE must be the last (or only) base layout in the XREF. Description fields are optional and provided to assist with layout identification.
14-6
File-AID ----------------- PDS Processing Options ----------------------------COMMAND ===> Layout Dataset: USERID9.FASAMP.LAYOUTS
Specify Member Selection Options (Blank for All Members) Member name mask ===> ORD* Member name range ===> to ===> Last modified userid ===> to ===> Creation date ===> to ===> Modification date ===> to ===>
(YY/MM/DD) (YY/MM/DD)
Step:
1. Press <Enter>. File-AID displays the RECORD LAYOUT FILE MEMBER LIST screen, showing all members starting with ORD as illustrated in Figure 14-4 on page 14-7.
14-7
File-AID Member Select - USERID9.FASAMP.LAYOUTS ------------- ROW 1 TO 3 OF 3 COMMAND ===> SCROLL ===> CSR S NAME VV.MM CREATED CHANGED SIZE INIT MOD ID S ORDERPO ORDERSC ORDERWO ************************** END OF SELECTION CRITERIA **************************
Steps:
1. Type S in the input area just left of member name ORDERPO. 2. Press <Enter>. File-AID displays the Formatted XREF Definition screen showing the ORDERPO member layout, as illustrated in Figure 14-5 on page 14-8.
14-8
File-AID --- Formatted XREF Definition -------------- LAYOUTS HAVE BEEN LOADED COMMAND ===> SCROLL ===> CSR CRITERIA NUMBER: 1 OF 1 ORDER-LINE-DATA-PO LAYOUT LENGTH: 184 ---- FIELD NUMBER/NAME ------ COLUMNS- RO ----+----1----+----2----+----3----+******************************* TOP OF DATA ******************************** 1 RECORD-LENGTH 0 2 ORDER-NO 2 3 ORDER-LINE-KEY SYNC 8 4 LINE-NUMBER 8 5 ORDER-TYPE 10 6 LINE-STATUS 12 7 PART-NO 19 8 DESCRIPTION 25 9 UNIT-OF-MEASURE 55 10 PURCHASE-ORDER-INFO SYNC 57 11 PO-CODE 57 12 PO-NUMBER 61 13 PO-COMPANY 73 14 PO-VENDOR-NUMBER 103 15 PO-VENDOR-CODE 108 16 FILLER 113 17 ORDER-QUANTITIES SYNC 143 18 QTY-ORDERED 143 19 QTY-BACKORDERED 146
File-AID --- Formatted XREF Definition ----------------COMMAND ===> SHOW OFFSET CRITERIA NUMBER: 1 OF 1 ORDER-LINE-DATA-PO ---- FIELD NUMBER/NAME ------ COLUMNS- RO ----+----1----+----2----+----3----+******************************* TOP OF DATA ******************************** 1 RECORD-LENGTH 1
Steps:
1. If COLUMNS already appears in the center portion of the screen, you may skip these steps. 2. Type SHOW OFFSET in the COMMAND field. 3. Press <Enter>. File-AID redisplays the Formatted XREF Definition screen showing the offsets of each field, as illustrated in Figure 14-7 on page 14-9.
14-9
Steps:
1. Type END in the COMMAND field. 2. Type EQ (equal) in the RO column to the right of the ORDER-TYPE field. 3. Type PO in the data value area to the right of the RO column for the ORDER-TYPE field. 4. Press <Enter>. File-AID captures your condition and returns to the Define XREF screen, as illustrated inFigure 14-8 on page 14-10.
Figure 14-7. Formatted XREF Definition. Specifying the Selection Condition.
File-AID --- Formatted XREF Definition -------------------- COLUMNS 00001 00149 SCROLL ===> PAGE COMMAND ===> END CRITERIA NUMBER: 1 OF 1 ORDER-LINE-DATA-PO LAYOUT LENGTH: 184 ---- FIELD NUMBER/NAME ------ COLUMNS- RO ----++----1----+----2----+----3----+******************************* TOP OF DATA ********************************* 1 RECORD-LENGTH 1 2 ORDER-NO 3 3 ORDER-LINE-KEY SYNC 9 4 LINE-NUMBER 9 5 ORDER-TYPE 11 EQ PO 6 LINE-STATUS 13 7 PART-NO 20 8 DESCRIPTION 26 9 UNIT-OF-MEASURE 56 10 PURCHASE-ORDER-INFO SYNC 58 11 PO-CODE 58 12 PO-NUMBER 62 13 PO-COMPANY 74 14 PO-VENDOR-NUMBER 104 15 PO-VENDOR-CODE 109 16 FILLER 114 17 ORDER-QUANTITIES SYNC 144 18 QTY-ORDERED 144 19 QTY-BACKORDERED 147
14-10
File-AID ----- Define XREF - ORDERXRF --------------------COMMAND ===> Member list description ===> ______________________________
Long ===> ______________________________________________________________ Description ===> ______________________________________________________________ Generated filler length ===> 0 Cmd --___ SU_ ___ ___ ___ ___ ___ ___ ___ ___ ___ ___ Member ---------ORDERPO ORDERSC___ __________ __________ __________ __________ __________ __________ __________ __________ __________ __________ (0 to suppress filler) Description --------------_______________ _______________ _______________ _______________ _______________ _______________ _______________ _______________ _______________ _______________ _______________ _______________ Status ---------------BASE
Beginning Data-Name -----------------------------ORDER-LINE-DATA-PO ______________________________ ______________________________ ______________________________ ______________________________ ______________________________ ______________________________ ______________________________ ______________________________ ______________________________ ______________________________ ______________________________
Steps:
1. Type SU in the Cmd column on the second line of the scrollable member entry area. 2. Type ORDERSC in the Member name column on the second line. 3. Press <Enter>. File-AID displays the Unformatted XREF Definition screen, as illustrated in Figure 14-9 on page 14-11.
14-11
Use END to continue, CANCEL to return to main screen. Record Layout Member: Beginning Data Name: Cmd --___ ___ ___ ___ ___ ___ ___ ___ ___ ___ ___ ___ ___ ___ AND /OR Position Length --- -------- -----_____ 11___ AND _____ _____ AND _____ _____ AND _____ _____ AND _____ _____ AND _____ _____ AND _____ _____ AND _____ _____ AND _____ _____ AND _____ _____ AND _____ _____ AND _____ _____ AND _____ _____ AND _____ _____ ORDERSC ORDER-LINE-DATA-SC RO -EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ EQ Data Value ---------------------------------------------------SC__________________________________________________ ____________________________________________________ ____________________________________________________ ____________________________________________________ ____________________________________________________ ____________________________________________________ ____________________________________________________ ____________________________________________________ ____________________________________________________ ____________________________________________________ ____________________________________________________ ____________________________________________________ ____________________________________________________ ____________________________________________________
Steps:
1. Type END on the COMMAND line. 2. Type 11 in the Position column on the first input line. 3. Type EQ (equal) in the RO column on the first input line. 4. Type SC in the data value column to the right of the EQ on the first input line. 5. Press <Enter>. File-AID captures your condition and returns to the Define XREF screen, as illustrated in Figure 14-10 on page 14-13.
14-12
The value you specify in the Position field can be a relative position by using one of the following Position values: *n (asterisk "n") where n represents a byte of data relative to data record byte 1. The *n notation is used for SEG (segment) type layouts when the determination of the presence of a segment is based on a data field in the base portion of the record rather than the segment itself. (minus "n") where n represents a byte of data relative to the end of the currently displayed layout. The -n notation is used for SEG (segment) type layouts when the determination of the presence and format of the next segment of record data is based on a data field in the currently displayed segment (or base) portion of the record rather than the next segment itself. (plus n) where n represents a byte of data beyond the end of the currently displayed layout. The+n notation is implied when no special character (+, -, *) precedes a Position value for SEGMENT status layouts. With +n or n alone, the determination of the presence and format of the next segment of record data is based on a data field in the next segment itself.
-n
+n
Valid line commands include: A (After) B (Before) C (Copy a line to A or B marker) D (Delete line) I (Insert) M (Move) R (Repeat).
Use the CANCEL command to stop unformatted XREF criteria processing and return to the Define XREF entry screen.
14-13
File-AID ----- Define XREF - ORDERXRF --------------------COMMAND ===> Member list description ===> ______________________________
Long ===> ______________________________________________________________ Description ===> ______________________________________________________________ Generated filler length ===> 0 Cmd --___ ___ S _ ___ ___ ___ ___ ___ ___ ___ ___ ___ Member ---------ORDERPO ORDERSC ORDERWO___ __________ __________ __________ __________ __________ __________ __________ __________ __________ (0 to suppress filler) Description --------------_______________ _______________ _______________ _______________ _______________ _______________ _______________ _______________ _______________ _______________ _______________ _______________ Status ---------------BASE BASE
Beginning Data-Name -----------------------------ORDER-LINE-DATA-PO ORDER-LINE-DATA-SC ______________________________ ______________________________ ______________________________ ______________________________ ______________________________ ______________________________ ______________________________ ______________________________ ______________________________ ______________________________
Steps:
1. Type S in the Cmd column on the third line of the scrollable member entry area. 2. Type ORDERWO in the Member name column on the third line. 3. Press <Enter>.
14-14
File-AID ---- LIST OF AVAILABLE RECORD LAYOUTS -------------- ROW 1 TO 2 OF 2 COMMAND ===> SCROLL ===> CSR Member S Nbr name 01-level Name Status ----- -------- ----------------------------------------------------1 ORDERWO INTERNAL-WORK-ORDER 2 ORDERWO OUTSIDE-VENDOR-WORK-ORDER S ************************** END OF SELECTION CRITERIA **************************
Steps:
1. Type S in the S column just left of member number 2, member name ORDERWO with an 01-level Name of OUTSIDE-VENDOR-WORK-ORDER. 2. Press <Enter>. File-AID displays the Formatted XREF Definition screen showing the ORDERWO members structure for OUTSIDE-VENDOR-WORK-ORDER layout, as illustrated in Figure 14-12 on page 14-15.
14-15
File-AID --- Formatted XREF Definition ---------------------------------------SCROLL ===> PAGE COMMAND ===> END SC010- Valid commands are: INSERT, DELETE, REPEAT, VIEW, SAVE, CANCEL, PROFILE ---- FIELD NUMBER/NAME ------ COLUMNS RO ----+----1----+----2----+----3----+******************************* TOP OF DATA ******************************** 1 RECORD-LENGTH 1 2 ORDER-NO 3 3 ORDER-LINE-KEY SYNC 9 4 LINE-NUMBER 9 5 ORDER-TYPE 11 EQ WO 6 LINE-STATUS 13 7 PART-NO 20 8 DESCRIPTION 26 9 CONTRACT-INDICATOR 56 EQ OV 10 UNIT-OF-MEASURE 58 11 VENDOR-INFO SYNC 60 12 VENDOR-NUMBER 60 13 VENDOR-NAME 65 14 VENDOR-AREA-CODE 85 15 VENDOR-TELEPHONE 88 16 VENDOR-START-DATE 95 17 VENDOR-COMPLETE-DATE 101 18 FILLER 107
Steps:
1. Type END in the COMMAND field. 2. Type EQ (equal) in the RO column to the right of the ORDER-TYPE field. 3. Type WO in the data value area to the right of the RO column for the ORDER-TYPE field. 4. Type EQ (equal) in the RO column to the right of the CONTRACT-INDICATOR field. 5. Type OV in the data value column to the right of the RO column for the CONTRACT-INDICATOR field. Multiple tests within one criteria are ANDed together. 6. Press <Enter>. File-AID captures your condition and returns to the Define XREF screen, as illustrated inFigure 14-13 on page 14-16.
14-16
File-AID ----- Define XREF - ORDERXRF --------------------COMMAND ===> Member list description ===> ______________________________
Long ===> ______________________________________________________________ Description ===> ______________________________________________________________ Generated filler length ===> 0 Cmd --___ ___ ___ ___ ___ ___ ___ ___ ___ ___ ___ ___ Member ---------ORDERPO ORDERSC ORDERWO ORDERWO __________ __________ __________ __________ __________ __________ __________ __________ (0 to suppress filler) Description --------------_______________ _______________ _______________ _______________ _______________ _______________ _______________ _______________ _______________ _______________ _______________ _______________ Status ---------------BASE BASE BASE
Beginning Data-Name -----------------------------ORDER-LINE-DATA-PO ORDER-LINE-DATA-SC OUTSIDE-VENDOR-WORK-ORDER INTERNAL-WORK-ORDER ______________________________ ______________________________ ______________________________ ______________________________ ______________________________ ______________________________ ______________________________ ______________________________
Steps:
1. Leave the Cmd column blank. 2. Type ORDERWO in the Member Name column on the fourth line. 3. Type INTERNAL-WORK-ORDER in the Beginning Data-Name column. 4. Press <Enter>. File-AID redisplays the Define XREF screen with the fourth line marked with a status of DEFAULT-BASE as illustrated in Figure 14-14 on page 14-17.
14-17
File-AID ----- Define XREF - ORDERXRF --------------------COMMAND ===> END Member list description ===> XREF FOR ORDER FILE
Long ===> ______________________________________________________________ Description ===> ______________________________________________________________ Generated filler length ===> 0 Cmd --___ ___ ___ ___ ___ ___ ___ ___ ___ ___ ___ ___ Member ---------ORDERPO ORDERSC ORDERWO ORDERWO __________ __________ __________ __________ __________ __________ __________ __________ (0 to suppress filler) Description --------------_______________ _______________ _______________ ______________ _______________ _______________ _______________ _______________ _______________ _______________ _______________ _______________ Status ---------------BASE BASE BASE DEFAULT BASE
Beginning Data-Name -----------------------------ORDER-LINE-DATA-PO ORDER-LINE-DATA-SC OUTSIDE-VENDOR-WORK-ORDER INTERNAL-WORK-ORDER ______________________________ ______________________________ ______________________________ ______________________________ ______________________________ ______________________________ ______________________________ ______________________________
Steps:
1. Type END in the COMMAND field. 2. Type XREF FOR ORDER FILE in the Member list description field. 3. Press <Enter>. File-AID saves your new member ORDERXRF in the sample dataset FASAMP.XREF and returns to the Record Layout Cross Reference screen, as illustrated inFigure 14-15 on page 14-18.
14-18
Specify Cross Reference Dataset to be Created or Edited: XREF dataset name ===> FASAMP.XREF Member name ===> ORDERXRF (Blank or pattern for member list) Specify Record Layout Information: Record layout dataset ===> FASAMP.LAYOUTS
------------------------------------------------------------------------------This function creates and maintains existing File-AID Record Layout Cross References. These XREFs are used to match record layouts to data records in File-AID functions that use formatting.
Steps:
1. Type END in the COMMAND field. 2. Press <Enter>. File-AID returns to the Primary Option Menu screen, as illustrated in Figure 14-17 on page 14-20.
14-19
Specify Record Layout and XREF Information: Record layout usage ===> X (S = Single; X = XREF; N = None) Record layout dataset ===> FASAMP.LAYOUTS Member ===> (Blank or pattern for member list) XREF dataset ===> FASAMP.XREF Member ===> ORDERXRF (Blank or pattern for member list)
Use the Record layout usage field to indicate whether you are using a single record layout (S), an XREF (X), or no layouts (N) to format your data records. The last XREF dataset and member name referenced in the XREF utility is automatically transferred to all File-AID screens that contain an XREF dataset name field. If you specify Record layout usage X (use XREF), you must enter the valid record layout dataset name that contains the source layout members referenced in the XREF dataset member. The Record layout member name field is not used and may be left blank when using an XREF.
14-20
Steps:
1. Type 1 in the OPTION field. 2. Press <Enter>. File-AID displays the Browse - Dataset Specification screen, as illustrated inFigure 14-18 on page 14-21.
Figure 14-17. File-AID Primary Option Menu. Starting a Browse Session (Select Option 1).
File-AID Release 8.8 ------------OPTION ===> 1 0 1 2 3 5 6 7 8 9 10 C T X PARAMETERS BROWSE EDIT UTILITIES PRINT SELECTION XREF VIEW REFORMAT COMPARE CHANGES TUTORIAL EXIT -
Specify ISPF and File-AID parameters USERID Display file contents PF KEYS Create or change file contents TERMINAL File-AID/SPF extended utilities TIME Print file contents JULIAN Create or change selection criteria DATE Create or change record/layout cross reference View interpreted record layout Convert file from one format to another Compare file contents Display summary of File-AID changes Display information about File-AID Terminate File-AID and return to ISPF
Use END to terminate File-AID Online Technical Support available at: frontline.compuware.com
Copyright (c) 1995-2001, by Compuware Corporation. All rights reserved. Unpublished rights reserved under the Copyright Laws of the United States. Type LEGAL on the command line for Copyright/Trade Secret Notice.
14-21
----------------------
Specify Browse Information: Dataset name or HFS path ===> FASAMP.ORDRFILE Member ===> (Blank or pattern for member list) Volume serial ===> (If dataset is not cataloged)
Specify Record Layout and XREF Information: Record layout usage ===> X (S = Single; X = XREF; N = None) Record layout dataset ===> FASAMP.LAYOUTS Member ===> ________ (Blank or pattern for member list) XREF dataset ===> FASAMP.XREF Member ===> ORDERXRF (Blank or pattern for member list) Specify Selection Criteria Selection criteria usage Selection dataset name Member name Information: (E = Existing; T = Temporary; M = Modify; Q = Quick; N = None) ===> N ===> FASAMP.SELCRIT ===> INVSEL (Blank or pattern for member list)
Steps:
1. Type F (formatted) in the Browse Mode field. 2. Type FASAMP.ORDRFILE in the Browse dataset field. 3. Type X in the Record layout usage field. Note: Vertical format (VFMT command or Browse mode V) is not allowed when using an XREF.
4. Type FASAMP.LAYOUTS in the Record layout dataset field. 5. Blank out the record layout Member field. 6. Verify the XREF dataset is FASAMP.XREF. 7. Verify the XREF member is ORDERXRF. Note: If you did not complete the steps described earlier in this chapter to build a new XREF member, you may use a sample member name, ORDRFILE, for your XREF member name.
8. Make sure that the value of the Selection criteria usage field is N. 9. Press <Enter>. File-AID displays the first record of the ORDRFILE file, which is formatted with the ORDER-LINE-DATA-PO layout. The XREF selected this layout because the the data value in the ORDER-TYPE field for record 1 is PO. This record is shown in Figure 14-19 on page 14-22.
14-22
Step:
1. Type FWD in the COMMAND field of the formatted screen and press <Enter>. Or, Press PF11 (RIGHT, FWD). (PF11 is assigned to the RIGHT command by default.) FileAID displays the next record, record 2, of the ORDRFILE file formatted with the INTERNAL-WORK-ORDER layout, because the data value in the ORDER-TYPE field is WO, but the CONTRACT-INDICATOR is not OV. Record number 2 is illustrated in Figure 14-20 on page 14-23.
Note:
If you use the FIND /field-name or FIND /field-number syntax when you have an XREF, only those record types that match the XREF conditions for the current layout are searched for matching data.
Works the same as the FIND command. Relocates to a specific record using the key fields to specify the desired key value. Locates a record by record number.
14-23
The FPRINT n command automatically invokes XREF logic for each subsequent record printed. XREF logic is also triggered whenever a record is selected for formatted mode from the CHARACTER mode. You may manually select a different layout from among all layouts referenced in the XREF by issuing the USE command.
FILE-AID - BROWSE - USERID9.FASAMP.ORDRFILE ------------------------- COL 1 99 SCROLL ===> PAGE COMMAND ===> FPRINT ALL RECORD: 2 INTERNAL-WORK-ORDER LENGTH: 160 ---- FIELD NUMBER/NAME ------ COLUMNS- ----+----1----+----2----+----3----+----4 1 RECORD-LENGTH 1 160 2 ORDER-NO 3 AA2222 3 ORDER-LINE-KEY SYNC 9 4 LINE-NUMBER 9 03 5 ORDER-TYPE 11 WO 6 LINE-STATUS 13 OPEN 7 PART-NO 20 C7777L 8 DESCRIPTION 26 XTRA XXXX COAXIAL CABLE 9 CONTRACT-INDICATOR 56 IN 10 UNIT-OF-MEASURE 58 EA 11 WORK-ORDER-INFO SYNC 60 12 WO-NUMBER 60 AA-256 13 WO-STATION 66 SST 14 WO-PLANT 72 NW22 15 WO-ORDER-DATE 76 880901 16 WO-START-DATE 82 880902 17 WO-COMPLETE-DATE 88 18 WORK-ORDER-QUANTITIES SYNC 94 19 QTY-TO-MAKE 94 12 Enter CHAR for character mode, VFMT for vertical format mode
Steps:
1. Type FPRINT ALL in the COMMAND field of the formatted screen. 2. Press <Enter>. File-AID displays the Print Parameters screen as illustrated in Figure 14-21 on page 14-24.
14-24
Print Parameters
-------------------------------
Enter One of the Following Optional Destinations: Destination printer - - - OR - - External JES Node ID Target VM/TSO ident - - - OR - - Sysout writer name - - - OR - - Print dataset name Disposition Volume serial ===> ===> ===> ===> ===> ===> OLD ===> (Local or remote printer) (Predefined JES Node and symbolic ID of intended receiver of output) (Installation assigned output writer) (DSORG=PS, RECFM=V, LRECL=125) (NEW, SHR, MOD, OLD)
Steps:
1. Type a valid Sysout "hold" class in the Sysout class field. 2. Press <Enter>. 3. Use standard output browsing facilities to review your FPRINT report. 4. Exit File-AID by entering the RETURN command.
15-1
C ha p 15
File-AID/Batch is a data manipulation program that consolidates the functions of many standard IBM utilities. Rather than learn JCL and the control syntax of several different utilities, you can use one tool, File-AID/Batch, to perform the following tasks: Process data on tape or in very large, multi-volume disk files. Selectively edit, copy, reformat, total, compare, and print records contained in any standard MVS file type. Define a file processing task that may be run multiple times. Perform many functions of the following utilities: IEBGENER, IDCAMS (REPRO), IEBPTPCH, IEHMOVE, IEBCOPY, IEBISAM, IEBDG, IEHPROGM, IEBUPDTE. Generate DASD reports of VTOC information. Copy records or portions of records from one dataset type to another, including copying of PDS members based on ISPF statistics. Selectively print data records using record layouts, enabling you to tailor the format of the output to meet your specific data requirements. Change record format by reformatting any type of dataset (that is, enlarge data fields, add new data fields). Process datasets selectively to view or update information. Recognize logical JCL continuations for JCL changes and search conditions. Accumulate totals to verify reports. Read all VSAM and sequential datasets forward or backward. Reformat multiple record type files in one pass. Create a complete subset of related files for testing. Check control statement syntax online and execute actions in the foreground with File-AIDs Interactive utility (option 3.8). Generate the JCL required to submit a File-AID/Batch job or any other non File-AID batch utility with File-AIDs Batch Submit utility (option 3.9).
15-2
Dataset Identifier $$DD01 Function Name COPY Selection, Action, and Control Parameters IN=100,IF=(1,EQ,C'A'),DUMP=0 Comments COPY AND PRINT A RECS
Dataset Identifier
The first element on a File-AID/Batch control statement is the dataset identifier. This identifier connects an input dataset DD to a function that you want to perform. The dataset identifier begins in location 1 of the control statement as follows:
$$DDxx
where xx is a number from 01 to 99 that corresponds to a matching //DDxx DD JCL statement. The xx is also used to match the optional //DDxxO DD (output dataset) JCL statement.
Function Name
Functions identify the action you want to perform on the input dataset. Most functions can be abbreviated to save keystrokes. Some functions accept modifiers (ALL, MEM, BACK) that expand or modify the processing of a function. See the File-AID/MVS Batch Reference Manual for a complete description of any of the following functions:
Function APRINT COMPARE CONVERT COPY DROP DUMP FPRINT LIST LMODDIR LMODMAPA LMODMAPN PRINT REFORMAT RLPRINT SCPRINT Description Prints the audit trail file in formatted, character, or hexadecimal format. Compares the contents of two files. Converts existing File-AID Release 6.5 and below selection tables and Release 7 XREFs to File-AIDs Release 8 new XREF format. Also converts Release 7 saved selection criteria to Release 8 selection criteria format. Copies data selectively or nonselectively. Eliminates unwanted records from a dataset while copying it. Prints datasets in vertical hexadecimal format. Prints one or more records in formatted mode. Prints alphanumeric data. Lists directory entry(ies) of member(s). Lists modules (maps CSECTs) in address order. Lists modules (maps CSECTs) in name order. Prints alphanumeric data and labels each record with its record number and RBA. Reformats data as it is being copied. Prints a COBOL or PL/I record layout displaying the field level, field name, format, field number, start location, end location, and field length. Prints the dataset containing selection criteria created from File-AID online functions.
Using File-AID/Batch
15-3
Function SPACE TALLY UPDATE USER VPRINT VTOCDSN VTOCINFO VTOCMAP XMLGEN XRPRINT
Description Moves the current record pointer through the input file. Allows selection parameters to be combined with ACCUM parameters to provide audit-type totals for files. Alters records on a file. Performs a copy function that provides greater control over the writing of output records and datasets. Prints records in a vertically formatted report using the specified COBOL or PL/I record layout. Displays VTOC summary information and dataset names in alphabetical sequence based on the specified parameters. Displays volume information based on the specified parameters. Displays volume information and datasets in address location sequence based on the specified parameters. The XMLGEN function creates XML documents from existing files using COBOL or PL/I layout fields as the tag names. Prints record layout cross reference (XREF) dataset.
Description Specifies the processing of records based on their contents. AND, ELSE, IF, ORIF. Indicates movement or change of data. DFLT_WRITE, EDIT, EDITALL, MOVE, READNEXT, REPL, REPLALL, TYPRUN, WRITE. Defines basic environment conditions during execution. ABEND, AMODE, CEM, CHANGED, CHARSET, COPTNS, CREATED, DSNAME, ERRS, EXPAND, FEOV, FIELDS, FORM, IOEXIT, KEY, KEYINFO, LANGTYPE, LAYOUT, LINKDATE, LPI, MAP, MAXENT, MAXOUT, MBRNAME, MEMBER, MEMBERS, NEWMEM, NEWMEMS, PADCHAR, PANSTAT, PDSSTAT, PRTRECS, RBA, RDW, REFOUT, RLM, RMODE, RRN, SHOW, STOP, TYPE, UNIT, USERID, VOLSER, VOLSTAT. Places record count limits on the datasets being processed. DROP, IN, OUT, SELECT. Provides a hardcopy report of records being processed. ACCUM, DUMP, FPRINT, LIST, PRINT, RLPRINT, VPRINT.
CONTROL
LIMIT PRINT
15-4
The Interactive utility is located on File-AIDs Extended Utilities menu (option 3) as utility number 8.
Step:
1. From the File-AID Primary Option Menu (not shown here), select File-AID option 3.8 to access the Interactive Utility entry screen (Figure 15-1 on page 15-5).
Using File-AID/Batch
15-5
File-AID -----------------COMMAND ===> Input Dataset Information: Dataset name Volume serial Password
Interactive Utility
-----------------------------
===> FASAMP.INVFILE ===> (If not cataloged) ===> (If password protected)
"TO" Dataset Information for Copy Functions: Dataset name ===> Volume serial ===> (If not cataloged) Disposition ===> OLD (MOD or OLD) Password ===> (If password protected) Optional Control Dataset Information: Dataset name ===> Volume serial ===>
File-AID Run Options: Allow File-AID prompting ===> Y (Y = Yes; N = No) Include record information ===> N (Y = Yes; N = No) Replace like named members ===> Y (Y = Yes, N = No) Use ENTER to begin interactive mode; END key to cancel function
Steps:
1. Type FASAMP.INVFILE in the Dataset name field. 2. Press <Enter>. File-AID/Batch starts as a foreground task, and a Control Statement Entry screen is displayed (Figure 15-2 on page 15-6).
15-6
Steps:
1. Type the control statement:
TALLY IF=(69,EQ,CAVAIL),ACCUM=(75,QTY AVAIL WH-1),GO
2. Press <Enter>. File-AID reads the records of the input dataset, tests each record for the condition specified in the control statement, and displays the results as shown in Figure 15-3 on page 15-7.
Figure 15-2. Interactive Utility. Requesting a TALLY on the Foreground Control Statements Screen.
F I L E - A I D V8.8 RELEASE DATE 04/07/01 ....ENTER NEXT FUNCTION OR END TALLY IF=(69,EQ,C'AVAIL'),ACCUM=(75,'QTY AVAIL WH-1'),GO
Valid data-types are C for display numeric (maximum length 15) and B for binary (maximum length 4). Type BS is also provided to indicate binary signed data for lengths 1, 2, and 3. When processing a variable length sequential file in File-AID/Batch, location 1 references the 4-byte record descriptor word (RDW). Location 5 references the first byte of data in the record. Use the parameter RDW=3 to bypass the RDW and have location 1 reference the first byte of data. In this example, you notice that the RDW parameter is not used. The locations are four (4) bytes larger than the offset of the STATUS and QUANTITY fields shown when using formatted browse to view this file with a record layout (see Figure 13-4 on page 13-5). Use the PA1 or ATTN keys to abort processing of your request.
Using File-AID/Batch
15-7
Steps:
1. Type END. 2. Press <Enter>. The three asterisk (***) prompt is displayed. Press <Enter> again to display the Interactive Utility screen (Figure 15-1 on page 15-5). Note the message, FUNCTION COMPLETED, in the top right corner of the screen.
Figure 15-3. Foreground Control Statements Screen - TALLY Results
F I L E - A I D V8.8.0 RELEASE DATE 04/07/01 ....ENTER NEXT FUNCTION OR END TALLY IF=(69,EQ,C'AVAIL'),ACCUM=(75,'QTY AVAIL WH-1'),GO SYS00009 DSN=USERID9.FASAMP.INVFILE OPENED AS PS, RECFM=VB,LRECL=517,BLKSIZE=5170,VOL=PRD900 ABOVE FUNCTION ENDED ON NORMAL EOD RECORDS/READ-41 QTY AVAIL WH-1----------------------14512 ....ENTER NEXT FUNCTION OR END
15-8
You can copy and tailor one of the many samples of File-AID/Batch JCL provided for you in your sample JCL file (FASAMP.JCL). The following FASAMP.JCL members are good examples of File-AID/Batch: BATVTOC - Batch VTOC examples COPY - Sample selective COPY DROP - Sample DROP function of dropping bad records DUMP - Sample hex report of 5 records JCLCNVRT - Sample USER function to insert a SYSUDUMP DD in JCL LIST - Sample print of JCL member of PDS PRINT - Sample print of variable file SKELETON - Sample of all possible File-AID/Batch JCL statements SPACE - Sample SPACE function to skip to desired record TALLY - Sample TALLY function on INVFILE UPDATE - Sample UPDATE conditional logic IF-REPL USER - Sample USER function to create 3 files from 1 input file
Other ways to generate batch JCL including typing in the JCL using ISPF Edit or using File-AID option 3.9 (Batch Submit).
Using File-AID/Batch
15-9
The following JCL considerations apply to this example: A SYSPRINT DD statement is used for all hardcopy output, control card analysis, and log of actions taken. Statement DD01 defines the input dataset. Statement DD01O defines the output dataset. SYSIN DD statement specifies control statements. Control statements use the $$DD01 dataset identifier to identify the file(s) to be acted on (DD01 and DD01O). The following control statement considerations apply to this example: The COPYALL function directs File-AID/Batch to copy all records from the input file (DD01) to the output file (DD01O). The MEMBERS=ALL parameter directs File-AID/Batch to include all input PDS members. The FORM=JCL parameter tells File-AID/Batch that the data being processed is JCL. File-AID/Batch interprets JOB, EXEC, and DD statements and handles continuations and syntax correctly. The EDIT parameter directs a search of each JCL statement beginning in position 3 (after the //). It searches all characters until the end of the JCL statement is found (length 0) and looks for any of the three strings: UNIT=DISK UNIT=SYSDA UNIT=3350 If any of the three strings are found, File-AID/Batch changes the string to UNIT=3380 and adjusts the JCL if needed. The REPL (replace) parameter is also applied to each JCL statement as it is copied. The REPL parameter tells File-AID/Batch to search for the string SPACE=(CYL, then change the string to SPACE=(TRK. When changing JCL, the EDIT parameter is preferred over the REPL parameter unless the data that is searched for and the replacement data are the same length.
15-10
You can continue File-AID/Batch control statements as needed by placing a comma at the end of a parameter and continuing after column 1 and before column 26 of the next line. Comments may be entered on any control statement after one space following a parameter. You can also code them on a control card by placing an asterisk (*) in location 1.
File-AID scans the production load library for XYZ CORP. Because a MOVE parameter is used with a PRINT function, File-AID interprets PRINT as a request to print only the data that is moved, regardless of the length of the input record. Therefore, only the member name and XYZ CORP are printed. Code PARM=TSO on the EXEC statement to eliminate needless page skipping for each member. Note: File-AID can also update load module libraries with the UPDATE function and the REPL parameter.
16-1
C ha p 16
In Chapter 14, Automating Layout Usage with XREF, you learned about the XREF function (option 7) and how to create an XREF member for automating the selection and usage of record layouts for files with different record types. In this chapter, you learn how to set up an XREF for formatting data records when two or more layouts are needed to describe all of the fields in one record. Files containing segmented records are often found in older application systems such as insurance, government, utilities, and banking.
In a typical segmented record file, each segment of a record is defined by a unique data structure or record layout. There are also data field(s) in the file that identify the presence of each segment. This data field is referred to as a segment identifier. Sometimes segment identifiers are located in the beginning, or base, portion of each record. Often, segment identifiers are found within each segment, as a self-identifying field. In still other instances, segments may be chained by having a segment identifier at the end of one segment which identifies the next segment. Regardless of which of these methods applies to your segmented record file, File-AID provides a way for you to define an XREF to automate the selection of a layout as you view each record segment when using Browse or Edit or in other File-AID functions including: Browse - formatted display mode: NEXT and FPRINT command Edit - formatted display mode: NEXT and FPRINT command Print - formatted data record printing
16-2
Selection - formatted selection criteria specification Reformat - source record selection Compare - formatted field comparison and differences reporting.
16-3
Status
BASE SEGMENT SEGMENT SEGMENT SEGMENT SEGMENT
Notice that all of the layouts are stored in the same member (SEGRECS) of the sample layouts library (FASAMP.LAYOUTS).
16-4
-----------------------
Specify Cross Reference Dataset to be Created or Edited: XREF dataset name ===> FASAMP.XREF Member name ===> SEGFILE (Blank or pattern for member list) Specify Record Layout Information: Record layout dataset ===> FASAMP.LAYOUTS
------------------------------------------------------------------------------This function creates and maintains existing File-AID Record Layout Cross References. These XREFs are used to match record layouts to data records in File-AID functions that use formatting.
Steps:
1. From the File-AID Primary Option Menu (not shown here), select option 7 (XREF). 2. Press <Enter>. File-AID displays the Record Layout Cross Reference screen as illustrated in Figure 16-1. 3. Type FASAMP.XREF in the XREF dataset name field under the Specify Cross Reference Dataset information section. 4. Type SEGFILE in the Member name field 5. Type FASAMP.LAYOUTS in the Record layout dataset field. 6. Press <Enter>. File-AID displays the Define XREF screen as illustrated in Figure 16-2 on page 16-5.
16-5
File-AID ----- Define XREF - SEGFILE ------------------------ ROW 1 TO 6 OF 6 SCROLL ===> PAGE COMMAND ===> VIEW XR105-Valid line CMDS: C/M, B/A, I, R, D, EX, S, SF, SU, DEF, BAS, SEG Member list description ===> SEGFILE XREF Long ===> FILE CONTAINS INS-BASE FOLLOWED BY ANY NUMBER OF ADDITIONAL Description ===> TRAILER SEGMENTS IN ANY ORDER - BOAT CAR BUSINESS ETC. Generated filler length ===> 0 (0 to suppress filler)
Cmd Member Beginning Data-Name/Line Number Description Status --- ---------- ------------------------------ --------------- ---------------___ SEGRECS INS-BASE-FILE BASE ___ SEGRECS CLI-BOAT-DATA SEGMENT ___ SEGRECS CLI-BUSINESS-DATA SEGMENT ___ SEGRECS CLI-CAR-DATA SEGMENT ___ SEGRECS CLI-HOME-DATA SEGMENT ___ SEGRECS CLI-LIFE-DATA SEGMENT ************************** END OF SELECTION CRITERIA **************************
Steps:
1. Type VIEW in the COMMAND field. 2. Press <Enter>. File-AID displays the View Criteria screen as illustrated in Figure 16-3 on page 16-6.
16-6
File-AID ------------------------ View Criteria ----------COMMAND ===> Use END to exit View Display
******************************* TOP OF CRITERIA ***************************** DEFINE BLOCKS=XREF, DESCRIPTION =SEGFILE XREF, DESCRIPTION1=FILE CONTAINS INS-BASE FOLLOWED BY ANY NUMBER OF ADDITIONAL, DESCRIPTION2=TRAILER SEGMENTS IN ANY ORDER - BOAT CAR BUSINESS ETC., XREF_DSNAME=FASAMP.XREF, XREF_MBRNAME=SEGFILE, LAYOUT_DSNAME=XXXXXXX.FASAMP.LAYOUTS SELECT SET=1,LAYOUT=INS-BASE-FILE, LAYOUT_MBRNAME=SEGRECS, LAYOUT_TYPE=BASE IF FIELD_NAME=CLI-NUMBER, POSITION=1,LENGTH=5,OPERATOR=NE, TYPE=T,VALUE=XXXXX
Steps:
1. Use the scroll PF keys (PF8 DOWN, PF7 UP) to review the criteria for the SEGFILE member. 2. Notice that the POSITION value for each SEGMENT is 2 meaning the 2nd byte of data at the beginning of each segment. 3. Use the END command THREE TIMES to return to the File-AID Primary Option Menu.
16-7
----------------------
Specify Browse Information: Dataset name or HFS path ===> FASAMP.SEGFILE Member name ===> (Blank or pattern for member list) Volume serial ===> (If dataset is not cataloged) Specify Record Layout and XREF Information: (S = Single; X = XREF; N = None) Record layout usage ===> X Record layout dataset ===> FASAMP.LAYOUTS Member name ===> (Blank or pattern for member list) XREF dataset name ===> FASAMP.XREF Member name ===> SEGFILE (Blank or pattern for member list) Specify Selection Criteria Selection criteria usage Selection dataset name Member name Information: ===> N ===> ===> (E = Existing; T = Temporary; M = Modify; Q = Quick; N = None) (Blank or pattern for member list)
Steps:
1. Type 1 in the OPTION field of the Primary Option Menu (not shown). 2. Press <Enter>. File-AID displays the Browse - Dataset Specification screen, as illustrated in Figure 16-4. 3. Type F (Formatted) in the Browse Mode field. 4. Type FASAMP.SEGFILE in the Browse dataset field. 5. Type X in the Record layout usage field. 6. Type FASAMP.LAYOUTS in the Record layout dataset field. 7. Blank out the record layout member field. You do not need to specify the record layout member when you are using an XREF, because the record layout member is already defined in the XREF dataset. 8. Verify the XREF dataset is FASAMP.XREF. 9. Verify the XREF member is SEGFILE. 10. Make sure the value in the Selection criteria usage field is N. 11. Press <Enter>.
16-8
FILE-AID - BROWSE - USERID9.FASAMP.SEGFILE ------------------- INVALID COMMAND SCROLL ===> PAGE COMMAND ===> NEXT RECORD: 1 INS-BASE-FILE LENGTH: 231 ---- FIELD NUMBER/NAME ------ COLUMNS- ----+----1----+----2----+----3----+----4 1 CLI-NUMBER 1 09876 2 FILLER 6 3 CLI-FIRST-NAME 7 GEORGE 4 CLI-MID-INIT 17 C 5 CLI-LAST-NAME 18 SCOTT 6 CLI-OCCUPATION 33 ACTOR 7 CLI-SMOKER 53 N 8 CLI-PHONE-NUMBER 54 9005680284 9 CLI-ADDRESS SYNC 64 10 CLI-STREET 64 54 MOVIE RD 11 CLI-CITY 79 LOS ANGELES 12 CLI-STATE 94 CA 13 CLI-ZIP-CODE 96 510807054 14 FILLER 105 ************* END OF LAYOUT - DATA EXCEEDS LAYOUT BY 107 BYTES ****************
Steps:
1. Type NEXT in the COMMAND field. 2. Press <Enter>.
16-9
FILE-AID - BROWSE - USERID9.FASAMP.SEGFILE ----------------------- COL 125 231 COMMAND ===> SCROLL ===> PAGE RECORD: 1 CLI-BOAT-DATA LENGTH: 231 ---- FIELD NUMBER/NAME ------ COLUMNS- ----+----1----+----2----+----3----+----4 1 FILLER 125 2 BOAT-RECORD-TYPE-01 126 01 3 BOAT-DATE-INSURED 128 071973 4 BOAT-REGISTER-NO 134 91380 5 BOAT-INSURED-AMT 139 75000.00 6 BOAT-DOCK-NO 143 300 7 BOAT-MARINA-NAME 146 BLUE WATERS 8 BOAT-NAME 176 9 FILLER 196 ****************************** BOTTOM OF DATA *********************************
Notes: 1. If you wish to return to the previously viewed segment, use the PREV command. 2. Another way to issue the NEXT command is to assign the command NEXT to a PF key. Use the KEYS primary command to access your PF key settings to review or change your PF key command defaults.
16-10
FILE-AID - BROWSE - USERID9.FASAMP.SEGFILE -----------COMMAND ===> LR 13 RECORD: 1 CLI-BOAT-DATA ---- FIELD NUMBER/NAME ------ COLUMNS- ----+----1----+1 FILLER 125 2 BOAT-RECORD-TYPE-01 126 01 3 BOAT-DATE-INSURED 128 071973
Steps:
1. Type LR 13 in the COMMAND field. 2. Press <Enter>.
Result of LR 13
File-AID displays the BASE (layout INS-BASE-FILE) for record 13, as illustrated in Figure 16-8. Notice that the information line at the end of the layout, DATA EXCEEDS LAYOUT, indicates that 555 bytes of additional segment data still remains to be formatted.
Figure 16-8. Browsing Record 13 (BASE Segment)
FILE-AID - BROWSE - USERID9.FASAMP.SEGFILE ------------------------- COL 1 124 COMMAND ===> SCROLL ===> PAGE RECORD: 13 INS-BASE-FILE LENGTH: 679 ---- FIELD NUMBER/NAME ------ COLUMNS- ----+----1----+----2----+----3----+----4 1 CLI-NUMBER 1 67890 2 FILLER 6 3 CLI-FIRST-NAME 7 THOMAS 4 CLI-MID-INIT 17 L 5 CLI-LAST-NAME 18 PAINE 6 CLI-OCCUPATION 33 WRITER 7 CLI-SMOKER 53 N 8 CLI-PHONE-NUMBER 54 4159803458 9 CLI-ADDRESS SYNC 64 10 CLI-STREET 64 17 PEN LANE 11 CLI-CITY 79 TALAHASSEE 12 CLI-STATE 94 FL 13 CLI-ZIP-CODE 96 80973 14 FILLER 105 ************* END OF LAYOUT - DATA EXCEEDS LAYOUT BY 555 BYTES ****************
16-11
FILE-AID - BROWSE - USERID9.FASAMP.SEGFILE -----------COMMAND ===> &NEXT RECORD: 13 INS-BASE-FILE ---- FIELD NUMBER/NAME ------ COLUMNS- ----+----1----+1 CLI-NUMBER 1 67890
Steps:
1. Type &NEXT in the COMMAND field. 2. Press <Enter>.
Step:
1. Press <Enter>.
Figure 16-10. Browsing Record 13. CLI-BOAT-DATA Segment.
FILE-AID - BROWSE - USERID9.FASAMP.SEGFILE ----------------------- COL 125 231 COMMAND ===> &NEXT SCROLL ===> PAGE RECORD: 13 CLI-BOAT-DATA LENGTH: 679 ---- FIELD NUMBER/NAME ------ COLUMNS- ----+----1----+----2----+----3----+----4 1 FILLER 125 2 BOAT-RECORD-TYPE-01 126 01 3 BOAT-DATE-INSURED 128 021194 4 BOAT-REGISTER-NO 134 70392 5 BOAT-INSURED-AMT 139 6000.00 6 BOAT-DOCK-NO 143 999 7 BOAT-MARINA-NAME 146 THOMAS MARINA 8 BOAT-NAME 176 ALMANAC 9 FILLER 196 ************* END OF LAYOUT - DATA EXCEEDS LAYOUT BY 448 BYTES ****************
16-12
FILE-AID - BROWSE - USERID9.FASAMP.SEGFILE ----------------------- COL 232 356 COMMAND ===> &NEXT SCROLL ===> PAGE RECORD: 13 CLI-BUSINESS-DATA LENGTH: 679 ---- FIELD NUMBER/NAME ------ COLUMNS- ----+----1----+----2----+----3----+----4 1 FILLER 232 2 BUSINESS-RECORD-TYPE-02 233 02 3 BUS-DATE-INSURED 235 021194 4 BUS-NAME 241 WRITERS CAMP 5 BUS-INSURED-AMT 271 3000.00 6 BUS-ADDRESS 277 32 BOOK STREET 7 BUS-PHONE-NUMBER 307 4159809852 8 FILLER 317 ************* END OF LAYOUT - DATA EXCEEDS LAYOUT BY 323 BYTES ****************
Step:
1. Press <Enter>. Note: If you wish to return to the previously viewed segment, use the PREV command.
FILE-AID - BROWSE - USERID9.FASAMP.SEGFILE ----------------------- COL 357 499 COMMAND ===> &NEXT SCROLL ===> PAGE RECORD: 13 CLI-CAR-DATA LENGTH: 679 ---- FIELD NUMBER/NAME ------ COLUMNS- ----+----1----+----2----+----3----+----4 1 FILLER 357 2 CAR-RECORD-TYPE-03 358 03 3 CAR-DATE-INSURED 360 021194 4 CAR-VEHICLE-NUMBER 366 2225439047 5 CAR-INSURED-AMT 376 100.00 6 CAR-MFG 380 FORD 7 CAR-STYLE 390 MODEL T 8 CAR-OWNER-NAME 420 THOMAS PAINE 9 FILLER 460 ************* END OF LAYOUT - DATA EXCEEDS LAYOUT BY 180 BYTES ****************
Step:
1. To view the next segment, press <Enter>.
16-13
FILE-AID - BROWSE - USERID9.FASAMP.SEGFILE ----------------------- COL 500 578 COMMAND ===> &NEXT SCROLL ===> PAGE RECORD: 13 CLI-HOME-DATA LENGTH: 679 ---- FIELD NUMBER/NAME ------ COLUMNS- ----+----1----+----2----+----3----+----4 1 FILLER 500 2 HOME-RECORD-TYPE-04 501 04 3 HOME-DATE-INSURED 503 021194 4 HOME-ADDRESS 509 0000000032 5 HOME-PROPERTY-AMT 519 14000.00 6 HOME-CONTENTS-AMT 524 3500.00 7 HOME-STYLE 529 COLONIAL 8 FILLER 539 ************* END OF LAYOUT - DATA EXCEEDS LAYOUT BY 101 BYTES ****************
Step:
1. To view the next segment, press <Enter>.
This indicates that the last byte of data has been formatted. If you try to use the NEXT command, you receive an error message like: ALREADY AT LAST SEGMENT. The PREV command lets you back up to the segment preceding the currently displayed segment. The TOP command displays the base layout at data byte 1.
Figure 16-14. Browsing Record 13. CLI-LIFE-DATA Segment (BOTTOM OF DATA Label).
FILE-AID - BROWSE - USERID9.FASAMP.SEGFILE ----------------------- COL 579 679 COMMAND ===> SCROLL ===> PAGE RECORD: 13 CLI-LIFE-DATA LENGTH: 679 ---- FIELD NUMBER/NAME ------ COLUMNS- ----+----1----+----2----+----3----+----4 1 FILLER 579 2 LIFE-RECORD-TYP-05 580 05 3 LIFE-POLICY-NUMBER 582 325476 4 LIFE-DATE-INSURED 588 021194 5 LIFE-INSURED-NAME 594 THOMAS PAINE SR 6 LIFE-INSURED-AMT 634 40000.00 7 LIFE-BENE-NAME 640 MRS. PAINE 8 FILLER 670 ****************************** BOTTOM OF DATA ********************************
16-14
FILE-AID - BROWSE - USERID9.FASAMP.SEGFILE -----------COMMAND ===> RETURN RECORD: 13 CLI-LIFE-DATA ---- FIELD NUMBER/NAME ------ COLUMNS- ----+----1----+1 FILLER 579 2 LIFE-RECORD-TYP-05 580 05
Steps:
1. Type RETURN in the COMMAND field. 2. Press <Enter>.
A-1
Appendix A. Convert File-AID for IMS XREF Members to File-AID/MVS Release 8 Format
App endix A.
App A
File-AID/MVS enhanced its batch CONVERT function to allow you to convert your FileAID for IMS XREFs to the File-AID Release 8 format. Release 8.0.2 gives you three new sample JCL members that you can use as models for this conversion. You can use Release 8 format XREFs in File-AID/MVS functions and in File-AID/Data Solutions to build change criteria to modify File-AID for IMS extract file data. The following JCL members are provided with your install PDS: CVTIMSXR Convert one File-AID for IMS XREF to one File-AID/MVS XREF CVTIMSX2 Convert multiple File-AID for IMS XREFs to one File-AID/MVS XREF CVTIMSX3 Convert multiple File-AID for IMS XREFs to multiple File-AID/MVS XREFs.
A-2
//??????A JOB (####,CCCC),'YOUR USERNAME', // CLASS=A,MSGCLASS=A,NOTIFY=?????? //* //* THIS IS A SAMPLE JOB TO CONVERT FILE-AID/IMS XREF LIBRARY //* MEMBER(S) TO THE NEW FILE-AID RELEASE 8 XREF LIBRARY FORMAT. //* ONE XREF MEMBER IS CONVERTED PER DDXX STATEMENT. //* DDXX0 SHOULD BE A PREALLOCATED PDS RECFM=VB,LRECL=300 //* //JOBLIB DD DSN=????????.FA.VVRRMM.LOAD,DISP=SHR //STEP1 EXEC PGM=FILEAID,REGION=6M //SYSPRINT DD SYSOUT=* //SYSLIST DD SYSOUT=* //SYSTOTAL DD SYSOUT=* //SYSUDUMP DD SYSOUT=* //ABNLDUMP DD SYSOUT=* //DD01 DD DISP=SHR,DSN=YOUR.FA.IMS.XREF(MEMBER1) //DD01XT DD DISP=SHR,DSN=YOUR.FA.IMS.EXTRACT1 //DD01O DD DISP=SHR,DSN=YOUR.FILEAID.XREF //* //DD02 DD DISP=SHR,DSN=YOUR.FA.IMS.XREF(MEMBER2) //* //DD02XT DD DISP=SHR,DSN=YOUR.FA.IMS.EXTRACT2 //* //DD02O DD DISP=SHR,DSN=YOUR.FILEAID.XREF //SYSIN DD * $$DD01 CONVERT TYPE=IMSXREF * $$DD02 CONVERT TYPE=IMSXREF /* //
A-3
//??????A JOB (####,CCCC),'YOUR USERNAME', // CLASS=A,MSGCLASS=A,NOTIFY=?????? //* //* THIS IS A SAMPLE JOB TO CONVERT FILE-AID/IMS XREF LIBRARY //* MEMBER(S) TO THE NEW FILE-AID RELEASE 8 XREF LIBRARY FORMAT. //* MANY FA/IMS XREF MEMBERS ARE CONVERTED AND COMBINED INTO ONE //* FILE-AID RELEASE 8 XREF MEMBER. //* DDXX0 SHOULD BE A PREALLOCATED PDS WITH RECFM=VB,LRECL=300 //* //JOBLIB DD DSN=????????.FA.VVRRMM.LOAD,DISP=SHR //STEP1 EXEC PGM=FILEAID,REGION=6M //SYSPRINT DD SYSOUT=* //SYSLIST DD SYSOUT=* //SYSTOTAL DD SYSOUT=* //SYSUDUMP DD SYSOUT=* //ABNLDUMP DD SYSOUT=* //DD01 DD DISP=SHR,DSN=YOUR.FA.IMS.XREF1 //DD01XT DD DISP=SHR,DSN=YOUR.FA.IMS.EXTRACT1 //DD01O DD DISP=SHR,DSN=YOUR.FILEAID.XREF(REL8MEM1) //* //DD02 DD DISP=SHR,DSN=YOUR.FA.IMS.XREF2 //* //DD02XT DD DISP=SHR,DSN=YOUR.FA.IMS.EXTRACT2 //* //DD02O DD DISP=SHR,DSN=YOUR.FILEAID.XREF(REL8MEM2) //SYSIN DD * $$DD01 CONVERT TYPE=IMSXREF * $$DD02 CONVERT TYPE=IMSXREF /* //
A-4
Convert Multiple File-AID for IMS XREFs to File-AID/MVS XREFs (One for One)
Complete the following procedure to convert one for one multiple File-AID for IMS XREF members to the Release 8 format. You may specify up to 100 (00 - 99) DD statements per Job Step execution. You must specify the matching extract for each XREF DD (DDnn) using DDnnXT: 1. Copy the JCL located in FASAMP.JCL(CVTIMSX3). 2. Tailor JOBLIB to point to your Release 8 load library. 3. Tailor DDnn to point to your File-AID for IMS XREF library. 4. Tailor DDnnXT to point to the extract file that matches the XREF members. 5. Preallocate a PDS for your new Release 8 XREF library (DDnnO). It must be RECFM=VB and LRECL=300. Allocate enough space and directory blocks to hold all of your XREF members. 6. Tailor DDnnO to the name of your new Release 8 XREF library. 7. Submit the job.
Figure A-3. FASAMP.JCL Member CVTIMSX3
//??????A JOB (####,CCCC),'YOUR USERNAME', // CLASS=A,MSGCLASS=A,NOTIFY=?????? //* //* THIS IS A SAMPLE JOB TO CONVERT FILE-AID/IMS XREF LIBRARY //* MEMBERS TO THE NEW FILE-AID RELEASE 8 XREF LIBRARY FORMAT. //* MANY FA/IMS XREF MEMBERS ARE CONVERTED AND WRITTEN USING THE //* SAME MEMBER NAMES AS THE INPUT XREF MEMBER(S). //* DDXX0 SHOULD BE A PREALLOCATED PDS WITH RECFM=VB,LRECL=300 //* //JOBLIB DD DSN=????????.FA.VVRRMM.LOAD,DISP=SHR //STEP1 EXEC PGM=FILEAID,REGION=6M //SYSPRINT DD SYSOUT=* //SYSLIST DD SYSOUT=* //SYSTOTAL DD SYSOUT=* //SYSUDUMP DD SYSOUT=* //ABNLDUMP DD SYSOUT=* //DD01 DD DISP=SHR,DSN=YOUR.FA.IMS.XREF1 //DD01XT DD DISP=SHR,DSN=YOUR.FA.IMS.EXTRACT1 //DD01O DD DISP=SHR,DSN=YOUR.FILEAID.XREF1 //* //DD02 DD DISP=SHR,DSN=YOUR.FA.IMS.XREF2 //* //DD02XT DD DISP=SHR,DSN=YOUR.FA.IMS.EXTRACT2 //* //DD02O DD DISP=SHR,DSN=YOUR.FILEAID.XREF2 //SYSIN DD * $$DD01 CONVERT TYPE=IMSXREF * $$DD02 CONVERT TYPE=IMSXREF /* //
I-1
Index
defining selection conditions, 2-5 requesting, 2-3 specific fields, displaying, 2-302-33 system-assigned field number, displaying, 2-28 unformatted selection criteria, specifying, 2-14 vertical formatted mode, invoking, 2-42
A
accessing File-AID CLIST, allocation, 1-2 File-AID primary menu, 1-2 ISPF/PDF option menu, 1-2 PROC, logon, 1-2 Acrobat PDF online documentation, xi ADD primary command, 16-2 add segment in segmented record, 16-2 audit trail dataset generating, 4-2 printing, 12-5 specifying disposition, 4-44
C
CAPS primary command searching case-sensitive data (OFF), 2-12 catalog search, 8-2 Catalog utility, 8-1 accessing, 8-2 datasets processing, 8-6 selecting, 8-8 exiting, 8-9 extended help message, displaying, 8-6 line commands, 8-7 primary commands, 8-7 Search name field rules, 8-5 searching the catalog, 8-4 tutorial, accessing, 8-6 CHANGE primary command CHANGE Command screen displaying, 4-19 specifying parameters, 4-20 modifying value of specific field, 4-41 changing default values, 1-5 CHAR primary command from formatted mode, 2-37, 4-29 COLS primary command Compare function accessing, 5-1 analyzing report, 5-12, 5-24 dataset specifying new, 5-3 specifying old, 5-2 executing, 5-11, 5-23 execution options, 5-4, 5-18 features, 5-1 formatted field criteria, specifying, 5-8 formatted field criteria, viewing, 5-9, 5-22 load library, 5-16 specifying new, 5-17 specifying old, 5-16 summary report, 5-13, 5-25 Copy (C) line command character mode, 4-35 COPY primary command Edit COPY screen displaying, 4-4 source dataset, specifying, 4-5 Copy utility accessing, 7-1, 13-8 batch JCL editing, 7-10 generating, 7-9 datasets, specifying "from" and "to", 7-3, 13-9 defining copy request, 7-2 exiting, 7-10, 13-10
B
Batch Submit utility, 15-1 control statement dataset identifier, 15-2 example, 15-1 function name, 15-2 parameters, 15-3 control statements, entering, 15-6 examples, 15-9 creating multiple output files, 15-10 mass changes to library, 15-9 scanning/printing load library data, 15-10 executing, 15-4 features, 15-1 Interactive utility support, 15-4 JCL, submitting, 15-8 processing request, defining, 15-1 TALLY function, 15-5 Browse function, 2-1 accessing, 2-2 browse request, defining, 2-2 character format, displaying, 2-39 character mode, invoking, 2-37 COLS information line, displaying, 2-40 dataset list, selecting, 2-4 display format of a field, changing, 2-48, 2-50 display modes, 2-1 field data declaration, displaying, 2-23, 2-44 field length and format, displaying, 2-27 field offset, displaying, 2-9, 2-25, 2-45 Formatted Selection Criteria screen (FMT), 2-6 formatted selection criteria, specifying, 2-11 hexadecimal format, displaying, 2-38 last referenced file list, 2-53 mode prompt message line (MESSAGE), 2-43 scrolling formatted record, 2-17 searching for data (FIND), 2-34, 2-41 selection criteria, temporary
I-2
extracting selected data, 13-8 field selection criteria exiting Selection Criteria Menu, 7-8 temporary, specifying, 7-6 unformatted, specifying, 7-7 ISPF statistics, 7-4 JCL command, 7-10 PDS member processing, 7-4 PDS processing options, 7-5 selection criteria member, specifying, 7-4, 13-9 customer support web site, x CVTIMSX2 JCL, A-3 CVTIMSX3 JCL, A-4 CVTIMSXR JCL, A-2
Extract (EX) line command Source Statement Selection screen, 14-4 extracting selected data, 13-1
F
file list, last referenced, 2-53 File primary option menu, 1-2 FILELIST primary command, 2-53 FIND primary command COLS command, using with, 2-41 FIND command screen, 2-34 search conditions, specifying, 2-34, 4-13 finding uncataloged files, 8-10 FMT line command from character mode, 4-8 formatting segmented records, 16-1 FPRINT primary command Print Parameters screen displaying, 4-16 new dataset attributes, 4-18, 11-711-8 specifying print information, 4-16 with XREF, 14-24 printing with XREF, 14-23 FrontLine support web site, x
D
dataset selection list processing commands, 8-7 dataset specification FILELIST command Delete (D) line command character mode, 4-38 DISPLAY primary command HEX command, using with, 2-48 RESET command, using with, 2-50 specifying all fields (ALL), 2-33, 2-51 specifying selected fields, 2-302-32, 2-47
G
global changes, 6-1, 6-19
E
Edit function accessing, 4-2 audit trail, generating, 4-2 CHANGE command, 4-19, 4-41 COPY command, invoking, 4-4 DISPLAY command, 4-39 END command, 4-43 formatted mode, invoking, 4-8 FPRINT command, 4-16 INPUT command, 4-24 invoking character mode, 4-29 invoking vertical formatted mode, 4-39 KEY command, 4-27 line commands C (Copy), 4-35 D (Delete), 4-38 line labels assigning, 4-31 CHANGE command, 4-31 RESET command, 4-34 PROTECT command, 4-254-26 REPEAT command, 4-23 RESET command, 4-30 RIGHT command, 4-24 scrolling formatted record, 4-21 scrolling to a key field, 4-27 SORT KEYS command, 4-37 specifying dataset to edit, 4-2 UNDO command, 4-33 VPRINT command, 4-42 END primary command exiting Browse, 2-51 Edit, 4-43
H
HEX primary command displaying hexadecimal format (ON), 2-38 redisplaying prior format (OFF), 2-39 HIDE primary command, 4-11 HOLD primary command, 4-11 HTML documentation, xi
I
Interactive utility, 15-4 control statements, entering, 15-6 exiting, 15-7 features, 15-4 terminate processing, 15-6 Internet, Compuware WWW address, xi introduction, ixxi related publications, x technical support, xi
J
JCL primary command Copy utility, 7-9
I-3
K
KEY Value Specification screen scrolling to a key field, 4-28
L
last referenced file list, 2-53 LEFT primary command formatted mode displaying previous record, 2-19 Library utility, 9-1 accessing, 9-1 load module information, viewing, 9-7 member list generating, 9-3 line command processing, 9-6 primary command processing, 9-5 line commands C (copy) using destination parameters, 4-35 Catalog and VTOC utilities, 8-7 D (delete) block command, 4-38 EX (extract) Source Statement Selection screen, 14-4 S (select) dataset selection list, 2-4 member selection list, 14-614-7 SF (select formatted) XREF function, 14-3 SU (select unformatted) XREF function, 14-3 line labels primary commands, use with remove with RESET LABEL command, 4-34 load library compare function, 5-16 load module information, 9-1 locking dataset in file list, 2-54 logging on, 1-1 LR primary command displaying a record by record number, 16-9
M
member management, 9-1 MESSAGE primary command display mode command line, removing, 2-43 more about allocate new VSAM cluster, 3-5 C (Copy ) line command, 4-36 Catalog utility dataset list, 2-4 Catalog utility entry screen, 8-5 CHANGE command, 4-21 CHANGE command prompt screen, 6-10 change criteria, 6-21 COLS command, 2-40 confirm update, 6-12 Confirm Update screen, 6-23 control statement entry, 15-6 COPY command, 4-4
Copy PPO screen, 7-5 Copy utility screen, 7-3 default layouts, 14-16 Define XREF screen, 14-4 DISPLAY command, 2-29, 2-49 Disposition of Audit Trail screen, 4-44 FIND command, 2-36, 4-14 formatted selection criteria, 13-5 Formatted XREF Definition screen, 14-9 FPRINT command, 4-16 HIDE and HOLD commands, 4-12 Interactive utility screen, 15-5 KEY command, 4-27 last referenced file list, 2-54 manual member selection list, 6-16 member browsing or editing, 6-8 MESSAGE command, 2-43 navigating to browse formatted records, 2-18 PDS Find/Change member list, 6-7 PDS processing options (PPO), 6-4 PDS Processing Options for layout member list, 14-6 Print function, 12-5 print parameters, 4-17 Print Selection Menu, 12-2 profile settings, 2-20 PROTECT command, 4-26 REDEFINES command, 4-9 Reformat Definition screen, 11-2 Reformat Record Layouts screen, 11-3 REPEAT command, 4-23 RESET command, 4-30 scroll commands, 4-22 scrolling methods and XREF usage, 14-22 Search/Update entry screen, 6-3 segment definitions, 16-6 selection criteria, 2-11, 6-17, 11-11 Selection Criteria Menu, 7-6, 13-6 selection criteria options, 2-6 SHOW command, 2-23, 2-44 SHOW OFFSET command, 2-26 SORT command, 4-37 switching to Character mode, 4-29 temporary selection criteria, 2-5 tutorials, 8-7 UNDO command, 4-33 unformatted selection criteria, 6-5, 7-7 unformatted XREF definition, 14-11 vertical formatted mode, 2-42 View display, 10-3 View Record Layout - Dataset Specification screen, 10-2 VSAM allocation, 3-4 XREF members, 14-18
N
NEXT primary command, 16-2 invoking XREF logic for segmented record, 16-2
O
OFFSET primary command column format (COLUMN), 2-26
I-4
P
pattern characters dataset name field, using in, 2-2 displaying a dataset list, 2-4 PDF documentation, xi PDS member copying, 6-22, 7-1 PDS member management, 9-1 primary command, keeping on command line, 16-11 primary option menu, 1-2 Print function, 12-1 accessing, 12-1 character display, 12-2 exiting, 12-5 formatted display field description option, 12-2 record layout requirement, 12-3 selection criteria, specifying, 12-3 hexadecimal display, 12-2 print job parameters, 12-4 process in batch, 12-4 view report online, 12-5 Print Selection Menu specifying file type, 12-2 submitting print job, 12-4 PROFILE primary command profile lines, displaying, 2-20 profile lines, removing, 2-22 table of options, 2-20 PROTECT primary command controlling protection status, 4-254-26 publications, related, x
size of reformatted dataset, controlling, 11-13 reformat records, 11-1 REPEAT primary command copying the displayed record, 4-23 RESET primary command HIDE, 4-15 HOLD, 4-15 informational flags, 4-64-7, 4-30 line labels, 4-34 profile lines, 2-22 RIGHT primary command formatted mode displaying next record, 2-17
S
sample training files creating, 1-3 executing FACOPY CLIST, 1-3 scanning files, 6-1, 8-10 search for invalid data, by field number, 4-13 Search/Update utility accessing, 6-1 batch processing, 6-26 browsing PDS members, 6-18 change criteria specifying, 6-20 editing a member, 6-8 global changes confirming, 6-23 processing in batch, 6-24 member list exiting (END), 6-12 selecting from, 6-7 option B (browse), 6-14 option M (member), 6-3 option U (update), 6-19 PDS member copying, 7-3 data selection criteria, specifying, 6-5 list, 6-15 PDS Processing Options screen, 6-15 scanning/updating, 6-1, 6-14 selecting, 6-4 special features, 6-4 search request, defining, 6-1 unformatted selection criteria, specifying, 6-17 update request, defining, 6-1 segment identifier, 16-1 segmented record accessing XREF function, 16-4 ADD primary command, 16-2 BASE layout, 16-2 browsing using an XREF, 16-7 view criteria, 16-6 determining position within record, 16-9 editing, 16-2 exiting XREF function, 16-14 formatting each record segment, 16-2 formtted display, setting up, 16-9 LR primary command, 16-9 NEXT primary command, 16-2, 16-8 record layout selection using XREF, 16-1 REMOVE primary command, 16-2 SEGMENT layout, 16-2
Q
questions, File-AID/MVS frequently asked, xi
R
Reformat function, 11-1 accessing, 11-1 create mode, 11-3 executing online, 11-13 exiting, 11-15 field references, generating, 11-3 output file browsing, 11-13, 11-15 editing, 11-13 reformat definition source record layout, specifying, 11-3 target record layout, specifying, 11-3 reformat definition editor constants, specifying, 11-6 field references, specifying, 11-6 hiding sensitive data, 11-10 scrolling, 11-5 source record layout window, 11-6 specifying field selection criteria, 11-11 target record layout window, 11-6
I-5
selecting an existing XREF member, 16-4 subsequent segments, displaying, 16-11, 16-13 TOP primary command, 16-2 USE primary command, 16-2 VIEW primary command, 16-5 Select Formatted (SF) line command XREF function, 14-3 Select Unformatted (SU) line command XREF function, 14-3 selection criteria formatted selection criteria, defining, 2-11 function, 13-1 multiple condition testing (AND/OR), 2-13, 13-5 pattern selection, specifying, 2-6 selection options formatted selection criteria, 2-3 pattern selection, 2-5 unformatted selection criteria, 2-3 temporary defining, 2-5 requesting, 2-3 saving, 2-3 unformatted selection criteria, defining, 2-14 Selection Criteria function, 13-1 accessing, 13-1 CANCEL primary command, 13-6 creating new test INSERT and REPEAT primary commands, 13-5 multiple condition test, 13-5 exiting, 13-7 formatted field selection criteria test, 13-5 record layout dataset, specifying, 13-2 saving selection criteria, 13-6 selection criteria formatted, 13-3 option, 13-3 reviewing, 13-6 saving, 13-6 unformatted, 13-3 selection criteria dataset, specifying, 13-2 SHOW OFFSET command, 13-4 VIEW primary command, 13-6 SHOW primary command character mode data declaration (PICTURE), 2-44 field length and format (FORMAT), 2-44, 2-46 field level number (LEVEL), 2-44 field offset (OFFSET), 2-442-45 system-assigned field number (NUMBER), 2-44 formatted mode data declaration (PICTURE), 2-23 field length and format (FORMAT), 2-23, 2-27 field level number (LEVEL), 2-23 field offset (OFFSET), 2-9, 2-23, 2-25, 14-8 system-assigned field number (NUMBER), 2-23, 2-28 SORT KEYS primary command sorting based on dataset record key, 4-37 system defaults changing, 1-5 initial set-up, 1-4 Parameter Selection Menu, 1-4
TOP primary command, 16-2 returning to BASE segment, 16-2 training files, 1-3 tutorial Catalog utility, 8-7 navigating through, 8-7
U
UNDO primary command restore pre-existing values, 4-33 SETUNDO OFF, 4-33 unformatted selection criteria guidelines, 6-5 member browsing or editing selecting from, 6-8 specifying in Search/Update utility, 6-5 UP primary command formatted mode move forward within same record, 4-21 updating MVS files, 6-1 USE primary command display list of record layouts within XREF, 16-2 User Guide conventions entering values, 1-1
V
VFMT primary command from character mode, 2-42 View function, 10-1 accessing, 10-1 exiting, 10-3 primary commands record layout, specifying, 10-2 VIEW primary command XREF control statements, displaying, 16-5 VSAM utility, 3-1 accessing, 3-1 allocating, 3-2 allocation attributes, 3-2 extended allocation parameters, 3-5 impact on system performance, 3-5 specifying model dataset, 3-2 VTOC search, 8-10 options catalog specification, 8-12 delete confirmation, 8-12 search name field, 8-12
W
website, File-AID/MVS frequently asked questions, xi World Wide Web, Compuware address, xi
X
XREF function accessing, 14-1 compound criteria set, creating, 14-15
T
technical support, xi
I-6
criteria set, creating, 14-9 default base layout, 14-16 DEF line command, 14-16 guidelines, 14-16 specifying, 14-16 exiting, 14-18 formatted criteria defining record layout selection rules, 14-3 FPRINT primary command, 14-23 line commands EX (extract), 14-4 S (select), 14-614-7 SF (select formatted), 14-3 SU (select unformatted), 14-3 moving to another record (formatted mode), 14-22 record layout defining selection rules for, 14-214-3 member types, 14-5 selecting member from list, 14-614-7 RIGHT primary command, 14-22 segmented record, 14-1 selecting member from list of record layouts, 14-13 SHOW OFFSET primary command, 14-8 specifying data structure Beginning Data-Name/Line Number field, 14-3, 14-13 Source Statement Selection screen, 14-3 unformatted criteria defining record layout selection rules, 14-11 XREF member browsing formatted data, 14-20 creating, 14-2 defining editing line commands, 14-5 printing data records, 14-23 saving, 14-17 using, 14-19