AEDPUB - Channel Cross-Reference

Purpose

This utility performs a sanity test on the key block structure for Auto-expanding key files. This utility will identify files with potential key block and deleted key block problems (ERR=7). This is a public program that you call passing in the file name to analyze.

Procedure

CALL “AEDPUB”, MSG$[ALL]

Where:

MSG$[0] - Result:
             "." if successful completion without error
             message text if an error
MSG$[1] - File name to check, prompt if empty
MSG$[2] - Location of key in records, "0" = don't check
MSG$[3] - "Y" = Check allocation, default = "N"
MSG$[4] - "Y" = Show progress, default = "N"
MSG$[5] - "Y" = Show summary, default = "N"

From the Thoroughbred Basic Utilities, version 8.9.1. Open this page in the PDF