November 2002 Technical Tip – FileAid Dumps for the COBOL Programmer
My favorite FileAid feature is the ability to print dumps which utlilize a COBOL copy library. Consider the following file, appropriately named JUNK. This file contains a label in columns 1-8, a zoned decimal number in columns 9-11, and a packed decimal number in columns 12-13. Here's the COBOL copy library member which describes this dataset:
Here are the second and third records of the file as viewed through ISPF with HEX ON. Notice that record 3 contains a non-printable character in position 5 ofJR-LABEL (X'EE') and non-numeric data in JR-ZONED (all C'X') and in JR-PACKED (all C'Y').
You've probably used IDCAMS for dumping files. And, if so, you'll probably agree that it's format is hardly "user friendly." Just to remind you, here's a portion of an IDCAMS file for the JUNK file.
FileAid has the capability of producing a dump which shows the records field-by-field, using the field names and formats as specified in the indicated copy library member. The JCL is as follows:
The FileAid dump for the second and third records appears as follows. Note that non-printable characters in PIC X fields are displayed in their hexadecimal form, as are non-numerics in PIC 9 fields. This can be very helpful in debugging!
This is just one example of what FileAid can do. Caliber Data Training is pleased to offer training in FileAid as well as other utilities such as SyncSort, FileMaster/MAXBAT, Easytrieve, and SAS. We hope you will consider us when deciding upon a training provider.