March 2007 Technical Tip – File Manager Dumps for the COBOL Programmer
In the November 2002 article I showed you how to use FileAid to print dumps which utlilize a COBOL copy library member. In this article I will show you how to do the same thing using IBM's File Manager. I will use the same file and copy library member I used in the other article. The file is 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 of JR-LABEL (X'EE') and non-numeric data in JR-ZONED (all C'X') and in JR-PACKED (all C'Y').
File Manager, like 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 File Manager dump for the second and third records appears as follows. Whereas FileAid shows non-printable characters in PIC X fields, and non-numeric in PIC 9 fields, in their hexadecimal form, File Manager shows non-printable characters in PIC X fields with periods, and non-numerics in PIC 9 fields as all asterisks. This makes FileAid more useful in debugging, in my opinion.
This is just one example of what File Manager can do. Caliber Data Training is pleased to offer training in a number of popular utilities including SyncSort, Easytrieve, and SAS. We hope you will consider us when deciding upon a training provider.